- goodmain 好界面共享
- OpenGL198412 OPenGL作业
- Matlab 一维洪水模型（圣维南方程的离散库朗差分解法）程序 % 洪水模型（圣维南方程的差分求解方法）； % All Right Reserved 城市公共安全应急系统中一维洪水演进及其可视化研究 ; % Modified by lilongduzhi@yahoo.com.cn hehe:)
- BEIZER 编写绘制Bezier曲线的源代码
- read_cd_vol_info ISO 9660 is a international standard that defines a filesystem for CD/DVD media. To get the volume name from such system in Linux we ll be dealing with the its device path once again. On my system the device path of the CD/DVD device is /dev/scd0. Also
- objviewer A OBJ 3D model viewer with source
文件名称:程序 三对角阵系
-
所属分类：
- 标签属性：
- 上传时间：2011-11-28
-
文件大小：25.5kb
-
已下载：0次
-
提 供 者：
-
相关连接：无下载说明：别用迅雷下载，失败请重下，重下不扣分！
下载1 (25.5kb)
别用迅雷、360浏览器下载。
如迅雷强制弹出，可右键点击选“另存为”。
失败请重下，重下不扣分。
如迅雷强制弹出，可右键点击选“另存为”。
失败请重下，重下不扣分。
介绍说明－－下载内容来自于网络，使用问题请自行百度
！一维导热，非稳态全隐式迭代，边界条件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/) ！设置三对角阵系数
real::b(11)=(/1,(9,i=2,10),1/)
real::c(1:10)=(/0,(-1,i=2,10)/)
real::t(11),t1(11)
real::p(11),q(11)
end module
！导热率为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/) ！设置三对角阵系数
real::b(11)=(/1,(9,i=2,10),1/)
real::c(1:10)=(/0,(-1,i=2,10)/)
real::t(11),t1(11)
real::p(11),q(11)
end module
(系统自动生成,下载前可以参看下载内容)
下载文件列表
压缩包 : fortran.doc 列表
本网站为编程资源及源代码搜集、介绍的搜索网站，版权归原作者所有！ 粤ICP备11031372号
1999-2046 搜珍网 All Rights Reserved.