SURFACE_FIELDS – Fortran Program

Uses

- YOMCT0
- YOMLUN
- YOMDIM
- PARKIND1
- yomhook
- YOMDYN
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Variables

JPMAXSFLDS JPMAXSTRAJ NSURF NSURFL NDIMSURF NDIMSURFL NPROGSURF NPROGSURFL NOFFTRAJ NOFFTRAJ_CST NPTRSURF NSTRAJGRIB SURF_STORE_ARRAY SP_SB YSP_SBD YSP_SB SP_SG YSP_SGD YSP_SG SP_RR YSP_RRD YSP_RR SP_EP YSP_EPD YSP_EP SP_X2 YSP_X2D YSP_X2 SP_CI YSP_CID YSP_CI SD_VF YSD_VFD YSD_VF SD_VP YSD_VPD YSD_VP SD_VV YSD_VVD YSD_VV SD_VN YSD_VND YSD_VN SD_VH YSD_VHD YSD_VH SD_VA YSD_VAD YSD_VA SD_VC YSD_VCD YSD_VC SD_VD YSD_VDD YSD_VD SD_WS YSD_WSD YSD_WS SD_VX YSD_VXD YSD_VX SD_XA YSD_XAD YSD_XA SD_X2 YSD_X2D YSD_X2

Subroutines

INI_SFLP3 SETUP_SFLP3 INI_SFLP2 SETUP_SFLP2 GPPOPER GPOPER GPOPER_2 GPOPER_3 SURF_STORE SURF_RESTORE ALLO_SURF DEALLO_SURF

Variables

Type	Visibility	Attributes		Name		Initial
integer(kind=JPIM),	public,	parameter	::	JPMAXSFLDS	=	100
integer(kind=JPIM),	public,	parameter	::	JPMAXSTRAJ	=	100
integer(kind=JPIM),	public		::	NSURF	=	0
integer(kind=JPIM),	public		::	NSURFL	=	0
integer(kind=JPIM),	public		::	NDIMSURF	=	0
integer(kind=JPIM),	public		::	NDIMSURFL	=	0
integer(kind=JPIM),	public		::	NPROGSURF	=	0
integer(kind=JPIM),	public		::	NPROGSURFL	=	0
integer(kind=JPIM),	public		::	NOFFTRAJ
integer(kind=JPIM),	public		::	NOFFTRAJ_CST
integer(kind=JPIM),	public		::	NPTRSURF
integer(kind=JPIM),	public		::	NSTRAJGRIB(JPMAXSTRAJ)
real(kind=JPRB),	public,	ALLOCATABLE	::	SURF_STORE_ARRAY(:,:,:)
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_SB(:,:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_SBD
type(TYPE_SFL_SOILB),	public		::	YSP_SB
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_SG(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_SGD
type(TYPE_SFL_SNOWG),	public		::	YSP_SG
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_RR(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_RRD
type(TYPE_SFL_RESVR),	public		::	YSP_RR
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_EP(:,:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_EPD
type(TYPE_SFL_EXTRP),	public		::	YSP_EP
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_X2(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_X2D
type(TYPE_SFL_XTRP2),	public		::	YSP_X2
real(kind=JPRB),	public,	ALLOCATABLE	::	SP_CI(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSP_CID
type(TYPE_SFL_CANRI),	public		::	YSP_CI
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VF(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VFD
type(TYPE_SFL_VARSF),	public		::	YSD_VF
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VP(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VPD
type(TYPE_SFL_VCLIP),	public		::	YSD_VP
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VV(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VVD
type(TYPE_SFL_VCLIV),	public		::	YSD_VV
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VN(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VND
type(TYPE_SFL_VCLIN),	public		::	YSD_VN
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VH(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VHD
type(TYPE_SFL_VCLIH),	public		::	YSD_VH
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VA(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VAD
type(TYPE_SFL_VCLIA),	public		::	YSD_VA
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VC(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VCD
type(TYPE_SFL_VO3ABC),	public		::	YSD_VC
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VD(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VDD
type(TYPE_SFL_VDIAG),	public		::	YSD_VD
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_WS(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_WSD
type(TYPE_SFL_WAVES),	public		::	YSD_WS
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_VX(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_VXD
type(TYPE_SFL_VCLIX),	public		::	YSD_VX
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_XA(:,:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_XAD
type(TYPE_SFL_VEXTRA),	public		::	YSD_XA
real(kind=JPRB),	public,	ALLOCATABLE	::	SD_X2(:,:,:)
type(TYPE_SURF_GEN),	public		::	YSD_X2D
type(TYPE_SFL_VEXTR2),	public		::	YSD_X2

Derived Types

type, public :: TYPE_SURF_MTL_2D

Components

Type	Visibility		Name
integer(kind=JPIM),	public	::	MP
integer(kind=JPIM),	public	::	MP0
integer(kind=JPIM),	public	::	MP9
integer(kind=JPIM),	public	::	MP1
integer(kind=JPIM),	public	::	MP5
integer(kind=JPIM),	public	::	IGRBCODE
character(len=16),	public	::	CNAME
real(kind=JPRB),	public	::	REFVALI
integer(kind=JPIM),	public	::	NREQIN
integer(kind=JPIM),	public	::	ITRAJ

type, public :: TYPE_SURF_MTL_3D

Components

Type	Visibility	Attributes		Name
integer(kind=JPIM),	public		::	MP
integer(kind=JPIM),	public		::	MP0
integer(kind=JPIM),	public		::	MP9
integer(kind=JPIM),	public		::	MP1
integer(kind=JPIM),	public		::	MP5
integer(kind=JPIM),	public,	POINTER	::	IGRBCODE(:)
character(len=16),	public,	POINTER	::	CNAME(:)
real(kind=JPRB),	public,	POINTER	::	REFVALI(:)
integer(kind=JPIM),	public,	POINTER	::	NREQIN(:)
integer(kind=JPIM),	public		::	ITRAJ

type, public :: TYPE_SURF_GEN

Components

Type	Visibility		Name
integer(kind=JPIM),	public	::	NUMFLDS
integer(kind=JPIM),	public	::	NDIM
integer(kind=JPIM),	public	::	NLEVS
integer(kind=JPIM),	public	::	IPTR
integer(kind=JPIM),	public	::	IPTR5
integer(kind=JPIM),	public	::	NDIM5
integer(kind=JPIM),	public	::	NOFFTRAJ
integer(kind=JPIM),	public	::	NOFFTRAJ_CST
character(len=16),	public	::	CGRPNAME
logical,	public	::	L3D
logical,	public	::	LMTL

type, public :: TYPE_SFL_COMM

Components

Type	Visibility		Name
integer(kind=JPIM),	public	::	IGRBCODE
logical,	public	::	L_OK
character(len=16),	public	::	CNAME
integer(kind=JPIM),	public	::	IFLDNUM
real(kind=JPRB),	public	::	VALUE
integer(kind=JPIM),	public	::	IPTRSURF
integer(kind=JPIM),	public	::	ICODES(JPMAXSFLDS)
integer(kind=JPIM),	public	::	ICOUNT

type, public :: TYPE_SFL_SOILB

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YT
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YQ
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YTL
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YSB(:)

type, public :: TYPE_SFL_SNOWG

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YA
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YT
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSG(:)

type, public :: TYPE_SFL_RESVR

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YT
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YW
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YFC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YFP1
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YRR(:)

type, public :: TYPE_SFL_WAVES

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YWS(:)
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCHAR

type, public :: TYPE_SFL_EXTRP

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YEP(:)

type, public :: TYPE_SFL_XTRP2

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YX2(:)

type, public :: TYPE_SFL_CANRI

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCI(:)

type, public :: TYPE_SFL_VARSF

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YZ0F
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALBF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YEMISF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YGETRL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YITM
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVEG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVRLAN
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVRLDI
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSIG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALBSF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCONT
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSST
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLZ0H
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCVL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCVH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTVL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTVH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCI
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YUCUR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVCUR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YZ0RLF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCO2O
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCO2B
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCO2A
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSDFOR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALUVP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALUVD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALNIP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALNID
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSF6
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YFP1
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVF(:)

type, public :: TYPE_SFL_VCLIP

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTPC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YWPC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVP(:)

type, public :: TYPE_SFL_VCLIV

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YARG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSAB
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YD2
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIVEG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YRSMIN
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLAI
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YHV
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YZ0H
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALV
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVV(:)

type, public :: TYPE_SFL_VCLIN

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTOP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YBAS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YACPR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVN(:)

type, public :: TYPE_SFL_VCLIH

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCCH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSCCH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YBCCH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YPBLH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSPSH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVH(:)

type, public :: TYPE_SFL_VCLIA

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSEA
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLAN
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSOO
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YDES
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSUL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVOL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YNUD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVA(:)

type, public :: TYPE_SFL_VCLIG

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YICFR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSOUP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIRUP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCHSS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YEVAP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTAUX
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTAUY
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVG(:)

type, public :: TYPE_SFL_VO3ABC

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YA
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YB
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVC(:)

type, public :: TYPE_SFL_VDIAG

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLSP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YBLD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSSHF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSLHF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YMSL
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	Y10U
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	Y10V
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	Y2T
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	Y2D
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSSR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSTR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTSR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTTR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YEWSS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YNSSS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YE
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCCC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLCC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YMCC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YHCC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLGWS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YMGWS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YGWD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YMX2T
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YMN2T
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YRO
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YALB
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIEWSS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YINSSS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YISSHF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIE
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCSF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLSSF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YZ0F
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLZ0H
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCW
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCWV
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCLW
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCIW
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSSRD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSTRD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YBLH
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSUND
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSPAR
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSUVB
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YCAPE
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTSRC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTTRC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSSRC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSTRC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YES
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSMLT
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	Y10FG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLSPF
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCO3
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVIMD
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSPARC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSTINC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCGHG(:)
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCGRG(:)
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTCTRAC(:)
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVD(:)

type, public :: TYPE_SFL_VCLIX

Components

Type	Visibility	Attributes		Name
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YORO
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTSC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YPWS
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YPWP
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSNO
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YTPC
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YSAB
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YXD2
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YLSM
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YIVEG
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YVX(:)

type, public :: TYPE_SFL_VEXTRA

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_3D),	public,	POINTER	::	YXA(:)

type, public :: TYPE_SFL_VEXTR2

Components

Type	Visibility	Attributes		Name		Initial
type(TYPE_SURF_MTL_2D),	public,	POINTER	::	YX2(:)

Subroutines

public subroutine INI_SFLP3(YDSC, YD, KFLDS, KLEVS, LDMTL, CDGRPNAME)

Arguments

Type	Intent		Name
type(TYPE_SURF_GEN),	intent(inout)	::	YDSC
type(TYPE_SURF_MTL_3D),	intent(inout)	::	YD(:)
integer(kind=JPIM),	intent(in)	::	KFLDS
integer(kind=JPIM),	intent(in)	::	KLEVS
logical,	intent(in)	::	LDMTL
character(len=*),	intent(in)	::	CDGRPNAME

public subroutine SETUP_SFLP3(YDSC, YD, KGRIB, CDNAME, PDEFAULT, KTRAJ, KREQIN)

Arguments

Type	Intent	Optional		Name
type(TYPE_SURF_GEN),	intent(inout)		::	YDSC
type(TYPE_SURF_MTL_3D),	intent(inout)		::	YD
integer(kind=JPIM),	intent(in),	optional	::	KGRIB(:)
character(len=16),	intent(in),	optional	::	CDNAME(:)
real(kind=JPRB),	intent(in),	optional	::	PDEFAULT(:)
integer(kind=JPIM),	intent(in),	optional	::	KTRAJ
integer(kind=JPIM),	intent(in),	optional	::	KREQIN(:)

public subroutine INI_SFLP2(YDSC, YD, KFLDS, LDMTL, CDGRPNAME)

Arguments

Type	Intent		Name
type(TYPE_SURF_GEN),	intent(inout)	::	YDSC
type(TYPE_SURF_MTL_2D),	intent(inout)	::	YD(:)
integer(kind=JPIM),	intent(in)	::	KFLDS
logical,	intent(in)	::	LDMTL
character(len=*),	intent(in)	::	CDGRPNAME

public subroutine SETUP_SFLP2(YDSC, YD, KGRIB, CDNAME, PDEFAULT, KTRAJ, KREQIN)

Arguments

Type	Intent	Optional		Name
type(TYPE_SURF_GEN),	intent(inout)		::	YDSC
type(TYPE_SURF_MTL_2D),	intent(inout)		::	YD
integer(kind=JPIM),	intent(in),	optional	::	KGRIB
character(len=16),	intent(in),	optional	::	CDNAME
real(kind=JPRB),	intent(in),	optional	::	PDEFAULT
integer(kind=JPIM),	intent(in),	optional	::	KTRAJ
integer(kind=JPIM),	intent(in),	optional	::	KREQIN

public subroutine GPPOPER(CDACT, KBL, PSP_SB, PSP_SG, PSP_RR, PSP_EP, PSP_X2, YDCOM)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	CDACT
integer(kind=JPIM),	intent(in),	optional	::	KBL
real(kind=JPRB),	intent(inout),	optional	::	PSP_SB(:,:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_SG(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_RR(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_EP(:,:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_X2(:,:)
type(TYPE_SFL_COMM),	intent(inout),	optional	::	YDCOM

public subroutine GPOPER(CDACT, KBL, PSP_SB, PSP_SG, PSP_RR, PSD_VF, PSD_VV, YDCOM, PFIELD, PFIELD2)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	CDACT
integer(kind=JPIM),	intent(in),	optional	::	KBL
real(kind=JPRB),	intent(inout),	optional	::	PSP_SB(:,:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_SG(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSP_RR(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSD_VF(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PSD_VV(:,:)
type(TYPE_SFL_COMM),	intent(inout),	optional	::	YDCOM
real(kind=JPRB),	intent(inout),	optional	::	PFIELD(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PFIELD2(:,:)

public subroutine GPOPER_2(CDACT, PFLD, YDSC, YD, YDCOM, PFIELD, PFIELD2)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	CDACT
real(kind=JPRB),	intent(inout)		::	PFLD(:,:)
type(TYPE_SURF_GEN),	intent(in)		::	YDSC
type(TYPE_SURF_MTL_2D),	intent(in)		::	YD(:)
type(TYPE_SFL_COMM),	intent(inout),	optional	::	YDCOM
real(kind=JPRB),	intent(inout),	optional	::	PFIELD(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PFIELD2(:,:)

public subroutine GPOPER_3(CDACT, PFLD, YDSC, YD, YDCOM, PFIELD, PFIELD2)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(in)		::	CDACT
real(kind=JPRB),	intent(inout)		::	PFLD(:,:,:)
type(TYPE_SURF_GEN),	intent(in)		::	YDSC
type(TYPE_SURF_MTL_3D),	intent(in)		::	YD(:)
type(TYPE_SFL_COMM),	intent(inout),	optional	::	YDCOM
real(kind=JPRB),	intent(inout),	optional	::	PFIELD(:,:)
real(kind=JPRB),	intent(inout),	optional	::	PFIELD2(:,:)

SURFACE_FIELDS Module

Contents

Variables

Derived Types

Subroutines

Uses

Contents

Variables

Derived Types

Subroutines

Variables

Derived Types

type, public :: TYPE_SURF_MTL_2D

Components

type, public :: TYPE_SURF_MTL_3D

Components

type, public :: TYPE_SURF_GEN

Components

type, public :: TYPE_SFL_COMM

Components

type, public :: TYPE_SFL_SOILB

Components

type, public :: TYPE_SFL_SNOWG

Components

type, public :: TYPE_SFL_RESVR

Components

type, public :: TYPE_SFL_WAVES

Components

type, public :: TYPE_SFL_EXTRP

Components

type, public :: TYPE_SFL_XTRP2

Components

type, public :: TYPE_SFL_CANRI

Components

type, public :: TYPE_SFL_VARSF

Components

type, public :: TYPE_SFL_VCLIP

Components

type, public :: TYPE_SFL_VCLIV

Components

type, public :: TYPE_SFL_VCLIN

Components

type, public :: TYPE_SFL_VCLIH

Components

type, public :: TYPE_SFL_VCLIA

Components

type, public :: TYPE_SFL_VCLIG

Components

type, public :: TYPE_SFL_VO3ABC

Components

type, public :: TYPE_SFL_VDIAG

Components

type, public :: TYPE_SFL_VCLIX

Components

type, public :: TYPE_SFL_VEXTRA

Components

type, public :: TYPE_SFL_VEXTR2

Components

Subroutines

public subroutine INI_SFLP3(YDSC, YD, KFLDS, KLEVS, LDMTL, CDGRPNAME)

Arguments

public subroutine SETUP_SFLP3(YDSC, YD, KGRIB, CDNAME, PDEFAULT, KTRAJ, KREQIN)

Arguments

public subroutine INI_SFLP2(YDSC, YD, KFLDS, LDMTL, CDGRPNAME)

Arguments

public subroutine SETUP_SFLP2(YDSC, YD, KGRIB, CDNAME, PDEFAULT, KTRAJ, KREQIN)

Arguments

public subroutine GPPOPER(CDACT, KBL, PSP_SB, PSP_SG, PSP_RR, PSP_EP, PSP_X2, YDCOM)

Arguments

public subroutine GPOPER(CDACT, KBL, PSP_SB, PSP_SG, PSP_RR, PSD_VF, PSD_VV, YDCOM, PFIELD, PFIELD2)

Arguments

public subroutine GPOPER_2(CDACT, PFLD, YDSC, YD, YDCOM, PFIELD, PFIELD2)

Arguments

public subroutine GPOPER_3(CDACT, PFLD, YDSC, YD, YDCOM, PFIELD, PFIELD2)

Arguments

public subroutine SURF_STORE()

Arguments

public subroutine SURF_RESTORE()

Arguments

public subroutine ALLO_SURF()