source:
trunk/libf/phylmd/conema3.h
@
80
| Last change on this file since 80 was 1, checked in by , 15 years ago | |
|---|---|
| File size: 476 bytes | |
| Line | |
|---|---|
| 1 | ! |
| 2 | ! $Header$ |
| 3 | !-- Modified by : Filiberti M-A 06/2005 |
| 4 | ! |
| 5 | real epmax ! 0.993 |
| 6 | logical ok_adj_ema ! F |
| 7 | integer iflag_clw ! 0 |
| 8 | integer iflag_cvl_sigd |
| 9 | real sig1feed ! 1. |
| 10 | real sig2feed ! 0.95 |
| 11 | |
| 12 | common/comconema1/epmax,ok_adj_ema,iflag_clw,sig1feed,sig2feed |
| 13 | common/comconema2/iflag_cvl_sigd |
| 14 | |
| 15 | ! common/comconema/epmax,ok_adj_ema,iflag_clw |
| 16 | !$OMP THREADPRIVATE(/comconema1/) |
| 17 | !$OMP THREADPRIVATE(/comconema2/) |
Note: See TracBrowser
for help on using the repository browser.
