       10 // EXTERNAL test program
       20 //
       30 aap:=0
       40 FOR f:=1 TO 10 DO aap
       50 SYS assert, aap=10
       60 //
       70 PRINT "Ok"
       80 //
       90 PROC aap EXTERNAL "aap1.sq"
