一个简单的FORTRAN程序,

问题描述:

一个简单的FORTRAN程序,
IF(IDBG.GE.1)THEN
WRITE(MAXWRT_MAXBUF(1),9010) FT,DKA,DKR
CALL DMS_WRTTRM(1)
ENDIF

我知道 这个很简单