LOOP
CONT DSDX SMLC -9.8 SMLT INVS FFFF DSDY HGHT LAVE
CONT SMLT DSDX SMLC 219 SDVD HGHT LDIF ABSV PRES LDIF
CONT DSDX SMLC 9.8 SMLT INVS FFFF DSDX HGHT LAVE
CONT SNEG SSUM SMLT DSDY SMLC 219 SDVD HGHT LDIF ABSV PRES LDIF
CONT DSDY SMLC -9.8 SMLT INVS FFFF DSDY HGHT LAVE
CONT SMLT DSDX SMLC 219 SDVD HGHT LDIF ABSV PRES LDIF
CONT DSDY SMLC 9.8 SMLT INVS FFFF DSDX HGHT LAVE
CONT SSUM SMLT DSDY SMLC 219 SDVD HGHT LDIF ABSV PRES LDIF
CLR6 SNEG/
TXTR-300-500MB Layer-Q
ENDL
LOOP
DNEG DVRG KEPV&
TXTS-DIV-layer-Q
ENDL