Program: MKLSEPIDISTV

  mklsepidistv.............vectorized epicentral distance from coordinates
 
  call: delta=mklsepidistv(elon,elat,slon,slat);
 
              elon: (numeric) [deg]
                    epicenter longitude
              elat: (nmeric) [deg]
                    epicenter latitude
              slon: (numeric) [deg]
                    station longitude
              slat: (numeric) [deg]
                    station latitude
 
              ELAT and ELON may be vectors or matrices representing many
              epicenters. They have to be of equal size then.
 
  All coordinates in degrees, positive to the north and east, respectively.
  Valid for spherical planets.
 
  result: delta: epicentral distance, in degrees
 
  after formula 4.4.1 in Lay/Wallace's book "Modern Global Seismology"
 
  Martin Knapmeyer, 10.9.1996, vectorized 12.08.2002, 21.08.2002

Read M-File Source Code


eof.