Modules
module	optcal

Variables
integer, dimension(nvarmx), save	istat

integer, dimension(nvarmx), save	iconv

integer, dimension(nvarmx), save	idiff

integer, dimension(nvarmx), save	idifft

integer, save	irovar

integer, save	ivivar

integer, save	idilat

double precision, save	epsdp

integer, save	nterup

integer, save	ischtp

integer, save	istmpf

integer, save	isno2t

integer, save	isto2t

integer, dimension(nscamx), save	isso2t

integer, save	iroext

integer, save	iviext

integer, save	icpext

integer, dimension(nscamx), save	ivsext

integer, save	initro

integer, save	initvi

integer, save	initcp

integer, dimension(nscamx), save	initvs

double precision, dimension(nvarmx), save	thetav

double precision, save	thetsn

double precision, save	thetst

double precision, dimension(nscamx), save	thetss

double precision, save	thetfl

double precision, save	thetro

double precision, save	thetvi

double precision, save	thetcp

double precision, dimension(nscamx), save	thetvs

double precision, save	epsup

double precision, save	xnrmu0

double precision, save	xnrmu

integer, dimension(nvarmx), save	ischcv

integer, dimension(nvarmx), save	isstpc

double precision, dimension(nvarmx), save	blencv

integer, save	imrgra

integer, dimension(nvarmx), save	nswrgr

integer, dimension(nvarmx), save	nswrsm

integer, dimension(nvarmx), save	imligr

integer, dimension(nvarmx), save	ircflu

double precision, save	anomax

double precision, dimension(nvarmx), save	epsrgr

double precision, dimension(nvarmx), save	epsrsm

double precision, dimension(nvarmx), save	climgr

double precision, dimension(nvarmx), save	extrag

integer, dimension(nvarmx), save	nitmax

integer, dimension(nvarmx), save	iresol

integer, dimension(nvarmx), save	idircl

integer, dimension(nvarmx), save	ndircl

double precision, dimension(nvarmx), save	epsilo

integer, dimension(nvarmx), save	imgr

integer, dimension(nvarmx), save	ncymax

integer, dimension(nvarmx), save	nitmgf

double precision, save	rlxp1

integer, save	isuite

integer, save	ileaux

integer, save	iecaux

integer, dimension(nscamx), save	iscold

integer, save	isuit1

integer, save	isuict

integer, save	isuivo

integer, save	isuisy

integer, save	ntpabs

integer, save	ntcabs

integer, save	ntmabs

integer, save	inpdt0

double precision, save	ttpabs

double precision, save	ttcabs

integer, save	idtvar

integer, save	iptlro

double precision, save	dtref

double precision, save	coumax

double precision, save	foumax

double precision, save	dtmin

double precision, save	dtmax

double precision, save	varrdt

double precision, dimension(nvarmx), save	cdtvar

double precision, dimension(nvarmx), save	relaxv

double precision, save	relxst

integer, save	iturb

integer, save	itytur

integer, save	ideuch

integer, save	ilogpo

integer, save	iclkep

integer, save	igrhok

integer, save	igrake

integer, save	iscalt

integer, save	ikecou

integer, save	irijnu

integer, save	irijrb

integer, save	irijec

integer, save	igrari

integer, save	idifre

integer, save	iclsyr

integer, save	iclptr

integer, save	idries

integer, save	ivrtex

integer, save	ivisse

integer, save	irevmc

integer, save	iprco

integer, save	irnpnw

double precision, save	rnormp

double precision, save	arak

integer, save	ivelco

integer, save	iporos

integer, save	swpdyn

integer, save	ipucou

integer, save	iccvfg

integer, save	imvisf

integer, dimension(ntypmx), save	idebty

integer, dimension(ntypmx), save	ifinty

integer, save	itbrrb

integer, dimension(nscamx), save	icpsyr

integer, save	iphydr

integer, save	icalhy

integer, dimension(nestmx), save	iescal

integer, save	nbmomt

integer, save	nbdtcm

integer, dimension(nbmomx), save	ntdmom

integer, dimension(nbmomx), save	imoold

integer, dimension(nbmomx), save	icmome

integer, dimension(nbmomx), save	idtmom

integer, dimension(ndgmox, nbmomx), save	idfmom

integer, dimension(nbmomx), save	idgmom

integer, dimension(nbmomx), save	icdtmo

integer, dimension(nvppmx), save	ippmom

double precision, dimension(nbmomx), save	dtcmom

integer, save	ncpdct

integer, save	nfpt1t

integer, save	nctsmt

integer, save	iusini

integer, save	iuscfp

integer, save	ineedy

integer, save	imajdy

integer, save	icdpar

integer, save	nitmay

integer, save	nswrsy

integer, save	nswrgy

integer, save	imligy

integer, save	ircfly

integer, save	ischcy

integer, save	isstpy

integer, save	imgrpy

integer, save	iwarny

integer, save	ntcmxy

double precision, save	blency

double precision, save	epsily

double precision, save	epsrsy

double precision, save	epsrgy

double precision, save	climgy

double precision, save	extray

double precision, save	coumxy

double precision, save	epscvy

double precision, save	yplmxy

integer, save	ineedf

Modules

Variables