HELIUS_ERR 可以从任何用户子例程调用,用以提交注释、警告或错误消息。
界面如下所示。
SUBROUTINE HELIUS_ERR(ERRMSG, ERRTYPE) CHARACTER(LEN=*), INTENT(IN) :: ERRMSG INTEGER, INTENT(IN) :: ERRTYPE ENDSUBROUTINE
无