function f2 (fa)

  fan = @ (a, x, y, z) a * fa (x, y, z);

  fan (1, 2, "ab", 4)

endfunction
