24小时热门版块排行榜    

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

捐助贵宾 (小有名气)

也不知道是自己理解有问题还是书本有问题,按着书本上写,把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的回帖

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的回帖

weiwei43

至尊木虫 (正式写手)

77的程序在90编译器中应该能正常编译,除了特殊语句。
6楼2015-06-09 13:51:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jiangxingge

金虫 (正式写手)

引用回帖:
5楼: Originally posted by kimileegdut at 2015-06-08 15:19:00
我想请教个问题,你的意思就是我在项目里再单独添加这个77的子程序?然后项目原来的90主程序可以直接调用?...

是这个意思
7楼2015-06-11 09:49:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kimileegdut

捐助贵宾 (小有名气)

引用回帖:
7楼: Originally posted by jiangxingge at 2015-06-11 09:49:55
是这个意思...

ok,谢谢!
8楼2015-06-11 21:54:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fxzysu

金虫 (正式写手)

图片看不太清,我给你试试,你这是哪本书上的?

发自小木虫IOS客户端
一个人的寂寞,是两个人的错
9楼2016-03-28 01:29:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 kimileegdut 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 385分 生物学(071000)求调剂 +4 qf626 2026-04-01 4/200 2026-04-02 06:44 by ilovexiaobin
[考研] 材料专硕322分 +10 哈哈哈吼吼吼哈 2026-04-01 10/500 2026-04-01 22:19 by Dyhoer
[考研] 材料调剂 +14 一样YWY 2026-04-01 14/700 2026-04-01 21:07 by lijunpoly
[考研] 266分求材料化工冶金矿业等专业的调剂 +7 哇呼哼呼哼 2026-03-26 7/350 2026-04-01 20:47 by cqupH
[考研] 332求调剂 +8 Lyy930824@ 2026-03-29 8/400 2026-04-01 18:40 by 千钧澄玉宇啊
[考研] 316求调剂 +9 舟自梗 2026-04-01 10/500 2026-04-01 18:13 by 无际的草原
[考研] 350求调剂 +7 阿佳~ 2026-03-31 7/350 2026-04-01 16:12 by yanflower7133
[考研] 321求调剂 +8 y-yh 2026-04-01 8/400 2026-04-01 14:44 by 星空星月
[考研] 358求调剂 +3 王向阳花 2026-03-31 3/150 2026-04-01 09:56 by zzchen2000
[考研] 考研调剂求助 +7 13287130938 2026-03-31 7/350 2026-03-31 16:39 by 690616278
[考研] 一志愿大连理工大学,机械工程学硕,341 +3 西瓜田的守望者 2026-03-30 3/150 2026-03-31 11:08 by asdfzly
[考研] 274求调剂 +6 xiao爱同学 2026-03-30 6/300 2026-03-31 10:04 by cal0306
[考研] 282求调剂 +3 呼吸都是减肥 2026-03-31 3/150 2026-03-31 10:00 by wangjy2002
[考研] 抱歉 +4 田洪有 2026-03-30 4/200 2026-03-30 21:26 by mumin1990
[考研] 一志愿华中师范化学332分求调剂 +3 Lyy930824@ 2026-03-29 3/150 2026-03-30 20:15 by DHUSHUAI
[考研] 0703化学321分求调剂 +10 三dd. 2026-03-30 11/550 2026-03-30 19:24 by markhwc
[考研] 求调剂 +10 家佳佳佳佳佳 2026-03-29 10/500 2026-03-30 18:34 by 544594351
[考研] 332求调剂 +6 @MZB382400 2026-03-28 6/300 2026-03-30 16:57 by 无际的草原
[考研] 070305高分子化学与物理 304分求调剂 +12 c297914 2026-03-28 12/600 2026-03-29 16:21 by Serene1974
[考研] 298求调剂 +4 种圣赐 2026-03-28 4/200 2026-03-29 08:42 by q1092522407
信息提示
请填处理意见