实现地震射线追踪和反演的frotran程序，适合地震勘探的同行,Seismic ray tracing implementation and inversion frotran procedures, seismic exploration for suitable peer

c This a MATLAB and FORTRAN based program that computes the: c c I. Maximum directivity (dimensionless and in dB) c II. Radiation resistance (Rr) c III. Input resistance (Rin) c IV. Reactance relative to current maximum (Xm) c V. Inp