apl>" <------------------------- sam149.txt ---------------------------->
apl>)copy cap2/handbook/wksp/pr qprobf repl
apl>5.78 qprobf 20
.999164
apl>27.3 qprobf 20
.12703275
apl>27.3 qprobf 40
.936910
apl>'-_'repl'-1234.56'
_1234.56
apl>0 1e75 repl L#(I3)J.=I3
1 0 0
0 1 0
0 0 1
1e0 1e75 1e75
1e75 1e0 1e75
1e75 1e75 1e0
apl>1 -1 repl 2 5R1 0
-1 0 -1 0 -1
0 -1 0 -1 0
apl>)off