查看会员资料
用 户 名：jwt1989z*********
发送消息- 用户积分：0 分
- Email：用户隐藏
- Icq/MSN：
- 电话号码：
- Homepage：
- 会员简介：
最新会员发布资源
程序 三对角阵系
- ！一维导热，非稳态全隐式迭代，边界条件t1=100，t11=20 ！导热率为7 module parameter1 ！设置全局变量 implicit none integer i real,parameter::dt=0.01 real,parameter::err=0.000001 real,parameter::r=7 real,parameter::ta=100,tb=20 real::a(2:11)=(/(-1,i=2,10),0/) ！设置三对角阵系数 rea