LOOP
BKNT CLR1&THTE CIN4 CLRE
BKNT GRTN 0019 CLR2&THTE GRTN 0319 CLR3 CIN4&
TXT4 *** THETA-E (K) / WIND (kt) -
TXTT Hit <RETURN> to overlay THETA-E ADVECTION -
ENDL
LOOP
advt THTE wind clr4 dneg&
TXT4 THETA-E (K) / WIND (kt) / THETA-E ADVECTION -
TXTT -                                       -
ENDL