apl>" <------------------------- sam092.txt ---------------------------->


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


apl>a # 1 40 R 'user a                                  '


apl>a # a,[1]  '''Value of argument a + 1 is '',Fa+1      '


apl>Lfx a

user

apl>user

user
^ 61 - stack not empty at end of expression in execute.

apl>user 23

Value of argument a + 1 is 24

apl>" <--- Monadic User Function, with return. ------------------------->


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


apl>a # a,[1]  'r # a + 1                               '


apl>Lfx a

user

apl>user 23

24

apl>)off