Re: [問題] 關於這個bug我始終想不透?
==> littleboar.bbs@ptt.cc (命運大不同) 提到:
: DO 1 K=1,NZ
: IF (ZLOW.LE.Z(K).AND.Z(K).LE.ZHIG) GOTO 2
: 1 CONTINUE
: ** NO MATCH IS FATAL AND NON-RECOVERABLE
請在這一行把ZLOW、Z(K)、ZHIG和K的值WRITE出來也許就知道為什麼了
: CALL ABTMOS (0)
: ** RETURN THE DESIRED INDEX
: 2 KDESIR=K
: END
: 這是一個fortran 77語法 的subroutine
: 請問只要我滿足if的條件後 ,不是就會跳到
: 代號為2的那行,回傳值後往下執行到end
: 而回到我之前呼叫的地方,為什麼我compiler後
: 都會執行到call abtmos,而跳到abort 程序呢
: ,請前輩指導我一下,謝謝
我學的是fortran95,可能概念不太一樣,沒看到END DO,是
FORTRAN77本來就不需要END DO嗎
--
◎龍貓資訊天地(bbs.mgt.ncu.edu.tw)
◎[Tailss]From: 237-200.dorm.ncu.edu.tw
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 3 篇):
Programming 近期熱門文章
PTT數位生活區 即時熱門文章