" <-APL2-------------------- sam227.txt ---------------------------->
)load cap2/help/help
display w#(I0)SI0
display x#''%''
display s#%0 2R`Z1 2 3
display z#2+0R`Z0 0
Rz
)off