Fortran Coder

标题: 关于老fortran代码如何改写成c语言逻辑的问题 [打印本页]

作者: zhouhuibin 时间: 2023-3-30 14:42
标题: 关于老fortran代码如何改写成c语言逻辑的问题
  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;
...
}
还请老哥们帮我看看

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)