Back to OASIS3 home
Modules used for the
coupler (in oasis3/src) :
mod_anais : contains variables and arrays related to the ANAIS
interpolator
used in interp.F
!@ Anaism --->>>
!@ -- nmesh : number of ocean gcm-1 squares overlapped by a given gcm-2
square (1D)
!@ -- amint : weight for each gcm-1 mesh proportional to overlapped
area (1D)
!@ -- nmint : neighbors adress on gcm-1 grid for a given gcm-2 grid
point (1D)
!@ -- naismfl : flag to identify different ANAISM parameter sets (1D)
!@ -- naismvoi : maximum number of overlapped neighbors (1D)
!@ -- niwtm : flag to read/write ANAISM parameters (1D)
!@ Anaisg --->>>
!@ -- agint : weight for each gcm-1 grid point with gaussian
distribution (1D)
!@ -- ngint : neighbors adress on gcm-1 grid for a given gcm-2 grid
point (1D)
!@ -- varmul : variance multiplicator
!@ -- naisgfl : flag to identify different ANAISG parameter sets (1D)
!@ -- naisgvoi : maximum number of used neighbors (1D)
!@ -- niwtg : flag to read/write ANAISG parameters (1D)
!@ Common --->>>
!@ -- linit : I/O initialization flag for each field
!
-------------------------------------------------------------------
USE mod_kinds_oasis
INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE ::
ngint,nmint,nmesh
INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: naismfl,
naisgfl
INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE ::
naismvoi, naisgvoi
INTEGER (kind=ip_intwp_p), DIMENSION(:), ALLOCATABLE :: niwtm,
niwtg
REAL (kind=ip_realwp_p), DIMENSION(:), ALLOCATABLE :: agint,
amint, varmul
LOGICAL, DIMENSION(:), ALLOCATABLE :: linit
!
-------------------------------------------------------------------