GPSCalc([0;0;6370;0],zeros(4,1))

ans =

  1.0e+003 *

  -0.019053845324630
   0.011318215903832
   6.370251972865038
  -0.000000042599196


GPSCalc([0;0;5e10;0],zeros(4,1))

ans =

  1.0e+004 *

  -0.150243845210447
   0.046069421575677
   4.616751009647846
  -0.000035303196551