capjoint中的tel3核心代码teleseis3.f90
摘要:
为了加入更多层的模型 将 program test PARAMETER (ND0=2048,NM0=6,LK0=10,NL0=100,PI=3.141593,RAD=.0174533) IMPLICIT COMPLEX*8 (Z) CHARACTER NAME*40,NAM*4, prefix*80 阅读全文
posted @ 2017-11-10 16:13 seisjun 阅读(357) 评论(0) 推荐(0) 编辑