BROWSER/doc_surf81/facom2_8llmoer_8h_source.html

 !
 !       Fonction servant a rendre fatale ou non une erreur detectee,
 !       a l'aide du code reponse courant, du niveau de filtrage global,
 !       et de l'option d'erreur fatale propre au fichier.
 !       s'il n'y a pas de fichier (I5678=0, d'ou dimensionnement de
 !          *LERRFA*), le niveau de filtrage joue le role principal.
 !
 LOGICAL FUNCTION LLMOER (I1234,I5678)
 INTEGER (KIND=JPLIKB) :: I1234,I5678
 LLMOER=I1234.EQ.-66_JPLIKB .OR. (I1234.NE.0_JPLIKB .AND.(FA%NRFAGA.EQ.0_JPLIKB &
      & .OR. (FA%NRFAGA.EQ.1_JPLIKB .AND.FA%FICHIER(I5678)%LERRFA)))
 END FUNCTION
fatale
subroutine fatale(KREP, KNUMER, LDERFA)
Definition: fatale.F90:104

a
ERROR in a
Definition: ecsort_shared.h:90

detectee
! Fonction servant a rendre fatale ou non une erreur detectee
Definition: facom2.llmoer.h:2

n
ERROR in n
Definition: ecsort_shared.h:90

INTEGER
INTERFACE SUBROUTINE JPRB IMPLICIT NONE INTEGER(KIND=JPIM)

FA
INTERFACE SUBROUTINE FACILO_MT && FA
Definition: facilo_mt.h:4

LOGICAL
INTERFACE SUBROUTINE JPRB IMPLICIT NONE LOGICAL
Definition: dr_hook_util.h:3

FICHIER
! FONCTION SERVANT A RENDRE FATALE OU NON UNE ERREUR ! A L AIDE DU CODE REPONSE DU NIVEAU DE FILTRAGE ! ET DE L OPTION D ERREUR FATALE PROPRE AU FICHIER ! S IL N Y A PAS DE FICHIER(I5678=0, D 'OU DIMENSIONNEMENT DE ! *LERFAT *)

ieee754_double::d
double d
Definition: ieee754.h:21