) (BRANCH <>) (DIR <>) "AUX" (STR <2 >) (THING <1 >) (TYP ) (TPS ) (TYP1 ) (ELSE .TPS)>) (FLS <==? .W FLUSHED>) (SDIR .DIR) (TTYP ) (TAC <>) (ETY ) (TWIN ) (B2 .BRANCH) (ELSE )>) SAC NAC STRD NUMD DEAD (TWOW <>) TEM TY DAC DCOD (B3 ) (RW .W) (FC <0? >) (LP ) B4 (DEADV <>)) #DECL ((N STR THING) NODE (STRD NUMD) DATUM (DAC SAC NAC) AC (DCOD) FIX (TPS TYP1 B2 B3 B4) ATOM (DEAD) (NK FLS DIR SDIR NOTF BRANCH) ) > >> <==? .TPS BYTES>> )> ) ( ,LVAL-CODE> <==? >> 2> > > .FLS>> DONT-CARE) (.TWOW ) (ELSE )>> > ,SNODES>> ,SNODES>> > >) (ELSE ,QUOTE-CODE>> > >) (ELSE DONT-CARE)>>> >)> > > >> >> > ) (<==? .TPS UVECTOR> >>> !>> > >> > ()>> >

>>) (ELSE >> )>>)> > )>)> )>)> AC> > ,ACPROT T>)> > ,ACPROT T>)> )> AC> .STRD>> > > >> ,ACPROT T> !>>)> >)> >)> .DIR <=? .W .STRD>> )> >> 1> >>)> >>)> ) (<1? .DCOD> 1 ()>>) (ELSE )>> >> > 1 ()>>)> .TWIN> ()>> .LP>>) (<==? .TPS UVECTOR> >>)> .TWIN> .LP>>) ( >>)> .TWIN> '[<2 (2)>]>> .LP>>) (.FLS AC> >> 0>> >> (>)>>) (ELSE ()>>)>) (ELSE >> !>>)> TEMP> >> > >>)> >> > > .LP>>) (ELSE AC> >> -1>> >) (ELSE >> >>)> >> > > > >> AC> .LP>>) (ELSE >> )>)> >> ) (ELSE )> ) ( >>> )> .W> ) (ELSE >) (ELSE > )>) (ELSE > .W>>> AC> ,ACLINK (.STRD)>)> AC> ,ACLINK (.STRD)>)> >) (ELSE >> > )>)>)> > ) .OFFS ()>> ) (ELSE ()>> > ) (ELSE ())>>> .OFFS ()>> > )>>