SURFEX v8.1
General documentation of Surfex
modd_fmmulti.F90
Go to the documentation of this file.
1 ! ######spl
2  MODULE modd_fmmulti
3 ! ####################
4 !
5 !!**** *MODD_FMMULTI* - declaration of global variables for multitasked FM
6 !!
7 !! PURPOSE
8 !! -------
9 !
10 ! This module contains variables global to all models (tasks).
11 ! They are used to switch on (off) the multitasked mode in the File Manager.
12 !
13 !!
14 !! IMPLICIT ARGUMENTS
15 !! ------------------
16 !!
17 !! NONE
18 !!
19 !! REFERENCE
20 !! ---------
21 !!
22 !! see "File structure and content in the Meso-NH model"
23 !!
24 !! AUTHOR
25 !! ------
26 !!
27 !! C. FISCHER *METEO-FRANCE*
28 !!
29 !! MODIFICATIONS
30 !! -------------
31 !!
32 !! original 07/95
33 !!
34 !----------------------------------------------------------------------------
35 !
36 !* 0. DECLARATIONS
37 ! ------------
38 !
39 IMPLICIT NONE
40 
41 INTEGER::nfmloc ! identification of the lock
42 LOGICAL::lfmmul=.false. ! becomes TRUE if multitasking is asked
43 
44  END MODULE modd_fmmulti
logical lfmmul
integer nfmloc