Public Attributes
integer	nlat = 32
integer	nlev = 10
integer	nlon = 64
integer	ntru = 21
integer	nlpp = 32
integer	nhor = 2048
integer	nlem = 9
integer	nlep = 11
integer	nlsq = 100
integer	ntp1 = 22
integer	nrsp = 506
integer	ncsp = 253
integer	nspp = 506
integer	nesp = 506
integer	nzom = 44
integer	nlah = 16
integer	nhpp = 16
integer	kick = 1
integer	mpstep = 0
integer	nafter = 0
integer	nwpd = 1
integer	ncoeff = 0
integer	ndel = 6
integer	ndiag = 12
integer	nkits = 3
integer	nlevt = 9
integer	ngui = 0
integer	nguidbg = 0
integer	nqspec = 1
integer	nrun = 0
integer	nstep = 0
integer	nstop = 0
integer	nsync = 0
integer	ntspd = 24
integer	ncu = 0
integer	noro = 0
integer	norox = 0
integer	nreverse = 0
integer	ncorrect = 0
integer	nsym = 0
integer	nsrv = 1
integer	lon1oro = 0
integer	lon2oro = 0
integer	lat1oro = 0
integer	lat2oro = 0
integer	ntgr = 0
integer	lon1tgr = 0
integer	lon2tgr = 0
integer	lat1tgr = 0
integer	lat2tgr = 0
integer	nstrato = 0
integer	nsponge = 0
integer	nhelsua = 0
integer	ntestgp = 0
integer	nvg = 0
integer	nyoden = 0
integer	npackgp = 1
integer	npacksp = 1
integer	noutput = 0
integer	noutsrv = 0
real, dimension(20)	t0yod1 = (/224.14,213.91,211.36,212.95,217.56 ,224.07,231.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod1 = (/ 0.00, 0.00, 2.00, 9.19, 19.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)
real, dimension(20)	t0yod3 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod3 = (/ 0.00, -3.05,-20.32,-26.19,-28.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)
real, dimension(20)	t0yod5 = (/305.00,298.00,292.00,286.00,280.00 ,274.00,268.00,261.00,256.54,254.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod5 = (/ 0.00, -3.05,-21.32,-27.19,-29.13 ,-32.26,-34.91,-40.37,-45.10,-49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)
real, dimension(20)	t0yod7 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod7 = (/ 0.00,-25.05,-64.32,-58.19,-22.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 60.00/)
real, dimension(20)	t0yod8 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod8 = (/ 0.00,-25.05,-64.32,-58.19,-22.13 , 18.26, 24.91, 30.37, 35.10, 39.19 , 42.05, 44.69, 46.20, 47.70, 48.31 , 48.91, 49.26, 49.56, 49.76, 50.00/)
real, dimension(20)	t0yod9 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)
real, dimension(20)	dtyod9 = (/ 0.00, 0.00, 0.00, 0.00, 0.00 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 60.00/)
integer	nfls = 1
real	delt
real	delt2
real	dtep = 60.0
real	dtns = 0.0
real	dtrop = 12000.0
real	dttrp = 2.0
real	dtzz = 10.0
real	syncstr = 0.0
real	ttp = 200.0
real	plavor = EZ
real	rotspd = 1.0
real	sigmax = 6.0e-7
real	tdiss = 0.25
real	tac = 0.
real	pac = 0.
real	tgr = 288.0
real	oroano = 0.0
real	tgrano = 0.0
real	alrs = -0.0000
real	horo = 0.0
real	orofac = 1.0
real	ttropo = 250.0
real	dorox = 0.0
real	doroy = 0.0
real	doroxs = 0.0
real	doroys = 0.0
real	tauta = 40.0
real	tauts = 4.0
real	sid_day = SID_DAY_EARTH
real	zsigb = 0.7
real	alrpv = 0.002
real	radpv = 50.
real	edgepv = 10.
real	pmaxpv = 10000.
real	flsp0 = 10000.
real	flsdp = 9000.
real	flsamp = 15.
real	flsoff = -5.
integer, parameter	MAXLEV = 100
integer, parameter	MAXSELZW = 42
integer, parameter	MAXSELSP = ((MAXSELZW+1) * (MAXSELZW+2)) / 2
integer, dimension(0:maxselzw)	nselect = 1
integer, dimension(maxselsp)	nspecsel = 1
integer, dimension(maxlev)	ndl = 0
real, dimension(maxlev)	restim = 15.0
real, dimension(maxlev)	sigmah = 0.0
real, dimension(maxlev)	t0k = 250.0
real, dimension(maxlev)	t0 = 250.0
real, dimension(maxlev)	tfrc = 0.0
real, dimension(maxlev)	dt = 0.0
real, dimension(:), allocatable	sor
real, dimension(:), allocatable	ssp
real, dimension(:), allocatable	stg
real, dimension(:), allocatable	sep
real, dimension(:), allocatable	sns
real, dimension(:), allocatable	spnorm
real, dimension(:,:), allocatable	sr1
real, dimension(:,:), allocatable	sr2
real, dimension(:,:), allocatable	gor
real, dimension(:,:), allocatable	gsp
real, dimension(:,:), allocatable	gtg
real, dimension(:,:), allocatable	gan
real, dimension(:,:), allocatable	gep
real, dimension(:,:), allocatable	gns
real, dimension(:,:,:), allocatable	gtc
real, dimension(:,:,:), allocatable	gtv
real, dimension(:,:,:), allocatable	gtdamp
real, dimension(:,:,:), allocatable	gaf
real, dimension(:), allocatable	gra
character(3), dimension(:), allocatable	chlat
real(kind=8), dimension(:), allocatable	sid
real(kind=8), dimension(:), allocatable	gwd
real(kind=8), dimension(:), allocatable	csq
real(kind=8), dimension(:), allocatable	dla
real, dimension(:), allocatable	t0d
real, dimension(:), allocatable	dsigma
real, dimension(:), allocatable	rdsig
real, dimension(:), allocatable	sigma
real, dimension(:), allocatable	tkp
real, dimension(2)	gp
real, dimension(2)	sp
real, dimension(2)	gpj
real, dimension(2, 2)	gu
real, dimension(2, 2)	gv
real, dimension(2, 2)	sd
real, dimension(2, 2)	st
real, dimension(2, 2)	sq
real, dimension(2, 2)	sz
real, dimension(2, 2)	gd
real, dimension(2, 2)	gq
real, dimension(2, 2)	gt
real, dimension(2, 2)	gz
integer	npro = 1
integer	nugp = 2048
integer	npgp = 1024
integer	nud = 6
character(256)	puma_namelist = "puma_namelist"
character(256)	puma_output = "puma_output"
character(256)	puma_diag = "puma_diag"
character(256)	puma_restart = "puma_restart"
character(256)	puma_status = "puma_status"
character(256)	efficiency_dat = "efficiency.dat"
character(256)	ppp_puma_txt = "ppp-puma.txt"
character(256)	puma_sp_init = "puma_sp_init"
integer, parameter	PUMA = 0
integer, parameter	PLASIM = 1
real	plarad = PLARAD_EARTH
real	gascon = GASCON_EARTH
real	akap = AKAP_EARTH
real	alr = ALR_EARTH
real	ga = GA_EARTH
real	psurf = PSURF_EARTH
real	ww = WW_EARTH
real	cv = CV_EARTH
real	ct = CT_EARTH
logical	lrestart = .false.
logical	lselect = .false.
logical	lspecsel = .false.
integer	model = PUMA
integer	nwspini = 1
integer	nstep1 = 0
integer	nwrioro = 1
integer	nextout = 0
integer	nruido = 0
integer	nseedlen = 0
integer	nmonths = 0
integer	nyears = 1
integer	ndiagp = 0
integer	nconv = 0
integer	nenergy = 0
integer	nentropy = 0
integer	ndheat = 0
integer	nradcv = 0
real	alpha = 1.0
real	psmean = PSURF_EARTH
real	dvdiff = 0.0
real	disp = 0.0
real	pspon = 50.
real	sponk = 0.5
real, dimension(:,:), allocatable	sd
real, dimension(:,:), allocatable	sdd
real, dimension(:,:), allocatable	st
real, dimension(:,:), allocatable	std
real, dimension(:,:), allocatable	st1
real, dimension(:,:), allocatable	st2
real, dimension(:,:), allocatable	sz
real, dimension(:,:), allocatable	szd
real, dimension(:), allocatable	sp
real, dimension(:), allocatable	spd
real, dimension(:,:), allocatable	sq
real, dimension(:), allocatable	sp1
real, dimension(:), allocatable	sp2
real, dimension(:), allocatable	so
real, dimension(:,:), allocatable	sdp
real, dimension(:,:), allocatable	stp
real, dimension(:,:), allocatable	szp
real, dimension(:), allocatable	spp
real, dimension(:), allocatable	sop
real, dimension(:,:), allocatable	srp1
real, dimension(:,:), allocatable	srp2
real, dimension(:,:), allocatable	sdt
real, dimension(:,:), allocatable	stt
real, dimension(:,:), allocatable	szt
real, dimension(:), allocatable	spt
real, dimension(:,:), allocatable	sdm
real, dimension(:,:), allocatable	stm
real, dimension(:,:), allocatable	szm
real, dimension(:), allocatable	spm
real, dimension(:), allocatable	sak
real, dimension(:), allocatable	srcn
real, dimension(:), allocatable	span
integer, dimension(:), allocatable	nindex
integer, dimension(:), allocatable	nscatsp
integer, dimension(:), allocatable	nselzw
integer, dimension(:), allocatable	nselsp
real, dimension(:,:), allocatable	gd
real, dimension(:,:), allocatable	gt
real, dimension(:,:), allocatable	gz
real, dimension(:,:), allocatable	gu
real, dimension(:,:), allocatable	gv
real, dimension(:), allocatable	gp
real, dimension(:,:), allocatable	gq
real, dimension(:,:), allocatable	gfu
real, dimension(:,:), allocatable	gfv
real, dimension(:,:), allocatable	gut
real, dimension(:,:), allocatable	gvt
real, dimension(:,:), allocatable	gke
real, dimension(:), allocatable	gpj
real, dimension(:), allocatable	rcsq
real, dimension(:,:,:), allocatable	ruido
real, dimension(:,:), allocatable	ruidop
real, dimension(:,:), allocatable	gtdamp
real, dimension(:,:), allocatable	gr1
real, dimension(:,:), allocatable	gr2
real, dimension(:,:), allocatable	gtdampc
real, dimension(:,:), allocatable	gr1c
real, dimension(:,:), allocatable	gr2c
integer, dimension(:), allocatable	ndil
real, dimension(:,:), allocatable	csu
real, dimension(:,:), allocatable	csv
real, dimension(:,:), allocatable	cst
real, dimension(:,:), allocatable	denergy
real, dimension(:,:), allocatable	dentropy
real, dimension(:), allocatable	csq
real, dimension(:), allocatable	rcs
real, dimension(:), allocatable	t0
real, dimension(:), allocatable	taur
real, dimension(:), allocatable	tauf
real, dimension(:), allocatable	damp
real, dimension(:), allocatable	fric
real, dimension(:,:,:), allocatable	bm1
real, dimension(:), allocatable	sigmh
real, dimension(:,:), allocatable	c
real, dimension(:,:), allocatable	xlphi
real, dimension(:,:), allocatable	xlt
integer	myworld = 0
integer	mpinfo = 0
integer	mypid = 0
real	tmstart = 0.0
real	tmstop = 0.0
character(80), dimension(:), allocatable	ympname
integer	mrworld = 0
integer	mrinfo = 0
integer	mrpid = -1
integer	mrnum = 0
integer	mintru = 0
integer	mrdim = 0
integer, dimension(:), allocatable	mrtru
real	synctime = 0.0
integer	nshutdown = 0
integer, dimension(6)	ndatim = -1
real(kind=4), dimension(nparcs)	parc
real(kind=4), dimension(nparcs)	crap
logical	ldtep = .FALSE.
logical	ldtns = .FALSE.
character(len=32)	yplanet = "Earth"
integer, dimension(8)	seed = 0
integer, dimension(:), allocatable	meed
real	ganext = 0.0

Detailed Description

Definition at line 1 of file ppp.f90.

Member Data Documentation

real pumamod::akap = AKAP_EARTH

Definition at line 157 of file puma.f90.

real pumamod::alpha = 1.0

Definition at line 231 of file puma.f90.

real pumamod::alr = ALR_EARTH

Definition at line 158 of file puma.f90.

real pumamod::alrpv = 0.002

Definition at line 310 of file ppp.f90.

real pumamod::alrs = -0.0000

Definition at line 287 of file ppp.f90.

real, dimension(:,:,:), allocatable pumamod::bm1

Definition at line 374 of file puma.f90.

real, dimension(:,:), allocatable pumamod::c

Definition at line 380 of file puma.f90.

character (3), dimension(:), allocatable pumamod::chlat

Definition at line 401 of file ppp.f90.

real(kind=4), dimension(nparcs) pumamod::crap

Definition at line 421 of file puma.f90.

real (kind=8), dimension(:), allocatable pumamod::csq

Definition at line 405 of file ppp.f90.

real, dimension(:), allocatable pumamod::csq

Definition at line 360 of file puma.f90.

real, dimension(:,:), allocatable pumamod::cst

Definition at line 348 of file puma.f90.

real, dimension(:,:), allocatable pumamod::csu

Definition at line 346 of file puma.f90.

real, dimension(:,:), allocatable pumamod::csv

Definition at line 347 of file puma.f90.

real pumamod::ct = CT_EARTH

Definition at line 164 of file puma.f90.

real pumamod::cv = CV_EARTH

Definition at line 163 of file puma.f90.

real, dimension(:), allocatable pumamod::damp

Definition at line 371 of file puma.f90.

real pumamod::delt

Definition at line 262 of file ppp.f90.

real pumamod::delt2

Definition at line 263 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::denergy

Definition at line 350 of file puma.f90.

real, dimension(:,:), allocatable pumamod::dentropy

Definition at line 351 of file puma.f90.

real pumamod::disp = 0.0

Definition at line 252 of file puma.f90.

real (kind=8), dimension(:), allocatable pumamod::dla

Definition at line 406 of file ppp.f90.

real pumamod::dorox = 0.0

Definition at line 292 of file ppp.f90.

real pumamod::doroxs = 0.0

Definition at line 294 of file ppp.f90.

real pumamod::doroy = 0.0

Definition at line 293 of file ppp.f90.

real pumamod::doroys = 0.0

Definition at line 295 of file ppp.f90.

real, dimension(:), allocatable pumamod::dsigma

Definition at line 414 of file ppp.f90.

real, dimension(maxlev) pumamod::dt = 0.0

Definition at line 366 of file ppp.f90.

real pumamod::dtep = 60.0

Definition at line 268 of file ppp.f90.

real pumamod::dtns = 0.0

Definition at line 269 of file ppp.f90.

real pumamod::dtrop = 12000.0

Definition at line 270 of file ppp.f90.

real pumamod::dttrp = 2.0

Definition at line 271 of file ppp.f90.

real, dimension(20) pumamod::dtyod1 = (/ 0.00, 0.00, 2.00, 9.19, 19.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)

Definition at line 209 of file ppp.f90.

real, dimension(20) pumamod::dtyod3 = (/ 0.00, -3.05,-20.32,-26.19,-28.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)

Definition at line 217 of file ppp.f90.

real, dimension(20) pumamod::dtyod5 = (/ 0.00, -3.05,-21.32,-27.19,-29.13 ,-32.26,-34.91,-40.37,-45.10,-49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 59.94/)

Definition at line 225 of file ppp.f90.

real, dimension(20) pumamod::dtyod7 = (/ 0.00,-25.05,-64.32,-58.19,-22.13 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 60.00/)

Definition at line 233 of file ppp.f90.

real, dimension(20) pumamod::dtyod8 = (/ 0.00,-25.05,-64.32,-58.19,-22.13 , 18.26, 24.91, 30.37, 35.10, 39.19 , 42.05, 44.69, 46.20, 47.70, 48.31 , 48.91, 49.26, 49.56, 49.76, 50.00/)

Definition at line 241 of file ppp.f90.

real, dimension(20) pumamod::dtyod9 = (/ 0.00, 0.00, 0.00, 0.00, 0.00 , 28.26, 34.91, 40.37, 45.10, 49.19 , 52.05, 54.69, 56.20, 57.70, 58.31 , 58.91, 59.26, 59.56, 59.76, 60.00/)

Definition at line 249 of file ppp.f90.

real pumamod::dtzz = 10.0

Definition at line 272 of file ppp.f90.

real pumamod::dvdiff = 0.0

Definition at line 250 of file puma.f90.

real pumamod::edgepv = 10.

Definition at line 319 of file ppp.f90.

character (256) pumamod::efficiency_dat = "efficiency.dat"

Definition at line 79 of file puma.f90.

real pumamod::flsamp = 15.

Definition at line 342 of file ppp.f90.

real pumamod::flsdp = 9000.

Definition at line 340 of file ppp.f90.

real pumamod::flsoff = -5.

Definition at line 344 of file ppp.f90.

real pumamod::flsp0 = 10000.

Definition at line 338 of file ppp.f90.

real, dimension(:), allocatable pumamod::fric

Definition at line 372 of file puma.f90.

real pumamod::ga = GA_EARTH

Definition at line 159 of file puma.f90.

real, dimension(:,:,:), allocatable pumamod::gaf

Definition at line 394 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gan

Definition at line 388 of file ppp.f90.

real pumamod::ganext = 0.0

Definition at line 432 of file puma.f90.

real pumamod::gascon = GASCON_EARTH

Definition at line 156 of file puma.f90.

real, dimension(2,2) pumamod::gd

Definition at line 432 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gd

Definition at line 313 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gep

Definition at line 389 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gfu

Definition at line 320 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gfv

Definition at line 321 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gke

Definition at line 324 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gns

Definition at line 390 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gor

Definition at line 385 of file ppp.f90.

real, dimension(2) pumamod::gp

Definition at line 423 of file ppp.f90.

real, dimension(:), allocatable pumamod::gp

Definition at line 318 of file puma.f90.

real, dimension(:), allocatable pumamod::gpj

Definition at line 325 of file puma.f90.

real, dimension(2) pumamod::gpj

Definition at line 425 of file ppp.f90.

real, dimension(2,2) pumamod::gq

Definition at line 433 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gq

Definition at line 319 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gr1

Definition at line 333 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gr1c

Definition at line 337 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gr2

Definition at line 334 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gr2c

Definition at line 338 of file puma.f90.

real, dimension(:), allocatable pumamod::gra

Definition at line 395 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gsp

Definition at line 386 of file ppp.f90.

real, dimension(2,2) pumamod::gt

Definition at line 434 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gt

Definition at line 314 of file puma.f90.

real, dimension(:,:,:), allocatable pumamod::gtc

Definition at line 391 of file ppp.f90.

real, dimension(:,:,:), allocatable pumamod::gtdamp

Definition at line 393 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gtdamp

Definition at line 329 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gtdampc

Definition at line 335 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gtg

Definition at line 387 of file ppp.f90.

real, dimension(:,:,:), allocatable pumamod::gtv

Definition at line 392 of file ppp.f90.

real, dimension(2,2) pumamod::gu

Definition at line 426 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gu

Definition at line 316 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gut

Definition at line 322 of file puma.f90.

real, dimension(2,2) pumamod::gv

Definition at line 427 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gv

Definition at line 317 of file puma.f90.

real, dimension(:,:), allocatable pumamod::gvt

Definition at line 323 of file puma.f90.

real (kind=8), dimension(:), allocatable pumamod::gwd

Definition at line 404 of file ppp.f90.

real, dimension(2,2) pumamod::gz

Definition at line 435 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::gz

Definition at line 315 of file puma.f90.

real pumamod::horo = 0.0

Definition at line 288 of file ppp.f90.

integer pumamod::kick = 1

Definition at line 138 of file ppp.f90.

integer pumamod::lat1oro = 0

Definition at line 169 of file ppp.f90.

integer pumamod::lat1tgr = 0

Definition at line 174 of file ppp.f90.

integer pumamod::lat2oro = 0

Definition at line 170 of file ppp.f90.

integer pumamod::lat2tgr = 0

Definition at line 175 of file ppp.f90.

logical pumamod::ldtep = .FALSE.

Definition at line 422 of file puma.f90.

logical pumamod::ldtns = .FALSE.

Definition at line 423 of file puma.f90.

integer pumamod::lon1oro = 0

Definition at line 167 of file ppp.f90.

integer pumamod::lon1tgr = 0

Definition at line 172 of file ppp.f90.

integer pumamod::lon2oro = 0

Definition at line 168 of file ppp.f90.

integer pumamod::lon2tgr = 0

Definition at line 173 of file ppp.f90.

logical pumamod::lrestart = .false.

Definition at line 170 of file puma.f90.

logical pumamod::lselect = .false.

Definition at line 171 of file puma.f90.

logical pumamod::lspecsel = .false.

Definition at line 172 of file puma.f90.

integer, parameter pumamod::MAXLEV = 100

Definition at line 355 of file ppp.f90.

integer, parameter pumamod::MAXSELSP = ((MAXSELZW+1) * (MAXSELZW+2)) / 2

Definition at line 357 of file ppp.f90.

integer, parameter pumamod::MAXSELZW = 42

Definition at line 356 of file ppp.f90.

integer, dimension(:), allocatable pumamod::meed

Definition at line 431 of file puma.f90.

integer pumamod::mintru = 0

Definition at line 404 of file puma.f90.

integer pumamod::model = PUMA

Definition at line 174 of file puma.f90.

integer pumamod::mpinfo = 0

Definition at line 389 of file puma.f90.

integer pumamod::mpstep = 0

Definition at line 139 of file ppp.f90.

integer pumamod::mrdim = 0

Definition at line 405 of file puma.f90.

integer pumamod::mrinfo = 0

Definition at line 401 of file puma.f90.

integer pumamod::mrnum = 0

Definition at line 403 of file puma.f90.

integer pumamod::mrpid = -1

Definition at line 402 of file puma.f90.

integer, dimension(:), allocatable pumamod::mrtru

Definition at line 407 of file puma.f90.

integer pumamod::mrworld = 0

Definition at line 400 of file puma.f90.

integer pumamod::mypid = 0

Definition at line 390 of file puma.f90.

integer pumamod::myworld = 0

Definition at line 388 of file puma.f90.

integer pumamod::nafter = 0

Definition at line 140 of file ppp.f90.

integer pumamod::ncoeff = 0

Definition at line 142 of file ppp.f90.

integer pumamod::nconv = 0

Definition at line 214 of file puma.f90.

integer pumamod::ncorrect = 0

Definition at line 163 of file ppp.f90.

integer pumamod::ncsp = 253

Definition at line 83 of file ppp.f90.

integer pumamod::ncu = 0

Definition at line 156 of file ppp.f90.

integer, dimension(6) pumamod::ndatim = -1

Definition at line 419 of file puma.f90.

integer pumamod::ndel = 6

Definition at line 143 of file ppp.f90.

integer pumamod::ndheat = 0

Definition at line 221 of file puma.f90.

integer pumamod::ndiag = 12

Definition at line 144 of file ppp.f90.

integer pumamod::ndiagp = 0

Definition at line 213 of file puma.f90.

integer, dimension(:), allocatable pumamod::ndil

Definition at line 344 of file puma.f90.

integer, dimension(maxlev) pumamod::ndl = 0

Definition at line 360 of file ppp.f90.

integer pumamod::nenergy = 0

Definition at line 219 of file puma.f90.

integer pumamod::nentropy = 0

Definition at line 220 of file puma.f90.

integer pumamod::nesp = 506

Definition at line 85 of file ppp.f90.

integer pumamod::nextout = 0

Definition at line 195 of file puma.f90.

integer pumamod::nfls = 1

Definition at line 254 of file ppp.f90.

integer pumamod::ngui = 0

Definition at line 148 of file ppp.f90.

integer pumamod::nguidbg = 0

Definition at line 149 of file ppp.f90.

integer pumamod::nhelsua = 0

Definition at line 178 of file ppp.f90.

integer pumamod::nhor = 2048

Definition at line 77 of file ppp.f90.

integer pumamod::nhpp = 16

Definition at line 89 of file ppp.f90.

integer, dimension(:), allocatable pumamod::nindex

Definition at line 304 of file puma.f90.

integer pumamod::nkits = 3

Definition at line 145 of file ppp.f90.

integer pumamod::nlah = 16

Definition at line 88 of file ppp.f90.

integer pumamod::nlat = 32

Definition at line 56 of file ppp.f90.

integer pumamod::nlem = 9

Definition at line 78 of file ppp.f90.

integer pumamod::nlep = 11

Definition at line 79 of file ppp.f90.

integer pumamod::nlev = 10

Definition at line 66 of file ppp.f90.

integer pumamod::nlevt = 9

Definition at line 146 of file ppp.f90.

integer pumamod::nlon = 64

Definition at line 74 of file ppp.f90.

integer pumamod::nlpp = 32

Definition at line 76 of file ppp.f90.

integer pumamod::nlsq = 100

Definition at line 80 of file ppp.f90.

integer pumamod::nmonths = 0

Definition at line 200 of file puma.f90.

integer pumamod::noro = 0

Definition at line 157 of file ppp.f90.

integer pumamod::norox = 0

Definition at line 161 of file ppp.f90.

integer pumamod::noutput = 0

Definition at line 198 of file ppp.f90.

integer pumamod::noutsrv = 0

Definition at line 199 of file ppp.f90.

integer pumamod::npackgp = 1

Definition at line 196 of file ppp.f90.

integer pumamod::npacksp = 1

Definition at line 197 of file ppp.f90.

integer pumamod::npgp = 1024

Definition at line 67 of file puma.f90.

integer pumamod::npro = 1

Definition at line 26 of file puma.f90.

integer pumamod::nqspec = 1

Definition at line 150 of file ppp.f90.

integer pumamod::nradcv = 0

Definition at line 223 of file puma.f90.

integer pumamod::nreverse = 0

Definition at line 162 of file ppp.f90.

integer pumamod::nrsp = 506

Definition at line 82 of file ppp.f90.

integer pumamod::nruido = 0

Definition at line 196 of file puma.f90.

integer pumamod::nrun = 0

Definition at line 151 of file ppp.f90.

integer, dimension(:), allocatable pumamod::nscatsp

Definition at line 305 of file puma.f90.

integer pumamod::nseedlen = 0

Definition at line 199 of file puma.f90.

integer, dimension(0:maxselzw) pumamod::nselect = 1

Definition at line 358 of file ppp.f90.

integer, dimension(:), allocatable pumamod::nselsp

Definition at line 307 of file puma.f90.

integer, dimension(:), allocatable pumamod::nselzw

Definition at line 306 of file puma.f90.

integer pumamod::nshutdown = 0

Definition at line 418 of file puma.f90.

integer, dimension(maxselsp) pumamod::nspecsel = 1

Definition at line 359 of file ppp.f90.

integer pumamod::nsponge = 0

Definition at line 177 of file ppp.f90.

integer pumamod::nspp = 506

Definition at line 84 of file ppp.f90.

integer pumamod::nsrv = 1

Definition at line 166 of file ppp.f90.

integer pumamod::nstep = 0

Definition at line 152 of file ppp.f90.

integer pumamod::nstep1 = 0

Definition at line 188 of file puma.f90.

integer pumamod::nstop = 0

Definition at line 153 of file ppp.f90.

integer pumamod::nstrato = 0

Definition at line 176 of file ppp.f90.

integer pumamod::nsym = 0

Definition at line 164 of file ppp.f90.

integer pumamod::nsync = 0

Definition at line 154 of file ppp.f90.

integer pumamod::ntestgp = 0

Definition at line 188 of file ppp.f90.

integer pumamod::ntgr = 0

Definition at line 171 of file ppp.f90.

integer pumamod::ntp1 = 22

Definition at line 81 of file ppp.f90.

integer pumamod::ntru = 21

Definition at line 75 of file ppp.f90.

integer pumamod::ntspd = 24

Definition at line 155 of file ppp.f90.

integer pumamod::nud = 6

Definition at line 69 of file puma.f90.

integer pumamod::nugp = 2048

Definition at line 66 of file puma.f90.

integer pumamod::nvg = 0

Definition at line 190 of file ppp.f90.

integer pumamod::nwpd = 1

Definition at line 141 of file ppp.f90.

integer pumamod::nwrioro = 1

Definition at line 194 of file puma.f90.

integer pumamod::nwspini = 1

Definition at line 186 of file puma.f90.

integer pumamod::nyears = 1

Definition at line 201 of file puma.f90.

integer pumamod::nyoden = 0

Definition at line 195 of file ppp.f90.

integer pumamod::nzom = 44

Definition at line 86 of file ppp.f90.

real pumamod::oroano = 0.0

Definition at line 284 of file ppp.f90.

real pumamod::orofac = 1.0

Definition at line 289 of file ppp.f90.

real pumamod::pac = 0.

Definition at line 282 of file ppp.f90.

real(kind=4), dimension(nparcs) pumamod::parc

Definition at line 420 of file puma.f90.

real pumamod::plarad = PLARAD_EARTH

Definition at line 155 of file puma.f90.

integer, parameter pumamod::PLASIM = 1

Definition at line 92 of file puma.f90.

real pumamod::plavor = EZ

Definition at line 277 of file ppp.f90.

real pumamod::pmaxpv = 10000.

Definition at line 323 of file ppp.f90.

character (256) pumamod::ppp_puma_txt = "ppp-puma.txt"

Definition at line 80 of file puma.f90.

real pumamod::psmean = PSURF_EARTH

Definition at line 243 of file puma.f90.

real pumamod::pspon = 50.

Definition at line 255 of file puma.f90.

real pumamod::psurf = PSURF_EARTH

Definition at line 160 of file puma.f90.

integer, parameter pumamod::PUMA = 0

Definition at line 91 of file puma.f90.

character (256) pumamod::puma_diag = "puma_diag"

Definition at line 76 of file puma.f90.

character (256) pumamod::puma_namelist = "puma_namelist"

Definition at line 74 of file puma.f90.

character (256) pumamod::puma_output = "puma_output"

Definition at line 75 of file puma.f90.

character (256) pumamod::puma_restart = "puma_restart"

Definition at line 77 of file puma.f90.

character (256) pumamod::puma_sp_init = "puma_sp_init"

Definition at line 81 of file puma.f90.

character (256) pumamod::puma_status = "puma_status"

Definition at line 78 of file puma.f90.

real pumamod::radpv = 50.

Definition at line 317 of file ppp.f90.

real, dimension(:), allocatable pumamod::rcs

Definition at line 361 of file puma.f90.

real, dimension(:), allocatable pumamod::rcsq

Definition at line 326 of file puma.f90.

real, dimension(:), allocatable pumamod::rdsig

Definition at line 415 of file ppp.f90.

real, dimension(maxlev) pumamod::restim = 15.0

Definition at line 361 of file ppp.f90.

real pumamod::rotspd = 1.0

Definition at line 278 of file ppp.f90.

real, dimension(:,:,:), allocatable pumamod::ruido

Definition at line 327 of file puma.f90.

real, dimension(:,:), allocatable pumamod::ruidop

Definition at line 328 of file puma.f90.

real, dimension(:), allocatable pumamod::sak

Definition at line 299 of file puma.f90.

real, dimension(2,2) pumamod::sd

Definition at line 428 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::sd

Definition at line 264 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sdd

Definition at line 265 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sdm

Definition at line 294 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sdp

Definition at line 281 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sdt

Definition at line 289 of file puma.f90.

integer, dimension(8) pumamod::seed = 0

Definition at line 430 of file puma.f90.

real, dimension(:), allocatable pumamod::sep

Definition at line 375 of file ppp.f90.

real (kind=8), dimension(:), allocatable pumamod::sid

Definition at line 403 of file ppp.f90.

real pumamod::sid_day = SID_DAY_EARTH

Definition at line 299 of file ppp.f90.

real, dimension(:), allocatable pumamod::sigma

Definition at line 416 of file ppp.f90.

real, dimension(maxlev) pumamod::sigmah = 0.0

Definition at line 362 of file ppp.f90.

real pumamod::sigmax = 6.0e-7

Definition at line 279 of file ppp.f90.

real, dimension(:), allocatable pumamod::sigmh

Definition at line 378 of file puma.f90.

real, dimension(:), allocatable pumamod::sns

Definition at line 376 of file ppp.f90.

real, dimension(:), allocatable pumamod::so

Definition at line 277 of file puma.f90.

real, dimension(:), allocatable pumamod::sop

Definition at line 285 of file puma.f90.

real, dimension(:), allocatable pumamod::sor

Definition at line 372 of file ppp.f90.

real, dimension(2) pumamod::sp

Definition at line 424 of file ppp.f90.

real, dimension(:), allocatable pumamod::sp

Definition at line 272 of file puma.f90.

real, dimension(:), allocatable pumamod::sp1

Definition at line 275 of file puma.f90.

real, dimension(:), allocatable pumamod::sp2

Definition at line 276 of file puma.f90.

real, dimension(:), allocatable pumamod::span

Definition at line 301 of file puma.f90.

real, dimension(:), allocatable pumamod::spd

Definition at line 273 of file puma.f90.

real, dimension(:), allocatable pumamod::spm

Definition at line 297 of file puma.f90.

real, dimension(:), allocatable pumamod::spnorm

Definition at line 377 of file ppp.f90.

real pumamod::sponk = 0.5

Definition at line 257 of file puma.f90.

real, dimension(:), allocatable pumamod::spp

Definition at line 284 of file puma.f90.

real, dimension(:), allocatable pumamod::spt

Definition at line 292 of file puma.f90.

real, dimension(2,2) pumamod::sq

Definition at line 430 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::sq

Definition at line 274 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sr1

Definition at line 378 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::sr2

Definition at line 379 of file ppp.f90.

real, dimension(:), allocatable pumamod::srcn

Definition at line 300 of file puma.f90.

real, dimension(:,:), allocatable pumamod::srp1

Definition at line 286 of file puma.f90.

real, dimension(:,:), allocatable pumamod::srp2

Definition at line 287 of file puma.f90.

real, dimension(:), allocatable pumamod::ssp

Definition at line 373 of file ppp.f90.

real, dimension(2,2) pumamod::st

Definition at line 429 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::st

Definition at line 266 of file puma.f90.

real, dimension(:,:), allocatable pumamod::st1

Definition at line 268 of file puma.f90.

real, dimension(:,:), allocatable pumamod::st2

Definition at line 269 of file puma.f90.

real, dimension(:,:), allocatable pumamod::std

Definition at line 267 of file puma.f90.

real, dimension(:), allocatable pumamod::stg

Definition at line 374 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::stm

Definition at line 295 of file puma.f90.

real, dimension(:,:), allocatable pumamod::stp

Definition at line 282 of file puma.f90.

real, dimension(:,:), allocatable pumamod::stt

Definition at line 290 of file puma.f90.

real pumamod::syncstr = 0.0

Definition at line 273 of file ppp.f90.

real pumamod::synctime = 0.0

Definition at line 410 of file puma.f90.

real, dimension(:,:), allocatable pumamod::sz

Definition at line 270 of file puma.f90.

real, dimension(2,2) pumamod::sz

Definition at line 431 of file ppp.f90.

real, dimension(:,:), allocatable pumamod::szd

Definition at line 271 of file puma.f90.

real, dimension(:,:), allocatable pumamod::szm

Definition at line 296 of file puma.f90.

real, dimension(:,:), allocatable pumamod::szp

Definition at line 283 of file puma.f90.

real, dimension(:,:), allocatable pumamod::szt

Definition at line 291 of file puma.f90.

real, dimension(:), allocatable pumamod::t0

Definition at line 367 of file puma.f90.

real, dimension(maxlev) pumamod::t0 = 250.0

Definition at line 364 of file ppp.f90.

real, dimension(:), allocatable pumamod::t0d

Definition at line 413 of file ppp.f90.

real, dimension(maxlev) pumamod::t0k = 250.0

Definition at line 363 of file ppp.f90.

real, dimension(20) pumamod::t0yod1 = (/224.14,213.91,211.36,212.95,217.56 ,224.07,231.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 205 of file ppp.f90.

real, dimension(20) pumamod::t0yod3 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 213 of file ppp.f90.

real, dimension(20) pumamod::t0yod5 = (/305.00,298.00,292.00,286.00,280.00 ,274.00,268.00,261.00,256.54,254.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 221 of file ppp.f90.

real, dimension(20) pumamod::t0yod7 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 229 of file ppp.f90.

real, dimension(20) pumamod::t0yod8 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 237 of file ppp.f90.

real, dimension(20) pumamod::t0yod9 = (/265.14,254.91,246.36,240.95,237.56 ,234.65,235.24,237.73,243.54,248.87 ,253.41,257.83,261.72,265.60,268.96 ,272.33,275.36,278.34,281.06,283.74/)

Definition at line 245 of file ppp.f90.

real pumamod::tac = 0.

Definition at line 281 of file ppp.f90.

real, dimension(:), allocatable pumamod::tauf

Definition at line 370 of file puma.f90.

real, dimension(:), allocatable pumamod::taur

Definition at line 369 of file puma.f90.

real pumamod::tauta = 40.0

Definition at line 297 of file ppp.f90.

real pumamod::tauts = 4.0

Definition at line 298 of file ppp.f90.

real pumamod::tdiss = 0.25