code:

---

$ = setoption("Explicit","on")
Global $a

$a = 1,2,3,4
$ = test($a)

get $


function test($a)
    "in udf :" ?
    for each $a in $a
       "$$a = " + $a ?
    next
    "end of udf" ? ?
endfunction

---