斯奈尔定理求取反射系数

代码说明：

此程序用来求取反射系数。通过左普利兹方程组，知道反射角，给出两层水平地层的横波速度，纵波速度，以及两层的密度，即可来求取反射系数，透射系数。超过临界角时候，使用虚数，并取模作为最终结果。此程序可用来进行地球物理中，反射波，投射波能量、振幅的求取。