fiasco.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	fiasco (poutp, ptlon, ptlat, ptsurf, ktmsk, ktlon, ktlat, cdtper, ktper, pinpt, pslon, pslat, pssurf, ksmsk, kslon, kslat, cdsper, ksper, plonz, platz, psgrb, psgra, psfrb, psfra, kfield, cdint, cdtyp, cddim)

---

Function Documentation

subroutine fiasco	(	REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	poutp,
		REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	ptlon,
		REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	ptlat,
		REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	ptsurf,
		INTEGER (kind=ip_intwp_p),dimension(ktlon,ktlat)	ktmsk,
			ktlon,
			ktlat,
		CHARACTER*8	cdtper,
			ktper,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	pinpt,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	pslon,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	pslat,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	pssurf,
		INTEGER (kind=ip_intwp_p),dimension(kslon,kslat)	ksmsk,
			kslon,
			kslat,
		CHARACTER*8	cdsper,
			ksper,
		REAL (kind=ip_realwp_p),dimension(ktlon)	plonz,
		REAL (kind=ip_realwp_p),dimension(ktlat)	platz,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	psgrb,
		REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	psgra,
		REAL (kind=ip_realwp_p),dimension(kslon,kslat)	psfrb,
		REAL (kind=ip_realwp_p),dimension(ktlon,ktlat)	psfra,
			kfield,
		CHARACTER*8	cdint,
		CHARACTER*1	cdtyp,
		CHARACTER*6	cddim
	)

Definition at line 1 of file fiasco.f.

References mod_anais::agint, mod_anais::amint, mod_parameter::ig_maxgrd, mod_parameter::ig_maxnoa, mod_parameter::ig_maxwoa, mod_anais::linit, nagset(), nagsst(), mod_anais::naisgfl, mod_anais::naisgvoi, mod_anais::naismfl, mod_anais::naismvoi, namset(), namsst(), mod_anais::ngint, mod_anais::niwtg, mod_anais::niwtm, mod_printing::nlogprt, mod_anais::nmesh, mod_anais::nmint, mod_unit::nulcc, mod_unit::nulgg, mod_unit::nulou, prcout(), and mod_anais::varmul.

Here is the call graph for this function: