source: CPL/oasis3/trunk/src/mod/oasis3/src/mod_label.F90 @ 1677

Last change on this file since 1677 was 1677, checked in by aclsce, 12 years ago

Imported oasis3 (tag ipslcm5a) from cvs server to svn server (igcmg project).

File size: 1.7 KB
Line 
1MODULE mod_label
2!
3! -- label.h   18-08-95   Version 2.0beta   Author: Laurent Terray
4!    *******   01-02-96   Version 2.0 : disparition of ctranam
5!              07-08-96   Version 2.1 : rise of cfldlab dimension
6!              25-09-96   Version 2.1 : rise of cfldlab length
7!@
8!@  Contents : variables related to labelling files and character variable
9!@  --------
10!@
11!@ -- cfldlab : field label definition (1D)
12!@
13!@ -- cgrdnam : name for grid file
14!@
15!@ -- cmsknam : name for mask file
16!@
17!@ -- csurnam : name for surface file
18!@
19!@ -- cglonsuf : suffix name for longitude grid file locator
20!@
21!@ -- cglatsuf : suffix name for longitude latitude grid file locator
22!@
23!@ -- cmsksuf : suffix name for mask file locator
24!@
25!@ -- crnlonsuf : suffix name for corner longitude grid file locator
26!@
27!@ -- crnlatsuf : suffix name for corner latitude grid file locator
28!@
29!@ -- csursuf : suffix name for surface file locator
30!@
31!@ -- crednam : name for reduced gaussian grid masks file
32!@
33! -------------------------------------------------------------------
34!
35  CHARACTER(len=64),ALLOCATABLE::cfldlab(:)
36  CHARACTER(len=5), PARAMETER :: cgrdnam = 'grids' 
37  CHARACTER(len=5), PARAMETER :: cmsknam = 'masks' 
38  CHARACTER(len=5), PARAMETER :: csurnam = 'areas' 
39  CHARACTER(len=5), PARAMETER :: crednam = 'maskr'
40  CHARACTER(len=4), PARAMETER :: cglonsuf = '.lon'
41  CHARACTER(len=4), PARAMETER :: cglatsuf = '.lat'
42  CHARACTER(len=4), PARAMETER :: crnlonsuf = '.clo'
43  CHARACTER(len=4), PARAMETER :: crnlatsuf = '.cla'
44  CHARACTER(len=4), PARAMETER :: cmsksuf = '.msk'
45  CHARACTER(len=4), PARAMETER :: csursuf = '.srf'
46!
47END MODULE mod_label
48! -------------------------------------------------------------------
49
Note: See TracBrowser for help on using the repository browser.