" <------------------------- sam172.txt ---------------------------->
" <- Quad-LC, stop control ----------------------------------------->
a # 1 15 R 'b recurse a    '
a # a,[1]  '$(a > b) / show'
a # a,[1]  'b recurse a+1  '
a # a,[1]  '$0             '
a # a,[1]  'show:a         '
Lfx a
sHrecurse # 4
2 recurse 2
10 recurse 10
)si
$L#Llc
)si
$Llc
)off