| 查看: 776 | 回复: 3 | ||
MYHG900510铜虫 (著名写手)
|
[求助]
fortran语言编写的直线方程不知道对不对，请教大牛
|
|
程序：（直线方程） if(cptim.le.0.0d0) then p1=0d0 end if if((cptim.gt.0.0d0).and.(cptim.le.40.0d0)) then p1=s1*(cptim+timinc) end if if((cptim.gt.40.0d0).and.(cptim.le.120.0d0)) then p1=12.5d0+s2*timinc end if 直线方程：y1=0.3125x (0≤x≤40） y2=12.5+0.09375(x-40) (40≤x≤120） s1与s2为直线的斜率，分别等于0.3125与0.09375 cptim为时间增量起始时间，timinc为时间增量 |
回复此楼» 猜你喜欢
有没有人能给点建议
已经有5人回复
-
假如你的研究生提出不合理要求
已经有12人回复
-
实验室接单子
已经有7人回复
-
全日制（定向）博士
已经有5人回复
-
萌生出自己或许不适合搞科研的想法，现在跑or等等看？
已经有4人回复
-
Materials Today Chemistry审稿周期
已经有4人回复
-
参与限项
已经有3人回复
-
对氯苯硼酸纯化
已经有3人回复
-
所感
已经有4人回复
-
要不要辞职读博？
已经有7人回复
Bruce_lee
铜虫 (著名写手)
- 应助: 5 (幼儿园)
- 金币: 2632.7
- 散金: 424
- 红花: 4
- 帖子: 1277
- 在线: 317小时
- 虫号: 948103
- 注册: 2010-01-25
- 性别: GG
- 专业: 聚合物共混与复合材料
2楼2017-08-11 21:18:36
jjdg
版主 (知名作家)
- 程序强帖: 9
- 应助: 223 (大学生)
- 贵宾: 3.926
- 金币: 51003.4
- 红花: 238
- 帖子: 7227
- 在线: 474.2小时
- 虫号: 27000
- 注册: 2003-10-21
- 专业: 药物代谢与药物动力学
- 管辖: 程序语言
3楼2017-08-11 22:46:31
MYHG900510
铜虫 (著名写手)
- 应助: 0 (幼儿园)
- 金币: 7933.9
- 帖子: 1315
- 在线: 34.7小时
- 虫号: 3575813
- 注册: 2014-12-04
- 性别: GG
- 专业: 金属结构材料
4楼2017-08-18 13:47:19