    disp( txt )

      txt = sprintf(  '                   : i.e. %s', utc_epoch );
      disp( txt )

      txt = sprintf( ['R (kilometers)     : ' ...
                      '%12.4f %12.4f %12.4f'], pos );
      disp( txt )

      txt = sprintf( 'Light time (secs)  : %12.7f', ltime );
      disp( txt )

      disp(' between observer' )
      disp(' and target' )
      disp( ' ' )

      %
      % Create a vector of et's, starting at 'epoch'
      % in steps of 100000 ephemeris seconds.
      %
      vec_et