Fortran Coder

标题: fortran中的do循环得到的一个有很多值的数，在do之外应该怎... [打印本页]

作者: 呜啦啦 时间: 2020-12-30 17:12
标题: fortran中的do循环得到的一个有很多值的数，在do之外应该怎...
我在程序中调用evbas得到 v 值，然后让  vev= vapang+ v ，代码如下

   call evbas(r,v)

      vev= vapang+ v

但是，evbas子程序中v 是通过下面代码来计算的，所以v应该是有227个值，但是我do循环结束后只有一个v值输出，如果我需要让每一个 v 值都与vapang相加得到多个vev值，这个应该怎么办呢？

   do k=1,227

      v= c(k)*b(k)

   enddo

作者: 布衣龙共 时间: 2020-12-30 17:24
v 定义成数组

作者: 呜啦啦 时间: 2020-12-31 10:40

布衣龙共发表于 2020-12-30 17:24
v 定义成数组

我把v（我程序里面换成了pol）定义成了数组，如下
   do k=1,227
      pol(k)= c(k)*b(k)
   enddo

确实能读出来pol的值，那我上面进行加和的代码改写如下
      do k=1,227
      vev= vapang+ pol(k)
         enddo
，然后我读出vev值，结果显示NaN,也就是说结果是非数，这个应该怎么办呢

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