source:
trunk/libf/phylmd/conema3.h
@
1
| Last change on this file since 1 was 1, checked in by , 14 years ago | |
|---|---|
| File size: 476 bytes | |
| Rev | Line | |
|---|---|---|
| [1] | 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.
