NCEPLIBS-bufr  11.5.0
 All Data Structures Files Functions Variables Pages
moda_usrtmp.F
1  MODULE moda_usrtmp
2 
3 #ifndef MAXJL_H
4 #define MAXJL_H
5  USE modv_maxjl
6 #endif
7 
8  parameter( maxrcr = 100 )
9 #ifdef DYNAMIC_ALLOCATION
10  INTEGER, ALLOCATABLE :: iutmp(:,:)
11  REAL*8, ALLOCATABLE :: vutmp(:,:)
12 #else
13  INTEGER :: iutmp(maxjl,maxrcr)
14  REAL*8 :: vutmp(maxjl,maxrcr)
15 #endif
16 
17  END MODULE
This module declares and initializes the MAXJL variable.
Definition: modv_MAXJL.F:16