constants.f90 Source File


Files dependent on this one

sourcefile~~constants.f90~~AfferentGraph sourcefile~constants.f90 constants.f90 sourcefile~base.f90 base.f90 sourcefile~base.f90->sourcefile~constants.f90 sourcefile~forsus.f90 forsus.F90 sourcefile~forsus.f90->sourcefile~constants.f90 sourcefile~show_available.f90 show_available.f90 sourcefile~forsus.f90->sourcefile~show_available.f90 sourcefile~properties.f90 properties.f90 sourcefile~forsus.f90->sourcefile~properties.f90 sourcefile~substance.f90 substance.f90 sourcefile~forsus.f90->sourcefile~substance.f90 sourcefile~scalar_property.f90 scalar_property.f90 sourcefile~scalar_property.f90->sourcefile~constants.f90 sourcefile~scalar_property.f90->sourcefile~base.f90 sourcefile~show_available.f90->sourcefile~constants.f90 sourcefile~critical_constants.f90 critical_constants.f90 sourcefile~critical_constants.f90->sourcefile~scalar_property.f90 sourcefile~group.f90 group.f90 sourcefile~group.f90->sourcefile~base.f90 sourcefile~properties.f90->sourcefile~scalar_property.f90 sourcefile~properties.f90->sourcefile~critical_constants.f90 sourcefile~properties.f90->sourcefile~group.f90 sourcefile~substance.f90->sourcefile~properties.f90

Source Code

module forsus_constants
    !! Package's constants.
    use iso_fortran_env, only: real64
    implicit none

    integer, parameter :: pr=real64
        !! Real precision (double)
    character(len=:), allocatable :: forsus_dir 
        !! Custom database directory
    character(len=*), parameter :: forsus_default_dir="data/json"
        !! Default database directory. Right now only works for development
        !! mode
end module