d c/elt APLSTK.I
È c.
,c. one-d stack
c.
ô	parameter	N$STK = 30
Xc.
¼	common /APLSTK/ inx_stk
Õ	1	, max_stk
î	1	, sta_stk(N$STK)
	2	, typ_stk(N$STK)
	3	, val_stk(N$STK)
 c.
„c........