2
c form the list built with last n variables stored in top-n+1:top
3
c positions of the stack
10
c form the list built with last n variables stored in top-n+1:top
11
c positions of the stack
18
c form the list built with last n variables stored in top-n+1:top
19
c positions of the stack
26
subroutine mklistt(n,typ)
27
c form the list built with last n variables stored in top-n+1:top
28
c positions of the stack
32
integer n,typ,srhs,slhs,sfin
41
elseif(typ.eq.16) then
43
elseif(typ.eq.17) then