24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1961  |  回复: 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

捐助贵宾 (小有名气)

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

kimileegdut

捐助贵宾 (小有名气)

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

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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿南昌大学324求调剂 +12 hanamiko 2026-03-27 12/600 2026-04-01 22:34 by 运气yunqi
[考研] 273求调剂 +19 李芷新1 2026-03-31 19/950 2026-04-01 21:49 by chyhaha
[考研] 342求调剂 +12 Mary Keen 2026-03-28 13/650 2026-04-01 21:02 by 流情牧豪
[考研] 085601材料工程找调剂 +20 oatmealR 2026-03-29 21/1050 2026-04-01 21:00 by lijunpoly
[考研] 307分求调剂 +14 (o~o) 2026-03-31 15/750 2026-04-01 20:43 by longlotian
[考研] 一志愿北交大材料工程总分358 +7 cs0106 2026-04-01 8/400 2026-04-01 18:34 by 记事本2026
[考研] 086502化学工程342求调剂 +7 阿姨复古不过 2026-03-27 7/350 2026-04-01 16:14 by yanflower7133
[考研] 一志愿中国科学院大学265求调剂 +8 恬淡ye 2026-03-31 9/450 2026-04-01 14:34 by 逆水乘风
[论文投稿] chinese chemical letters英文版投稿求助 120+4 Yishengeryi 2026-03-30 5/250 2026-04-01 14:11 by 陆小果画大饼
[考研] 291求调剂 +3 迷蒙木木 2026-04-01 4/200 2026-04-01 11:07 by 逆水乘风
[考研] 267求调剂 +13 uiybh 2026-03-31 13/650 2026-04-01 10:25 by 探123
[考研] 358求调剂 +3 王向阳花 2026-03-31 3/150 2026-04-01 09:56 by zzchen2000
[考研] 一志愿 南京航空航天大学 ,080500材料科学与工程学硕 +10 @taotao 2026-03-31 11/550 2026-04-01 09:43 by xiayizhi
[考研] 343求调剂 +8 爱羁绊 2026-03-28 8/400 2026-03-31 16:12 by 不吃魚的貓
[有机交流] 甲基亚磺磺酸钠和甲基磺酸酯反应机理 10+3 kaobao456 2026-03-29 4/200 2026-03-30 23:16 by nBu锂
[考研] 332求调剂 +6 @MZB382400 2026-03-28 6/300 2026-03-30 16:57 by 无际的草原
[考研] 310求调剂 +10 争取九点睡 2026-03-30 10/500 2026-03-30 16:45 by ztnimte
[考研] 311求调剂 +10 lin0039 2026-03-26 10/500 2026-03-30 10:26 by herarysara
[考研] 复试调剂 +3 raojunqi0129 2026-03-28 3/150 2026-03-28 15:27 by 落睿可思
[考研] 304求调剂 +6 曼殊2266 2026-03-27 6/300 2026-03-28 14:10 by 唐沐儿
信息提示
请填处理意见