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	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