jinbeihuang
都没有关于

看了下,都没有关于Fortran的,本人现在正在学习计算物理,用Fortran编写程序求方程根,解线性方程组,求矩阵本征值等,有兴趣或有需要的可以讨论下,Fortran很容易上手,学过C的不用花多少力气就能掌握,Fortran在科学计算里应用很广,可移植性高,不过用来科学计算的多,所以没有其他语言那么普及,有兴趣的可以看看彭国伦编著的Fortran95程序设计。#9x

小新爱
物理专业
展开Biu

物理专业+1

[查看全文]
柒指
来讨论下高斯消元法和牛顿迭代法
展开Biu

@@18!!来讨论下高斯消元法和牛顿迭代法

下面这个是用牛顿迭代法计算三元一次方程 a,b,c,d都是自己输入

PROGRAM MAIN_ROOT

IMPLICIT NONE

REAL::ROOT,A,B,C,D,X0,X

write( *,* ) "PLEASE INPUT A,B,C,D,X0"

READ (*,*) A,B,C,D,X0

X=ROOT(A,B,C,D,X0)

write(*,*) X

END PROGRAM MAIN_ROOT

FUNCTION ROOT(A,B,C,D,X0) RESULT(ROOT_RESULT)

IMPLICIT NONE

REAL,INTENT(IN)::A,B,C,D,X0

REAL::ROOT_RESULT

reAL::X1,F,F1

X1 = X0

F=A*X1**3+B*X1**2+C*X1+D

write(*,*) F

DO WHILE(ABS(F).GT.1E-6)

F=A*X1**3+B*X1**2+C*X1+D

F1=3*A*X1*X1+2*B*X1+C

X1 = X1-F/F1

write(*,*) X1

ROOT_RESULT = X1

END DO

END FUNCTION ROOT

DO WHILE(ABS(F).GT.1E-6)想问下LZ这里的括号内的代码怎么理解

[查看全文]
manmiray
居然搜到了
展开Biu

居然搜到了fortran,谢谢楼主提供学习信息

[查看全文]
jinbeihuang
技术区真的挺冷清的
展开Biu

Utend 发表于 2014-4-4 12:10

嘿嘿,技术区真的挺冷清的~

对啊,而且现在学校里也都是些热门语言

嗯嗯,大家都卖萌去了#26x

[查看全文]
Utend
终于有个人回了
展开Biu

jinbeihuang 发表于 2014-4-3 23:15

终于有个人回了,可能Fortran用在科学计算上比较多,所以接触少些吧

嘿嘿,技术区真的挺冷清的~

对啊,而且现在学校里也都是些热门语言

[查看全文]
jinbeihuang
木有接触过
展开Biu

终于有个人回了,可能Fortran用在科学计算上比较多,所以接触少些吧

[查看全文]
Utend
木有接触过
展开Biu

木有接触过#33t

[查看全文]
jinbeihuang
科学计算用的很多是
展开Biu

科学计算用的很多是Fortran,可能大家都很少用吧,我是物理专业的才学的

[查看全文]