[問題] 函數問題
小弟我又來發問了
之前的問題 我已經了解是要用 gfortran編譯
也感謝 agody noonee meteorology 3位高手的解答
不過我在做練習時 又遇到函數問題了
我已經編譯 有過了
可是 出來結果 有點問題
program logic
real a,b,c
logical, external:: function test
read(*,*) a,b,c
write(*,*) test(a,b,c)
end
logical function test(a,b,c)
double precision a,b,c
test=(a .gt. 0.0) .and. (b .gt. 0.0) .and. (c .gt. 0.0)
end
輸入~
20
30
-10
出來
0.00000
這應該是邏輯運算 結果 不是應該 是0或1嗎
或.TURE. .false.
怎麼會是0.0
謝謝看完唷
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.134.140.40
→
12/05 15:07, , 1F
12/05 15:07, 1F
推
12/05 16:45, , 2F
12/05 16:45, 2F
→
12/05 16:46, , 3F
12/05 16:46, 3F
→
12/05 16:47, , 4F
12/05 16:47, 4F
→
12/05 23:48, , 5F
12/05 23:48, 5F
推
12/05 23:57, , 6F
12/05 23:57, 6F
推
12/06 00:59, , 7F
12/06 00:59, 7F
推
12/06 01:19, , 8F
12/06 01:19, 8F
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
