论文简介: wilson时程积分法计算结构的地震响应时程的程序[code]$debug IMPLICIT REAL*8(A-H,O-Z) DIMENSION AMZL(7,7),AKK1(7,7),AKGD(7,7),AMZL1(7,7) DIMENSION XX(7),XXG0(2720),XXG(2720) DIMENSION FF(7,1),XX2PP(2720,7),XX1PP(2720,7),XXPP(2720,7)
wilson时程积分法计算结构的地震响应时程的程序
[code]$debug
IMPLICIT REAL*8(A-H,O-Z)
DIMENSION AMZL(7,7),AKK1(7,7),AKGD(7,7),AMZL1(7,7)
DIMENSION XX(7),XXG0(2720),XXG(2720)
DIMENSION FF(7,1),XX2PP(2720,7),XX1PP(2720,7),XXPP(2720,7)
DIMENSION xpie1(7,1),xpie2(7,1),xpie(7,1)
DIMENSION guodu1(7,1),guodu2(7,1),guodu(7,1)
DIMENSION IS(7),JS(7)
DOUBLE PRECISION AKK1
DOUBLE PRECISION AMZL,AKGD
附件名:2008881218188457569.rar
文件大小:2K
(升级VIP 如何赚取土木币)