apl>" <------------------------- sam091.txt ---------------------------->


apl>" <--- Niladic User Function, no return. --------------------------->


apl>Lfx 2 13 R 'user         ''Hello World'''

user

apl>user

Hello World

apl>" <--- Niladic User Function with returned value. ------------------>


apl>Lfx 2 17 R 'r # user         r # ''Hello World'''

user

apl>user

Hello World

apl>" <--- Niladic User Function with localized variable. -------------->


apl>a # 1 40 R 'user;a                                  '


apl>a # a,[1]  '" Demonstration of local variable.      '


apl>a # a,[1]  'L # a # b # I 5                         '


apl>Lfx a

user

apl>b # 23


apl>user

1 2 3 4 5


apl>a

user;a                                  
" Demonstration of local variable.      
L # a # b # I 5                         

apl>b

1 2 3 4 5

apl>)off