有关mod 函数

聂彪66

mod函数的自变量不能取实数，要是实数怎么办

vvt

同样的办法呀~~没有什么去别。

聂彪66

fcode 发表于 2016-9-30 10:44
是的，不可以。
改善的做法是：
[mw_shl_code=fortran,true]real :: i

这样改第一个循环可以，但是我的另外一个循环就不可以了Do xdo = st,nint( et/step)
        x=step*(xdo-1)
        if(x==0)then
            x=x+0.1
            endif
这个，他的下一个循环st又是实数行了，怎么处理呢

fcode

是的，不可以。
改善的做法是：

[Fortran] 纯文本查看 复制代码

real :: i
integer :: ido
Do ido = 1 , Nint( 30.0/0.025 )
  i = 0.025 * (ido-1)
  ....

聂彪66

kerb 发表于 2016-9-29 23:07
mod函数的自变量能取实数
mod(1.2,1.0)=0.2

懂了，谢了，能不能给我看看这个问题，说循环变量必须为整数型什么意思，不可以实数吗
Do i = 0.0,30.0,0.025
     1
Error: Deleted feature: Loop variable at (1) must be integer

kerb

mod函数的自变量能取实数
mod(1.2,1.0)=0.2