Parent Directory | Revision Log | Patch
trunk/libf/phylmd/radopt.f90 revision 70 by guez, Wed Feb 27 13:16:39 2008 UTC | trunk/libf/phylmd/Radlwsw/radopt.f90 revision 71 by guez, Mon Jul 8 18:12:18 2013 UTC | |
---|---|---|
# | Line 1 | Line 1 |
1 | module radopt | module radopt |
2 | ||
3 | ! From phylmd/radopt.h,v 1.1.1.1 2004/05/19 12:53:09 | ! From phylmd/radopt.h, version 1.1.1.1, 2004/05/19 12:53:09 |
4 | ||
5 | implicit none | implicit none |
6 | ||
7 | LOGICAL, PARAMETER:: LEVOIGT=.FALSE. | LOGICAL, PARAMETER:: LEVOIGT = .FALSE. |
8 | INTEGER, PARAMETER:: NOVLP=1 | INTEGER, PARAMETER:: NOVLP = 1 |
9 | INTEGER, PARAMETER:: KAER=0 | INTEGER, PARAMETER:: KAER = 0 |
10 | ||
11 | end module radopt | end module radopt |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |