       10 // CLOSED sample program
       20 //
       30 a:=1
       40 aap
       50 SYS assert, a=1
       60 //
       70 PRINT "Ok"
       80 //
       90 PROC aap CLOSED
      100   a:=9
      110 ENDPROC aap
