[問題] 求陣列的index 使得陣列有極值
do 135 iw=iwmax, 1
if((afmax(iw).gt.afmax(iw+1)).and.(afmax(iw).gt.afmax(iw-1)))
&restfre=iw
135 continue
write(*,*) restfre
我是這樣寫的, 但輸出結果明顯錯誤, 請問各位先進, 哪邊錯誤
感謝指導
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.112.4.192
推
04/25 21:56, , 1F
04/25 21:56, 1F
→
04/25 21:57, , 2F
04/25 21:57, 2F
→
04/25 21:57, , 3F
04/25 21:57, 3F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章