) (KK ()) N TEM TT T1 D1 D2 D3 (OOPSF <>) TG1 TG2 (SUGGEST DONT-CARE)) #DECL ((K KK) (N NOD) NODE) <==? 0>> )> 1> > FIX>> > >) (ELSE T)>> .K>> >> ,SEG-CODE> <==? >>>> LIST>> > >) (ELSE >)> )) #DECL ((NL) (N) NODE) ,SEG-CODE> > .TEM <> <> <>>>) (ELSE > <>> > >) (ELSE )> .TEM = > > )> .W) ( .SUGGEST) (ELSE )>>>)>> .KK> ) (ELSE >> ,SEG-CODE> > T T <>>> > > >) (ELSE > > () = .SUGGEST) (ELSE )>>>>)> )) #DECL ((N) NODE) ,SEG-CODE> >>>> LIST> >> > > T>)> > <>> )> ) (ELSE >>)>) (ELSE > <>> () = >> > T>)> >> ) (ELSE )> )>)>> > )> )>> ) (TG2 ) (ITYP ) (TPS ) (ET ) (ML ) TG3 TG4 (TG1 ) TEM D1 (D3 .DAT) FDAT) #DECL ((NOD) NODE) )> > >>> > >>> ) (ELSE >)> > 1> > >> ) (ELSE >> .DAT>)> > >)> )> ( TYPE VALUE LENGTH)) (<==? .TPS LIST> ( VALUE)) (ELSE ( VALUE LENGTH))> ( VALUE) ! > (( VALUE))) (ELSE ())>> > 1> = .TEM> > T>)> >> > )> (.DAT .FDAT <0? .ML>)) (.FLG .FDAT) (ELSE .DAT)>> > .D> .TG> T>