|
Last change
on this file since 591 was
590,
checked in by aslmd, 13 years ago
|
|
LMDZ.GENERIC: Introduced global1d in callcorrk so that global (using sza) or local (using latitude) 1D simulations can be carried out. Converted all astronomical distances in AU instead of Mkm. This might cause problems with old start files. So added a test in iniorbit. A quite dirty test, but thatll do the job.
|
|
File size:
4.8 KB
|
| Line | |
|---|
| 1 | ! |
|---|
| 2 | ! For Fortran 77/Fortran 90 compliance always use line continuation |
|---|
| 3 | ! symbols '&' in columns 73 and 6 |
|---|
| 4 | ! |
|---|
| 5 | COMMON/callkeys/callrad,corrk,calldifv,calladj & |
|---|
| 6 | & , co2cond,callsoil & |
|---|
| 7 | & , season,diurnal,tlocked,iradia,lwrite & |
|---|
| 8 | & , iaervar,iddist,topdustref,callstats,calleofdump & |
|---|
| 9 | & , enertest & |
|---|
| 10 | & , callgasvis & |
|---|
| 11 | & , Continuum & |
|---|
| 12 | & , Nmix_co2, Nmix_h2o & |
|---|
| 13 | & , dusttau & |
|---|
| 14 | & , nonideal & |
|---|
| 15 | & , meanOLR & |
|---|
| 16 | & , specOLR & |
|---|
| 17 | & , kastprof & |
|---|
| 18 | & , noradsurf & |
|---|
| 19 | & , graybody & |
|---|
| 20 | & , Tstrat & |
|---|
| 21 | & , newtonian & |
|---|
| 22 | & , check_cpp_match & |
|---|
| 23 | & , force_cpp & |
|---|
| 24 | & , tau_relax & |
|---|
| 25 | & , testradtimes & |
|---|
| 26 | & , rayleigh & |
|---|
| 27 | & , stelbbody & |
|---|
| 28 | & , stelTbb & |
|---|
| 29 | & , tplanet & |
|---|
| 30 | & , startype & |
|---|
| 31 | & , Fat1AU & |
|---|
| 32 | & , nearco2cond & |
|---|
| 33 | & , tracer & |
|---|
| 34 | & , varactive & |
|---|
| 35 | & , varfixed & |
|---|
| 36 | & , satval & |
|---|
| 37 | & , sedimentation,water,watercond,waterrain & |
|---|
| 38 | & , rainthreshold & |
|---|
| 39 | & , aerofixed & |
|---|
| 40 | & , hydrology & |
|---|
| 41 | & , sourceevol & |
|---|
| 42 | & , icetstep & |
|---|
| 43 | & , albedosnow & |
|---|
| 44 | & , maxicethick & |
|---|
| 45 | & , Tsaldiff & |
|---|
| 46 | & , CLFfixval & |
|---|
| 47 | & , CLFvarying & |
|---|
| 48 | & , n2mixratio & |
|---|
| 49 | & , co2supsat & |
|---|
| 50 | & , cloudlvl & |
|---|
| 51 | & , pceil |
|---|
| 52 | |
|---|
| 53 | logical callrad,corrk,calldifv,calladj,co2cond,callsoil & |
|---|
| 54 | & , season,diurnal,tlocked,lwrite & |
|---|
| 55 | & , callstats,calleofdump & |
|---|
| 56 | & , callgasvis,Continuum |
|---|
| 57 | |
|---|
| 58 | logical enertest |
|---|
| 59 | logical nonideal |
|---|
| 60 | logical meanOLR |
|---|
| 61 | logical specOLR |
|---|
| 62 | logical kastprof |
|---|
| 63 | logical newtonian |
|---|
| 64 | logical check_cpp_match |
|---|
| 65 | logical force_cpp |
|---|
| 66 | logical testradtimes |
|---|
| 67 | logical rayleigh |
|---|
| 68 | logical stelbbody |
|---|
| 69 | logical ozone |
|---|
| 70 | logical nearco2cond |
|---|
| 71 | logical tracer |
|---|
| 72 | logical varactive |
|---|
| 73 | logical varfixed |
|---|
| 74 | logical sedimentation |
|---|
| 75 | logical water,watercond,waterrain |
|---|
| 76 | logical aerofixed |
|---|
| 77 | logical hydrology |
|---|
| 78 | logical sourceevol |
|---|
| 79 | logical CLFvarying |
|---|
| 80 | logical noradsurf |
|---|
| 81 | logical graybody |
|---|
| 82 | |
|---|
| 83 | integer iddist |
|---|
| 84 | integer iaervar |
|---|
| 85 | integer iradia |
|---|
| 86 | integer startype |
|---|
| 87 | |
|---|
| 88 | real topdustref |
|---|
| 89 | real Nmix_co2 |
|---|
| 90 | real Nmix_h2o |
|---|
| 91 | real dusttau |
|---|
| 92 | real Fat1AU |
|---|
| 93 | real stelTbb |
|---|
| 94 | real Tstrat |
|---|
| 95 | real tplanet |
|---|
| 96 | real satval |
|---|
| 97 | real rainthreshold |
|---|
| 98 | real CLFfixval |
|---|
| 99 | real n2mixratio |
|---|
| 100 | real co2supsat |
|---|
| 101 | real pceil |
|---|
| 102 | real albedosnow |
|---|
| 103 | real maxicethick |
|---|
| 104 | real Tsaldiff |
|---|
| 105 | real tau_relax |
|---|
| 106 | real cloudlvl |
|---|
| 107 | real icetstep |
|---|
| 108 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
