libf/phylmd/radopt.f90

module radopt

  ! From phylmd/radopt.h,v 1.1.1.1 2004/05/19 12:53:09

  implicit none

  LOGICAL, PARAMETER:: LEVOIGT=.FALSE.
  INTEGER, PARAMETER:: NOVLP=1
  INTEGER, PARAMETER:: KAER=0

end module radopt
1	guez	3	module radopt
2
3			! From phylmd/radopt.h,v 1.1.1.1 2004/05/19 12:53:09
4
5			implicit none
6
7			LOGICAL, PARAMETER:: LEVOIGT=.FALSE.
8			INTEGER, PARAMETER:: NOVLP=1
9			INTEGER, PARAMETER:: KAER=0
10
11			end module radopt