01_EFT_def.f90

Go to the documentation of this file.

!----------------------------------------------------------------------------------------
!
! This file is part of EFTCAMB.
!
! Copyright (C) 2013-2016 by the EFTCAMB authors
!
! The EFTCAMB code is free software;
! You can use it, redistribute it, and/or modify it under the terms
! of the GNU General Public License as published by the Free Software Foundation;
! either version 3 of the License, or (at your option) any later version.
! The full text of the license can be found in the file eftcamb/LICENSE at
! the top level of the EFTCAMB distribution.
!
!----------------------------------------------------------------------------------------



!----------------------------------------------------------------------------------------


module eft_def

    use precision

    implicit none

    ! EFT compile time flags:

    real(dl), parameter :: eftturnonpiinitial = 1.d-2 

    real(dl), parameter :: efttogr = 1.d-8 

    integer , parameter :: eft_names_max_length       = 20
    integer , parameter :: eft_names_latex_max_length = 40

    integer , parameter :: eft_rgr_num_points   = 1000

#ifdef DEBUG
    logical , parameter :: debugeftcamb = .true.              
#else
    logical , parameter :: debugeftcamb = .false.             
#endif

end module eft_def

!----------------------------------------------------------------------------------------