[問題] 請問這樣寫為什麼計算出來都是0呢
program wnag1201
implicit none
COMPLEX :: i,z,h
complex , parameter :: bta=(0.5,0),wba=(5,0), &
w=(10,0),Wd=(9.987492,0),kc=(0.05,0)
i=(0,1)
H=1/10000*((1-bta**2)-i*(2*kc*bta))/((1-bta**2)**2+(2*kc*bta)**2)
write(*,*) h
end program wnag1201
他WRITE出來永遠是 0.00000E+000,0.00000E+00
>"< 不知道我該怎麼改才好...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.113.130.127
推
11/10 15:58, , 1F
11/10 15:58, 1F
→
11/10 16:04, , 2F
11/10 16:04, 2F
推
11/10 16:31, , 3F
11/10 16:31, 3F
→
11/10 17:56, , 4F
11/10 17:56, 4F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
-1
12
