(PROGRAM (VAL foo "fred") (VAL bar foo) (VAL baz (CONCAT "hampi" bar "baz")))