SURFEX v7.3: /home/dasprezs/EXPORT_v7_3/src/LIB/FM/modd

Go to the documentation of this file.
00001 !     ######spl
00002       MODULE MODD_FMMULTI
00003 !     ####################
00004 !
00005 !!****  *MODD_FMMULTI* - declaration of global variables for multitasked FM
00006 !!
00007 !!    PURPOSE
00008 !!    -------
00009 !
00010 !       This module contains variables global to all models (tasks).
00011 !     They are used to switch on (off) the multitasked mode in the File Manager.
00012 !
00013 !!
00014 !!    IMPLICIT ARGUMENTS
00015 !!    ------------------
00016 !!
00017 !!      NONE
00018 !!
00019 !!    REFERENCE
00020 !!    ---------
00021 !!
00022 !!      see "File structure and content in the Meso-NH model"
00023 !!
00024 !!    AUTHOR
00025 !!    ------
00026 !!
00027 !!      C. FISCHER      *METEO-FRANCE*
00028 !!
00029 !!    MODIFICATIONS
00030 !!    -------------
00031 !!
00032 !!      original                                                        07/95
00033 !!
00034 !----------------------------------------------------------------------------
00035 !
00036 !*      0.    DECLARATIONS
00037 !             ------------
00038 !
00039 IMPLICIT NONE
00040 
00041 INTEGER::NFMLOC                   ! identification of the lock
00042 LOGICAL::LFMMUL=.FALSE.           ! becomes TRUE if multitasking is asked
00043 
00044       END MODULE MODD_FMMULTI