! ! For Fortran 77/Fortran 90 compliance always use line continuation ! symbols '&' in columns 73 and 6 ! COMMON/callkeys/callrad,corrk,calldifv,calladj & & , co2cond,callsoil & & , season,diurnal,tlocked,iradia,lwrite & & , iaervar,iddist,topdustref,callstats,calleofdump & & , enertest & & , callgasvis & & , Continuum & & , Nmix_co2, Nmix_h2o & & , dusttau & & , nonideal & & , meanOLR & & , specOLR & & , kastprof & & , noradsurf & & , graybody & & , Tstrat & & , newtonian & & , tau_relax & & , testradtimes & & , rayleigh & & , stelbbody & & , stelTbb & & , tplanet & & , startype & & , Fat1AU & & , nearco2cond & & , tracer & & , varactive & & , varfixed & & , satval & & , sedimentation,water,watercond,waterrain & & , rainthreshold & & , aerofixed & & , szangle & & , hydrology & & , sourceevol & & , icetstep & & , albedosnow & & , maxicethick & & , Tsaldiff & & , CLFfixval & & , CLFvarying & & , n2mixratio & & , co2supsat & & , cloudlvl & & , pceil logical callrad,corrk,calldifv,calladj,co2cond,callsoil & & , season,diurnal,tlocked,lwrite & & , callstats,calleofdump & & , callgasvis,Continuum logical enertest logical nonideal logical meanOLR logical specOLR logical kastprof logical newtonian logical testradtimes logical rayleigh logical stelbbody logical ozone logical nearco2cond logical tracer logical varactive logical varfixed logical sedimentation logical water,watercond,waterrain logical aerofixed logical hydrology logical sourceevol logical CLFvarying logical noradsurf logical graybody integer iddist integer iaervar integer iradia integer startype real topdustref real Nmix_co2 real Nmix_h2o real dusttau real Fat1AU real stelTbb real Tstrat real tplanet real satval real rainthreshold real szangle real CLFfixval real n2mixratio real co2supsat real pceil real albedosnow real maxicethick real Tsaldiff real tau_relax real cloudlvl real icetstep