24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1964  |  回复: 8
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

kimileegdut

捐助贵宾 (小有名气)

[求助] 非线性插值法--fortran77代码转Fortran90 已有1人参与

求助各位前辈,现在要用到线性插值法,但是资料是fortran77的代码,本人手头上没有77的教材,看不太懂,希望各位前辈赐教,将fortran77代码转为fortran90的代码。

非线性插值法--fortran77代码转Fortran90
IMG_2590.JPG


非线性插值法--fortran77代码转Fortran90-1
IMG_2591.JPG


非线性插值法--fortran77代码转Fortran90-2
IMG_2592.JPG


非线性插值法--fortran77代码转Fortran90-3
IMG_2593.JPG
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kimileegdut

捐助贵宾 (小有名气)

引用回帖:
4楼: Originally posted by jiangxingge at 2015-06-08 13:44:30
我理解,F77可以不加修改,只是文件名后缀 为FOR,搞在一个项目里,就可以的。

我想请教个问题,你的意思就是我在项目里再单独添加这个77的子程序?然后项目原来的90主程序可以直接调用?
5楼2015-06-08 15:19:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

kimileegdut

捐助贵宾 (小有名气)

也不知道是自己理解有问题还是书本有问题,按着书本上写,把do循环改成90的形式,结果给x的初值,输出还是初值
2楼2015-06-05 16:45:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kimileegdut

捐助贵宾 (小有名气)

打错了,是线性插值法求解非线性方程组
3楼2015-06-05 16:46:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jiangxingge

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
kimileegdut: 金币+25, ★★★很有帮助 2015-06-11 21:54:36
我理解,F77可以不加修改,只是文件名后缀 为FOR,搞在一个项目里,就可以的。
4楼2015-06-08 13:44:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 385分 生物学(071000)求调剂 +3 qf626 2026-04-01 3/150 2026-04-01 23:57 by 钰璞
[考研] 265求调剂 +4 林深温澜 2026-04-01 6/300 2026-04-01 22:30 by 林深温澜
[考研] 环境工程297分求调剂一志愿杭高院 +10 GENJIOW 2026-03-31 11/550 2026-04-01 21:38 by GENJIOW
[考研] 285求调剂 +7 AZMK 2026-03-30 13/650 2026-04-01 17:00 by 七度不信任
[考研] 311求调剂 +11 蓝月亮亮 2026-03-30 11/550 2026-04-01 16:33 by 七度不信任
[考研] 材料0856 英一数二 323 求调剂 +9 袁sy 2026-04-01 9/450 2026-04-01 14:30 by wangjy2002
[考研] 材料专业求调剂 +7 月月鸟木 2026-04-01 7/350 2026-04-01 11:36 by wangjy2002
[考研] 070300求调剂306分 +5 26要上岸 2026-03-27 5/250 2026-04-01 11:09 by oooqiao
[考研] 085701环境工程,267求调剂 +17 minht 2026-03-26 17/850 2026-04-01 09:11 by xiayizhi
[考研] 本科211安全工程,初试290分,求调剂 +3 2719846834 2026-03-28 3/150 2026-03-31 13:52 by 热情沙漠
[考研] 286求调剂 +5 丢掉懒惰 2026-03-27 8/400 2026-03-31 11:27 by Delta2012
[考研] 262求调剂 +7 ZZ..000 2026-03-30 8/400 2026-03-31 10:05 by cal0306
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[考研] 一志愿厦门大学材料工程专硕354找调剂!!! +5 贝呗钡钡 2026-03-30 5/250 2026-03-30 18:16 by 无际的草原
[考研] 085602 化学工程专硕 340分求调剂 +4 qianbai11 2026-03-29 4/200 2026-03-30 11:34 by 唐沐儿
[考研] 一志愿北京理工大学本科211材料工程294求调剂 +8 mikasa的围巾 2026-03-28 8/400 2026-03-29 12:48 by 无际的草原
[考研] 085600,专业课化工原理,321分求调剂 +5 大馋小子 2026-03-28 5/250 2026-03-29 08:56 by qingfeng258
[考研] 085602 化工专硕 338分 求调剂 +12 路痴小琪 2026-03-27 12/600 2026-03-28 15:41 by L135790
[考研] 340求调剂 +5 jhx777 2026-03-27 5/250 2026-03-28 04:18 by fmesaito
[考研] 一志愿上海理工能源动力(085800)310分求调剂 +3 zhangmingc 2026-03-27 4/200 2026-03-27 19:01 by 给你你注意休息
信息提示
请填处理意见