有限元模型中fortran语言编写
在设置 real x,y,z,v,s,ax=coords(1)
y=coords(2)
z=coords(3)
v=14
s=v*TIME(1)后如何同时运行两个if语句，让一侧的六个轮与一侧的四个轮同时往前跑
1.if((z>=7.96 .and. z<=8.23) .or. (z>=9.31 .and. z<=9.58)) then
F =1470000+178000*SIN(16.55*TIME(1))
if((x>=s+14.126 .and. x<=s+14.526) .or. (x>=s+15.826 .and. x<=s+16.226)) then
F =1470000+178000*SIN(16.55*TIME(1))
else
F=0
endif
else
F=0
endif
2.if((z>=11.47 .and. z<=11.74).or. (z>=13 .and. z<=13.27)) then
F =1470000+178000*SIN(16.55*TIME(1))
if((x>=s+10 .and. x<=s+10.4) .or. (x>=s+11.7 .and. x<=s+12.1).or. (x>=s+13.4 .and. x<=s+13.8)) then
F =1470000+178000*SIN(16.55*TIME(1))
else
F=0
endif
else
F=0
endif
页:
[1]