Unnamed
public text v1 · immutablepartno/array_test
print/on
clprnt
reserv /pts,4
k = 4
la1) loopst
pts(k) = point/k,0
k=k-1
if (k-1) la3, la1, la1
la3) loopnd
finipartno/array_test
print/on
clprnt
reserv /pts,4
k = 4
la1) loopst
pts(k) = point/k,0
k=k-1
if (k-1) la3, la1, la1
la3) loopnd
fini