- 博客(7)
- 收藏
- 关注
RSS订阅原创 FORTRAN+计算物理学学习日记（6）
绘制图像 遇到问题：1.A specification statement cannot appear in the executable section.为将主程序关闭2.存储文件空白，数组定义过小
2022-06-10 21:18:30
297
原创 FORTRAN+计算物理学学习日记（4）
1.5基本数学运算中的求根方法一：区间对分法求根书中例题及编写代码如下!!利用区间对分法求根program main implicit none real(8)::a,b,x,t,y a=2 b=3 x=(a+b)/2 t=1D-15 do while(((b-a)/2)>t) call interp(x,y) if(y==0)then x=x el.
2022-05-27 16:13:29
484
原创 FORTRAN+计算物理学学习日记（3）
《计算物理学》1.4数值积分编写e指数的积分函数，求0到1的积分结果在这里我们运用梯形公式计算，运用抛物线公式的话只需要改变部分数字即可program main implicit none integer(8)::n,i,y real(8)::h,int,a,b a=0 b=1 n=10000 h=(b-a)/n int=exp(a) open(unit=101,file="exp.csv",status="new")
2022-05-25 18:50:01
501
原创 FORTRAN+计算物理学学习日记（2）
利用Fortran编写数值微分函数，利用向前向后两点式以及五点式求微分。以上节例题为模板，编写向前向后两点式如下：!在例一的条件上，计算两点一次插值的微商，编写向前两点式,向后两点式program main implicit none integer(4)::i,n real(4)::x1(7),y1(7),x(100),y(100),p(100),q(100),z(100),h x1(1)=0.0 x1(2)=0.5 x1(3)=1.0
2022-05-22 15:17:25
529
原创 FORTRAN+计算物理学学习日记（1）
第一周：结合李录的计算物理学学习FORTRAN语言，这周的任务是插值函数，大致编写了四个小时，编写了一个双层循环的插值函数，进行了六次插值计算例题。例题如下：编写代码如下：program main implicit none integer (8)::n,res open(unit=10,file="data.txt",status="old") read(10,*)n call haha(n,res) open(unit=11,file=.
2022-05-21 18:53:14
408
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人