(OUTCHAN) CHANNEL) )) #DECL ((D) FIX (B) STRING) > ) (T )> >> >) (T >)>>) ( 32>> 1>) (M 1)) #DECL ((D P M) FIX) >> >) (<==? !\1> >) ( !\0> )> >>)>>