LOOP
F00
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG
WAIT 3SEC
DNEG DVRG LAST&
TXT4 ***-*** LAYER Q-VECTORS/***-*** LAYER Q-VECTOR DIVERGENCE -
TXT5 00-H FORECAST -
ENDL
LOOP
F12
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG
WAIT 3SEC
DNEG DVRG LAST&
TXT4 ***-*** LAYER Q-VECTORS/***-*** LAYER Q-VECTOR DIVERGENCE -
TXT5 12-H FORECAST -
ENDL
LOOP
F24
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG
WAIT 3SEC
DNEG DVRG LAST&
TXT4 ***-*** LAYER Q-VECTORS/***-*** LAYER Q-VECTOR DIVERGENCE -
TXT5 24-H FORECAST -
ENDL
LOOP
F36
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG
WAIT 3SEC
DNEG DVRG LAST&
TXT4 ***-*** LAYER Q-VECTORS/***-*** LAYER Q-VECTOR DIVERGENCE -
TXT5 36-H FORECAST -
ENDL
LOOP
F48
CONT SMLT DSDX XCMP GEOS LAVE DSDX TEMP LAVE
CONT SNEG SSUM SMLT DSDX YCMP GEOS LAVE DSDY TEMP LAVE
CONT SMLT DSDY YCMP GEOS LAVE DSDY TEMP LAVE
CONT SSUM SMLT DSDY XCMP GEOS LAVE DSDX TEMP LAVE
SNEG
WAIT 3SEC
DNEG DVRG LAST&
TXT4 ***-*** LAYER Q-VECTORS/***-*** LAYER Q-VECTOR DIVERGENCE -
TXT5 48-H FORECAST -
ENDL
