As the Fortran language evolves, it is only natural that the ... Fortran 90 CALL SUB(A,B,C,RET_CODE) SELECT CASE (RET_CODE) CASE (1) ⋮ CASE (2) ⋮ CASE (3) ...
確定! 回上一頁