1 OPTIONDEBUG 1:OPTIONTRACE 1
10 DEFUN APPLY(F,X)=F(X)
20 DEFUN FUN(X)=X^2
30 K=APPLY(FUN,42)
100 PRINT K
110 PRINT TYPEOF K
120 RESOLVE K