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