2017-06-11 47 views
-1

我如何在if語句中打破這條線,並在這樣的例子中以我的條件繼續新行?如何在Fortran 77的if語句中斷行?

IF((TEMP_PT.GT.TEMP_EVAP. 
& AND.TFIELD(A+1,B).LT.TEMP_EVAP).OR. 
& ((TEMP_PT.GT.TEMP_MELT.AND.TEMP_PT.LT.TEMP_EVAP). 
& AND.TFIELD(A+1,B).LT.TEMP_MELT))THEN 
+0

參見https://docs.oracle.com/cd/E19957-01/805-4939/6j4m0vn6l/index .html –

+1

你的問題是什麼?你的例子有什麼問題嗎?任何錯誤消息?什麼是你的源文件的後綴?你的線路在哪一列開始? –

回答

2

在FORTRAN 77中,第6列是繼續欄。任何非空白,非零有表示線路高於一個的延續:

C23456789 123456789 123456789 123456789 123456789 
     IF((TEMP_PT.GT.TEMP_EVAP. 
    & AND.TFIELD(A+1,B).LT.TEMP_EVAP).OR. 
    & ((TEMP_PT.GT.TEMP_MELT.AND.TEMP_PT.LT.TEMP_EVAP). 
    & AND.TFIELD(A+1,B).LT.TEMP_MELT))THEN 
+0

只是爲了說明,延續的數量有限制(在F77中,標準限制是19,編譯器可能支持更多)。用IF語句達到這個限制會很奇怪,但是在初始化大型數組時,它經常在DATA語句中達到。 –