1 dcl       1 ev_node           based,
 2           2 next              ptr,
 3           2 name              ptr,
 4           2 block             ptr,
 5           2 exp               ptr,
 6           2 equiv             ptr,
 7           2 const             fixed bin(18),
 8           2 first             fixed bin(18),
 9           2 last              fixed bin(18),
10           2 code              fixed bin(18);
11 
12 dcl       1 ev_equiv          based,
13           2 next              ptr,
14           2 name              ptr,
15           2 code              fixed bin(18);