n =1 subroutine optic is calling program (receiving site only)
n =2 subroutine radar is calling program (receiving and sending
sites)
parameter to entry point PLATMO

ksite(n)   =-2  for geodetic coordinates on earth
ksite(n)   =-1  for cylindrical polar coords.on earth
ksite(n)   = 0  for spherical polar coords.on earth
ksite(n)=positive   spherical polar coords.on body ksite(n)