--- trunk/libf/phylmd/radopt.f90 2008/02/27 13:16:39 3 +++ trunk/phylmd/Radlwsw/radopt.f 2014/03/05 14:57:53 82 @@ -1,11 +1,11 @@ module radopt - ! 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 implicit none - LOGICAL, PARAMETER:: LEVOIGT=.FALSE. - INTEGER, PARAMETER:: NOVLP=1 - INTEGER, PARAMETER:: KAER=0 + LOGICAL, PARAMETER:: LEVOIGT = .FALSE. + INTEGER, PARAMETER:: NOVLP = 1 + INTEGER, PARAMETER:: KAER = 0 end module radopt