10000 REM ********************* kd routine 12/13/06 *******************
10001 REM  Used in schedule proceeding modfied UM.rtn to cause UM to execute repeatedly 4 times,
10002 REM  or until the next zenith angle is schedule is reached.
10003 REM *************************************************************
10005 DATA kd
10020 L9%=4
10300  RETURN
65529 REM *** dummy line ***