|
Last change
on this file since 1572 was
1422,
checked in by milmd, 10 years ago
|
|
In GENERIC, MARS and COMMON models replace some include files by modules (usefull for decoupling physics with dynamics).
|
|
File size:
559 bytes
|
| Line | |
|---|
| 1 | MODULE logic_mod |
|---|
| 2 | |
|---|
| 3 | IMPLICIT NONE |
|---|
| 4 | |
|---|
| 5 | LOGICAL purmats,forward,leapf,apphys,statcl,conser, & |
|---|
| 6 | & apdiss,apdelq,saison,ecripar,fxyhypb,ysinus & |
|---|
| 7 | & ,read_start,ok_guide,ok_strato,tidal,ok_gradsfile & |
|---|
| 8 | & ,ok_limit,ok_etat0,physic,grireg |
|---|
| 9 | logical hybrid ! vertical coordinate is hybrid if true (sigma otherwise) |
|---|
| 10 | ! (only used if disvert_type==2) |
|---|
| 11 | logical moyzon_mu,moyzon_ch ! used for zonal averages in Titan |
|---|
| 12 | |
|---|
| 13 | integer iflag_phys,iflag_trac |
|---|
| 14 | |
|---|
| 15 | END MODULE logic_mod |
|---|
Note: See
TracBrowser
for help on using the repository browser.
