1 | MODULE YOMSC2 |
---|
2 | |
---|
3 | USE PARKIND1 ,ONLY : JPIM |
---|
4 | |
---|
5 | IMPLICIT NONE |
---|
6 | |
---|
7 | SAVE |
---|
8 | |
---|
9 | ! ------------------------------------------------------------------ |
---|
10 | |
---|
11 | ! NSLWIDE : NUMBER OF "ROWS" THE MODEL LAGGED PART RUNS BEHIND |
---|
12 | ! NOBWIDE : NUMBER OF "ROWS" FOR OBSERVATION HALO |
---|
13 | ! NRIWIDEN : NUMBER OF "ROWS" FOR RADIATION INPUT NORTH (MODEL GRID) |
---|
14 | ! NRIWIDES : NUMBER OF "ROWS" FOR RADIATION INPUT SOUTH (MODEL GRID) |
---|
15 | ! NRIWIDEW : NUMBER OF "ROWS" FOR RADIATION INPUT WEST (MODEL GRID) |
---|
16 | ! NRIWIDEE : NUMBER OF "ROWS" FOR RADIATION INPUT EAST (MODEL GRID) |
---|
17 | ! NROWIDEN : NUMBER OF "ROWS" FOR RADIATION OUTPUT NORTH (RADIATION GRID) |
---|
18 | ! NROWIDES : NUMBER OF "ROWS" FOR RADIATION OUTPUT SOUTH (RADIATION GRID) |
---|
19 | ! NROWIDEW : NUMBER OF "ROWS" FOR RADIATION OUTPUT WEST (RADIATION GRID) |
---|
20 | ! NROWIDEE : NUMBER OF "ROWS" FOR RADIATION OUTPUT EAST (RADIATION GRID) |
---|
21 | ! NFLDSLB1 : NUMBER OF FIELDS IN SEMI-LAGRANGIAN BUFFER 1 |
---|
22 | ! NFLDSLB2 : NUMBER OF FIELDS IN SEMI-LAGRANGIAN BUFFER 2 |
---|
23 | ! NFLDOBB1 : NUMBER OF FIELDS IN OBSERVATION BUFFER 1 |
---|
24 | ! NFLDSLB15 : NUMBER OF FIELDS IN SEMI-LAGRANGIAN BUFFER 15 (TL and adjoint) |
---|
25 | ! NDIST : START ADRESS FOR EACH ROW IN GRID-POINT CALCULATIONS |
---|
26 | ! NDIEND : END ADRESS FOR EACH ROW IN GRID-POINT CALCULATIONS |
---|
27 | ! NCIST : START ADRESS FOR EACH ROW OF GRID-POINT FIELD IN BUFFER |
---|
28 | ! NCIEND : END ADRESS FOR EACH ROW OF GRID-POINT FIELD IN BUFFER |
---|
29 | |
---|
30 | INTEGER(KIND=JPIM),ALLOCATABLE:: NDIST(:) |
---|
31 | INTEGER(KIND=JPIM),ALLOCATABLE:: NDIEND(:) |
---|
32 | INTEGER(KIND=JPIM),ALLOCATABLE:: NCIST(:) |
---|
33 | INTEGER(KIND=JPIM),ALLOCATABLE:: NCIEND(:) |
---|
34 | |
---|
35 | INTEGER(KIND=JPIM) :: NSLWIDE |
---|
36 | INTEGER(KIND=JPIM) :: NFLDSLB1 |
---|
37 | INTEGER(KIND=JPIM) :: NFLDSLB2 |
---|
38 | INTEGER(KIND=JPIM) :: NFLDOBB1 |
---|
39 | INTEGER(KIND=JPIM) :: NFLDSLB15 |
---|
40 | INTEGER(KIND=JPIM) :: NOBWIDE |
---|
41 | INTEGER(KIND=JPIM) :: NRIWIDEN |
---|
42 | INTEGER(KIND=JPIM) :: NRIWIDES |
---|
43 | INTEGER(KIND=JPIM) :: NRIWIDEW |
---|
44 | INTEGER(KIND=JPIM) :: NRIWIDEE |
---|
45 | INTEGER(KIND=JPIM) :: NROWIDEN |
---|
46 | INTEGER(KIND=JPIM) :: NROWIDES |
---|
47 | INTEGER(KIND=JPIM) :: NROWIDEW |
---|
48 | INTEGER(KIND=JPIM) :: NROWIDEE |
---|
49 | |
---|
50 | !----------------------------------------------------------------------- |
---|
51 | END MODULE YOMSC2 |
---|