实验一 基本地震学理论(斯奈尔定律)

C-2. 编写子函数:对于固-固介质界面,已知P波和S波速度以及入射角,求出P波和S波反射及透射角。(注意:该子函数可以计算并列出入射波的临界角) 一、 实验原理 二、程序源代码 function [ a1,a2,b1,b2] = snel( i,a,vp1,vp2,vs1,vs2 )%本程序一些地…