用PREM模型追踪震源地表的地震射线,表示出上地幔间断面和地核对射线的影响。
C-2. 编写子函数:对于固-固介质界面,已知P波和S波速度以及入射角,求出P波和S波反射及透射角。(注意:该子函数可以计算并列出入射波的临界角) 一、 实验原理 二、程序源代码 function [ a1,a2,b1,b2] = snel( i,a,vp1,vp2,vs1,vs2 )%本程序一些地方有中文,在某些版本的matlab中可能无法正确显示,但不影响使用。 i=input('请输入波形,p波请输入1,S波请输入2,SH波请输入3:');%........................% a=input(…