w3adatmd.F90 File Reference

Define data structures to set up wave model auxiliary data for several models simultaneously. More...

Go to the source code of this file.

Data Types
type	w3adatmd::wadat

Modules
module	w3adatmd
	Define data structures to set up wave model auxiliary data for several models simultaneously.

Functions/Subroutines
subroutine	w3adatmd::w3naux (NDSE, NDST)
	Set up the number of grids to be used. More...
subroutine	w3adatmd::w3dima (IMOD, NDSE, NDST, D_ONLY)
	Initialize an individual data grid at the proper dimensions. More...
subroutine	w3adatmd::w3xdma (IMOD, NDSE, NDST, OUTFLAGS)
	Version of W3DIMX for extended ouput arrays only. More...
subroutine	w3adatmd::w3dmnl (IMOD, NDSE, NDST, NSP, NSPX)
	Initialize an individual data grid at the proper dimensions (DIA). More...
subroutine	w3adatmd::w3seta (IMOD, NDSE, NDST)
	Select one of the WAVEWATCH III grids / models. More...
subroutine	w3adatmd::w3xeta (IMOD, NDSE, NDST)
	Reduced version of W3SETA to point to expended output arrays. More...

Variables
integer	w3adatmd::nadata = -1
integer	w3adatmd::iadata = -1
integer, parameter	w3adatmd::mpibuf = 6
type(wadat), dimension(:), allocatable, target	w3adatmd::wadats
real, dimension(:,:), pointer	w3adatmd::cg
real, dimension(:,:), pointer	w3adatmd::wn
real, dimension(:,:), pointer	w3adatmd::ic3wn_r
real, dimension(:,:), pointer	w3adatmd::ic3wn_i
real, dimension(:,:), pointer	w3adatmd::ic3cg
real, dimension(:), pointer	w3adatmd::ca0
real, dimension(:), pointer	w3adatmd::cai
real, dimension(:), pointer	w3adatmd::cd0
real, dimension(:), pointer	w3adatmd::cdi
real, dimension(:), pointer	w3adatmd::ua0
real, dimension(:), pointer	w3adatmd::uai
real, dimension(:), pointer	w3adatmd::ud0
real, dimension(:), pointer	w3adatmd::udi
real, dimension(:), pointer	w3adatmd::ma0
real, dimension(:), pointer	w3adatmd::mai
real, dimension(:), pointer	w3adatmd::ra0
real, dimension(:), pointer	w3adatmd::rai
real, dimension(:), pointer	w3adatmd::md0
real, dimension(:), pointer	w3adatmd::mdi
real, dimension(:), pointer	w3adatmd::as0
real, dimension(:), pointer	w3adatmd::asi
real, dimension(:,:), pointer	w3adatmd::atrnx
real, dimension(:,:), pointer	w3adatmd::atrny
real, dimension(:), pointer	w3adatmd::dw
real, dimension(:), pointer	w3adatmd::ua
real, dimension(:), pointer	w3adatmd::ud
real, dimension(:), pointer	w3adatmd::u10
real, dimension(:), pointer	w3adatmd::u10d
real, dimension(:), pointer	w3adatmd::as
real, dimension(:), pointer	w3adatmd::cx
real, dimension(:), pointer	w3adatmd::cy
real, dimension(:), pointer	w3adatmd::taua
real, dimension(:), pointer	w3adatmd::tauadir
real, dimension(:), pointer	w3adatmd::hs
real, dimension(:), pointer	w3adatmd::wlm
real, dimension(:), pointer	w3adatmd::t02
real, dimension(:), pointer	w3adatmd::t0m1
real, dimension(:), pointer	w3adatmd::t01
real, dimension(:), pointer	w3adatmd::fp0
real, dimension(:), pointer	w3adatmd::thm
real, dimension(:), pointer	w3adatmd::ths
real, dimension(:), pointer	w3adatmd::thp0
real, dimension(:), pointer	w3adatmd::hsig
real, dimension(:), pointer	w3adatmd::stmaxe
real, dimension(:), pointer	w3adatmd::stmaxd
real, dimension(:), pointer	w3adatmd::hmaxe
real, dimension(:), pointer	w3adatmd::hcmaxe
real, dimension(:), pointer	w3adatmd::hmaxd
real, dimension(:), pointer	w3adatmd::hcmaxd
real, dimension(:), pointer	w3adatmd::qp
real, dimension(:), pointer	w3adatmd::wbt
real, dimension(:), pointer	w3adatmd::wnmean
real, dimension(:,:), pointer	w3adatmd::ef
real, dimension(:,:), pointer	w3adatmd::th1m
real, dimension(:,:), pointer	w3adatmd::sth1m
real, dimension(:,:), pointer	w3adatmd::th2m
real, dimension(:,:), pointer	w3adatmd::sth2m
real, dimension(:,:), pointer	w3adatmd::phs
real, dimension(:,:), pointer	w3adatmd::ptp
real, dimension(:,:), pointer	w3adatmd::plp
real, dimension(:,:), pointer	w3adatmd::pdir
real, dimension(:,:), pointer	w3adatmd::psi
real, dimension(:,:), pointer	w3adatmd::pws
real, dimension(:), pointer	w3adatmd::pwst
real, dimension(:), pointer	w3adatmd::pnr
real, dimension(:,:), pointer	w3adatmd::pgw
real, dimension(:,:), pointer	w3adatmd::psw
real, dimension(:,:), pointer	w3adatmd::pthp0
real, dimension(:,:), pointer	w3adatmd::pqp
real, dimension(:,:), pointer	w3adatmd::ppe
real, dimension(:,:), pointer	w3adatmd::ptm1
real, dimension(:,:), pointer	w3adatmd::pt1
real, dimension(:,:), pointer	w3adatmd::pt2
real, dimension(:,:), pointer	w3adatmd::pep
real, dimension(:), pointer	w3adatmd::charn
real, dimension(:), pointer	w3adatmd::cge
real, dimension(:), pointer	w3adatmd::phiaw
real, dimension(:), pointer	w3adatmd::tauwix
real, dimension(:), pointer	w3adatmd::tauwiy
real, dimension(:), pointer	w3adatmd::tauwnx
real, dimension(:), pointer	w3adatmd::tauwny
real, dimension(:,:), pointer	w3adatmd::whitecap
real, dimension(:), pointer	w3adatmd::tws
real, dimension(:), pointer	w3adatmd::sxx
real, dimension(:), pointer	w3adatmd::syy
real, dimension(:), pointer	w3adatmd::sxy
real, dimension(:), pointer	w3adatmd::tauox
real, dimension(:), pointer	w3adatmd::tauoy
real, dimension(:), pointer	w3adatmd::bhd
real, dimension(:), pointer	w3adatmd::phioc
real, dimension(:), pointer	w3adatmd::tusx
real, dimension(:), pointer	w3adatmd::tusy
real, dimension(:), pointer	w3adatmd::ussx
real, dimension(:), pointer	w3adatmd::ussy
real, dimension(:), pointer	w3adatmd::tauocx
real, dimension(:), pointer	w3adatmd::tauocy
real, dimension(:), pointer	w3adatmd::prms
real, dimension(:), pointer	w3adatmd::tpms
real, dimension(:), pointer	w3adatmd::phice
real, dimension(:,:), pointer	w3adatmd::tauice
real, dimension(:,:), pointer	w3adatmd::p2sms
real, dimension(:,:), pointer	w3adatmd::us3d
real, dimension(:,:), pointer	w3adatmd::ussp
real, dimension(:), pointer	w3adatmd::aba
real, dimension(:), pointer	w3adatmd::abd
real, dimension(:), pointer	w3adatmd::uba
real, dimension(:), pointer	w3adatmd::ubd
real, dimension(:,:), pointer	w3adatmd::bedforms
real, dimension(:), pointer	w3adatmd::phibbl
real, dimension(:,:), pointer	w3adatmd::taubbl
real, dimension(:), pointer	w3adatmd::mssx
real, dimension(:), pointer	w3adatmd::mssy
real, dimension(:), pointer	w3adatmd::mssd
real, dimension(:), pointer	w3adatmd::mscx
real, dimension(:), pointer	w3adatmd::mscy
real, dimension(:), pointer	w3adatmd::mscd
real, dimension(:), pointer	w3adatmd::qkk
real, dimension(:), pointer	w3adatmd::skew
real, dimension(:), pointer	w3adatmd::embia1
real, dimension(:), pointer	w3adatmd::embia2
real, dimension(:), pointer	w3adatmd::dtdyn
real, dimension(:), pointer	w3adatmd::fcut
real, dimension(:), pointer	w3adatmd::cflxymax
real, dimension(:), pointer	w3adatmd::cflthmax
real, dimension(:), pointer	w3adatmd::cflkmax
real, dimension(:,:), pointer	w3adatmd::usero
real, dimension(:,:), pointer	w3adatmd::dddx
real, dimension(:,:), pointer	w3adatmd::dddy
real, dimension(:,:), pointer	w3adatmd::dcxdx
real, dimension(:,:), pointer	w3adatmd::dcydx
real, dimension(:,:), pointer	w3adatmd::dcxdy
real, dimension(:,:), pointer	w3adatmd::dcydy
real, dimension(:,:,:), pointer	w3adatmd::dcdx
real, dimension(:,:,:), pointer	w3adatmd::dcdy
real, dimension(:), pointer	w3adatmd::dhdx
real, dimension(:), pointer	w3adatmd::dhdy
real, dimension(:,:), pointer	w3adatmd::dhlmt
integer, dimension(:), pointer	w3adatmd::is0
integer, dimension(:), pointer	w3adatmd::is2
real, dimension(:), pointer	w3adatmd::facvx
real, dimension(:), pointer	w3adatmd::facvy
integer, pointer	w3adatmd::nmx0
integer, pointer	w3adatmd::nmx1
integer, pointer	w3adatmd::nmx2
integer, pointer	w3adatmd::nmy0
integer, pointer	w3adatmd::nmy1
integer, pointer	w3adatmd::nmy2
integer, pointer	w3adatmd::nact
integer, pointer	w3adatmd::nmxy
integer, dimension(:), pointer	w3adatmd::mapx2
integer, dimension(:), pointer	w3adatmd::mapy2
integer, dimension(:), pointer	w3adatmd::mapaxy
integer, dimension(:), pointer	w3adatmd::mapxy
integer, dimension(:), pointer	w3adatmd::mapth2
integer, dimension(:), pointer	w3adatmd::mapwn2
integer, pointer	w3adatmd::ncent
integer, dimension(:), pointer	w3adatmd::mapcxy
logical, dimension(:), pointer	w3adatmd::maptrn
integer, dimension(:,:), pointer	w3adatmd::iter
integer, pointer	w3adatmd::nfr
integer, pointer	w3adatmd::nfrhgh
integer, pointer	w3adatmd::nfrchg
integer, pointer	w3adatmd::nspecx
integer, pointer	w3adatmd::nspecy
integer, dimension(:), pointer	w3adatmd::ip11
integer, dimension(:), pointer	w3adatmd::ip12
integer, dimension(:), pointer	w3adatmd::ip13
integer, dimension(:), pointer	w3adatmd::ip14
integer, dimension(:), pointer	w3adatmd::im11
integer, dimension(:), pointer	w3adatmd::im12
integer, dimension(:), pointer	w3adatmd::im13
integer, dimension(:), pointer	w3adatmd::im14
integer, dimension(:), pointer	w3adatmd::ip21
integer, dimension(:), pointer	w3adatmd::ip22
integer, dimension(:), pointer	w3adatmd::ip23
integer, dimension(:), pointer	w3adatmd::ip24
integer, dimension(:), pointer	w3adatmd::im21
integer, dimension(:), pointer	w3adatmd::im22
integer, dimension(:), pointer	w3adatmd::im23
integer, dimension(:), pointer	w3adatmd::im24
integer, dimension(:), pointer	w3adatmd::ic11
integer, dimension(:), pointer	w3adatmd::ic12
integer, dimension(:), pointer	w3adatmd::ic21
integer, dimension(:), pointer	w3adatmd::ic22
integer, dimension(:), pointer	w3adatmd::ic31
integer, dimension(:), pointer	w3adatmd::ic32
integer, dimension(:), pointer	w3adatmd::ic41
integer, dimension(:), pointer	w3adatmd::ic42
integer, dimension(:), pointer	w3adatmd::ic51
integer, dimension(:), pointer	w3adatmd::ic52
integer, dimension(:), pointer	w3adatmd::ic61
integer, dimension(:), pointer	w3adatmd::ic62
integer, dimension(:), pointer	w3adatmd::ic71
integer, dimension(:), pointer	w3adatmd::ic72
integer, dimension(:), pointer	w3adatmd::ic81
integer, dimension(:), pointer	w3adatmd::ic82
real, pointer	w3adatmd::dal1
real, pointer	w3adatmd::dal2
real, pointer	w3adatmd::dal3
real, pointer	w3adatmd::awg1
real, pointer	w3adatmd::awg2
real, pointer	w3adatmd::awg3
real, pointer	w3adatmd::awg4
real, pointer	w3adatmd::awg5
real, pointer	w3adatmd::awg6
real, pointer	w3adatmd::awg7
real, pointer	w3adatmd::awg8
real, pointer	w3adatmd::swg1
real, pointer	w3adatmd::swg2
real, pointer	w3adatmd::swg3
real, pointer	w3adatmd::swg4
real, pointer	w3adatmd::swg5
real, pointer	w3adatmd::swg6
real, pointer	w3adatmd::swg7
real, pointer	w3adatmd::swg8
real, dimension(:), pointer	w3adatmd::af11
logical, pointer	w3adatmd::nlinit
integer, dimension(:), pointer	w3adatmd::iappro
integer, pointer	w3adatmd::mpi_comm_wave
integer, pointer	w3adatmd::mpi_comm_wcmp
integer, pointer	w3adatmd::ww3_field_vec
integer, pointer	w3adatmd::ww3_spec_vec
integer, pointer	w3adatmd::nrqsg1
integer, pointer	w3adatmd::nrqsg2
integer, pointer	w3adatmd::ibfloc
integer, pointer	w3adatmd::isploc
integer, pointer	w3adatmd::nsploc
integer, dimension(:), pointer	w3adatmd::bstat
integer, dimension(:), pointer	w3adatmd::bispl
integer, dimension(:,:), pointer	w3adatmd::irqsg1
integer, dimension(:,:), pointer	w3adatmd::irqsg2
real, dimension(:,:), pointer	w3adatmd::gstore
real, dimension(:,:), pointer	w3adatmd::sstore
real, dimension(:,:,:), pointer	w3adatmd::sppnt
integer, pointer	w3adatmd::itime
integer, pointer	w3adatmd::ipass
integer, pointer	w3adatmd::idlast
integer, pointer	w3adatmd::nsealm
real, dimension(:,:), pointer	w3adatmd::alpha
logical, pointer	w3adatmd::ainit
logical, pointer	w3adatmd::ainit2
logical, pointer	w3adatmd::fl_all
logical, pointer	w3adatmd::flcold
logical, pointer	w3adatmd::fliwnd

Detailed Description

Define data structures to set up wave model auxiliary data for several models simultaneously.

Author

H. L. Tolman

Date

22-Mar-2021

Definition in file w3adatmd.F90.