phylmd/Radlwsw/radopt.f

module radopt

  ! From phylmd/radopt.h, version 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, version 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