| 1 | ! |
|---|
| 2 | ! part of the module_lmd_driver program |
|---|
| 3 | ! that is (number of domains)-dependent |
|---|
| 4 | ! |
|---|
| 5 | |
|---|
| 6 | |
|---|
| 7 | CALL inifis(ngridmx,nlayer, & |
|---|
| 8 | wday_ini,wdaysec, & |
|---|
| 9 | wappel_phys, & |
|---|
| 10 | lat_vec,lon_vec,aire_vec,1/reradius,g,r_d,cp, & |
|---|
| 11 | nqmx,dt, & |
|---|
| 12 | womeg,wmugaz, & |
|---|
| 13 | wyear_day,wperiheli,waphelie,wperi_day,wobliquit, & |
|---|
| 14 | wz0,wemin_turb,wlmixmin, & |
|---|
| 15 | wemissiv,wemissiceN,wemissiceS,walbediceN,walbediceS, & |
|---|
| 16 | wiceradiusN,wiceradiusS,wdtemisiceN,wdtemisiceS, & |
|---|
| 17 | #ifdef NEWPHYS |
|---|
| 18 | walbedodat, wphisfi, wvolcapa, wz0tab, & |
|---|
| 19 | #else |
|---|
| 20 | walbedodat, winertiedat, wphisfi, & |
|---|
| 21 | #endif |
|---|
| 22 | wzmea,wzstd,wzsig,wzgam,wzthe, & |
|---|
| 23 | wtheta, wpsi) |
|---|