69 lines
2.2 KiB
HTML
69 lines
2.2 KiB
HTML
INTEGER NTRAC ! Number of tracers
|
|
INTEGER NX ! State space
|
|
INTEGER NY ! Measurment space
|
|
INTEGER NYY
|
|
INTEGER IIGR ! Gridsize of data
|
|
INTEGER JJGR ! Gridsize of data
|
|
INTEGER LLGR ! Gridsize of data
|
|
INTEGER II1 ! start index for i-grid
|
|
INTEGER II2 ! end index for i-grid
|
|
INTEGER JJ1 ! start index for j-grid
|
|
INTEGER JJ2 ! end index for j-grid
|
|
INTEGER NAS ! number of pts in nmc asia grid
|
|
|
|
REAL LON_lim1 ! min longitude box
|
|
REAL LON_lim2 ! max longitude box
|
|
REAL LAT_lim1 ! min latitude box
|
|
REAL LAT_lim2 ! max latitude box
|
|
|
|
|
|
PARAMETER ( NTRAC = 1 ) ! Tagged tracers (+1 for total CO)
|
|
! PARAMETER ( NX = 8 )
|
|
PARAMETER ( NX = 14 )
|
|
PARAMETER ( NY = 2500 ) ! MAX due to svdcmp.f
|
|
PARAMETER ( NYY = 5000 ) ! MAX due to svdcmp.f
|
|
|
|
! Window #1 :
|
|
! lon [180W ; 15W]
|
|
! lat [ 0N ; 76N]
|
|
! PARAMETER ( IIGR = 67 ) ! 67 = [180W - 15W]
|
|
! PARAMETER ( JJGR = 39 ) ! 34 = [0N - 76N]
|
|
! PARAMETER ( LLGR = 1 )
|
|
! PARAMETER ( II1 = 1 ) ! 0 = 180W
|
|
! PARAMETER ( II2 = 67 ) ! 66 = 15W
|
|
! PARAMETER ( JJ1 = 47 ) ! 50 = 0N
|
|
! PARAMETER ( JJ2 = 85 ) ! 83 = 76N
|
|
! PARAMETER ( NAS = 2613 ) ! IIGR*JJGR
|
|
|
|
! Window #2 : [reduced window]
|
|
! lon [167.5W ; 45W]
|
|
! lat [ 16N ; 70N]
|
|
! PARAMETER ( IIGR = 50 )
|
|
! PARAMETER ( JJGR = 28 )
|
|
! PARAMETER ( LLGR = 1 )
|
|
! PARAMETER ( II1 = 6 )
|
|
! PARAMETER ( II2 = 55 )
|
|
! PARAMETER ( JJ1 = 54 )
|
|
! PARAMETER ( JJ2 = 81 )
|
|
! PARAMETER ( NAS = 1400 ) ! IIGR*JJGR
|
|
|
|
! Window #3 : [reduced window for Alaska and Canada]
|
|
! lon [167.5W ; 45W]
|
|
! lat [ 30N ; 70N]
|
|
PARAMETER ( IIGR = 50 )
|
|
PARAMETER ( JJGR = 21 )
|
|
PARAMETER ( LLGR = 1 )
|
|
PARAMETER ( II1 = 6 )
|
|
PARAMETER ( II2 = 55 )
|
|
PARAMETER ( JJ1 = 61 )
|
|
PARAMETER ( JJ2 = 81 )
|
|
PARAMETER ( NAS = 1050 ) ! IIGR*JJGR
|
|
|
|
|
|
! Read MOPITT data and model outputs directly: (timedep inversion)
|
|
PARAMETER (LAT_Lim1 = 30.)
|
|
PARAMETER (LAT_Lim2 = 75.)
|
|
PARAMETER (LON_Lim1 = -167.5)
|
|
PARAMETER (LON_Lim2 = -30.)
|
|
|