0   ; -3376.200 ], ...
            [  0.000   ;  0.000   ;   0.000   ] ];

      %
      % Using the same Mars parameters, convert the 3-vectors to
      % planetographic.
      %
      [ lon, lat, alt] = <b>cspice_recpgr</b>( body, x, re, flat );

      disp('Vector:')
      disp(' ')

      disp( ['rectan(1)   rectan(2)   rectan(3)' ...
             '         lon         lat         alt'] )

      disp( ['---------------------------------' ...
             '------------------------------------'] )

      