source:
trunk/libf/phylmd/YOMCST2.h
@
1
Last change on this file since 1 was 1, checked in by , 14 years ago | |
---|---|
File size: 589 bytes |
Rev | Line | |
---|---|---|
[1] | 1 | |
2 | INTEGER choice, iflag_mix | |
3 | REAL gammas, alphas, betas, Fmax, qqa1, qqa2, qqa3, scut | |
4 | REAL Qcoef1max,Qcoef2max,Supcrit1,Supcrit2 | |
5 | ! | |
6 | COMMON/YOMCST2/gammas, alphas, betas, Fmax, scut, & | |
7 | & qqa1, qqa2, qqa3, & | |
8 | & Qcoef1max,Qcoef2max, & | |
9 | & Supcrit1, Supcrit2, & | |
10 | & choice,iflag_mix | |
11 | !$OMP THREADPRIVATE(/YOMCST2/) | |
12 | ! -------------------------------------------------------------------- | |
13 |
Note: See TracBrowser
for help on using the repository browser.