include ..\Utilitys.pmt

0 ( 5 4 3 2 ) dim

5432 ( 5 4 3 2 ) sset

( 5 4 3 2 ) sget print nl

( 5 4 3 ) sget var row
row print nl

row 1 2 set var row
row print nl

row ( 5 4 3 ) sset
0 10 repeat ( 5 4 2 ) sset

pstack