Fortran Coder

查看: 1935|回复: 0
打印 上一主题 下一主题

[求助] 关于老fortran代码如何改写成c语言逻辑的问题

[复制链接]

3

帖子

2

主题

0

精华

新人

F 币
23 元
贡献
8 点
跳转到指定楼层
楼主
发表于 2023-3-30 14:42:49 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
  1 ir = ir - 1
  If (ir-1) 42, 42, 2
  2 If (c(ir)) 3, 1, 3
  3 ier=0
    j=ir
    ...

  42 ier =1
   return
请问这段代码要想改写成c语言的逻辑模式?
我想到的是
while((ir-1) >0 &&  0 == c(ir))
{
ir = ir -1;
}
if(ir-1 <= 0)
{
ier =1;
return;
}
if( 0 != c(ir) )
{
ier =0;
j=ir;
...
}
还请老哥们帮我看看

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-23 11:10

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表