clima()

subroutine clima	(	integer	lugb,
		integer	iy,
		integer	im,
		integer	id,
		integer	ih,
		real (kind=kind_io8)	fh,
		integer	len,
		integer	lsoil,
		real (kind=kind_io8), dimension(len)	slmskl,
		real (kind=kind_io8), dimension(len)	slmskw,
		character*500	fntsfc,
		character*500	fnwetc,
		character*500	fnsnoc,
		character*500	fnzorc,
		character*500	fnalbc,
		character*500	fnaisc,
		character*500	fntg3c,
		character*500	fnscvc,
		character*500	fnsmcc,
		character*500	fnstcc,
		character*500	fnacnc,
		character*500	fnvegc,
		character*500	fnvetc,
		character*500	fnsotc,
		character*500	fnsocc,
		character*500	fnvmnc,
		character*500	fnvmxc,
		character*500	fnslpc,
		character*500	fnabsc,
		real (kind=kind_io8), dimension(len)	tsfclm,
		real (kind=kind_io8), dimension(len)	tsfcl2,
		real (kind=kind_io8), dimension(len)	wetclm,
		real (kind=kind_io8), dimension(len)	snoclm,
		real (kind=kind_io8), dimension(len)	zorclm,
		real (kind=kind_io8), dimension(len,4)	albclm,
		real (kind=kind_io8), dimension(len)	aisclm,
		real (kind=kind_io8), dimension(len)	tg3clm,
		real (kind=kind_io8), dimension (len)	cvclm,
		real (kind=kind_io8), dimension(len)	cvbclm,
		real (kind=kind_io8), dimension(len)	cvtclm,
		real (kind=kind_io8), dimension(len)	cnpclm,
		real (kind=kind_io8), dimension(len,lsoil)	smcclm,
		real (kind=kind_io8), dimension(len,lsoil)	stcclm,
		real (kind=kind_io8), dimension(len)	sliclm,
		real (kind=kind_io8), dimension(len)	scvclm,
		real (kind=kind_io8), dimension(len)	acnclm,
		real (kind=kind_io8), dimension(len)	vegclm,
		real (kind=kind_io8), dimension(len)	vetclm,
		real (kind=kind_io8), dimension(len)	sotclm,
		real (kind=kind_io8), dimension(len)	socclm,
		real (kind=kind_io8), dimension(len,2)	alfclm,
		real (kind=kind_io8), dimension(len)	vmnclm,
		real (kind=kind_io8), dimension(len)	vmxclm,
		real (kind=kind_io8), dimension(len)	slpclm,
		real (kind=kind_io8), dimension(len)	absclm,
		integer	kpdtsf,
		integer	kpdwet,
		integer	kpdsno,
		integer	kpdzor,
		integer, dimension(4)	kpdalb,
		integer	kpdais,
		integer	kpdtg3,
		integer	kpdscv,
		integer	kpdacn,
		integer	kpdsmc,
		integer	kpdstc,
		integer	kpdveg,
		integer	kpdvet,
		integer	kpdsot,
		integer	kpdsoc,
		integer, dimension(2)	kpdalf,
		real (kind=kind_io8), dimension(len)	tsfcl0,
		integer	kpdvmn,
		integer	kpdvmx,
		integer	kpdslp,
		integer	kpdabs,
		real (kind=kind_io8)	deltsfc,
		logical	lanom,
		integer	imsk,
		integer	jmsk,
		real (kind=kind_io8), dimension(imsk,jmsk)	slmskh,
		real (kind=kind_io8), dimension(len)	outlat,
		real (kind=kind_io8), dimension(len)	outlon,
		logical	gaus,
		real (kind=kind_io8)	blno,
		real (kind=kind_io8)	blto,
		integer	me,
		logical	lprnt,
		integer	iprnt,
		character*500	fnalbc2,
		integer	ialb,
		character(len=*), intent(in)	tile_num_ch,
		integer, dimension(len), intent(in)	i_index,
		integer, dimension(len), intent(in)	j_index )

References fixrdc(), and fixrdc_tile().

Referenced by sfccycle().

Here is the call graph for this function:

Here is the caller graph for this function: