PhysicalConstants_ Derived Type

type, public :: PhysicalConstants_

Physical constants in terms of SI unit.


Components

Type Visibility Attributes Name Initial
real(kind=real64), public :: c = 299792458.0d0

speed of light in vacuum (m/s)

real(kind=real64), public :: speed_of_light = 299792458.0d0

speed of light in vacuum (m/s)

real(kind=real64), public :: Plank = 6.62607015*10.0d0**(-34.0)

the Plank constant (J s)

real(kind=real64), public :: g = 9.80665d0

standard acceleration of gravity (m/s)

real(kind=real64), public :: R = 8.31446261815324d0

Molar gas constant (J/K/mol)

real(kind=real64), public :: gas_constant = 8.31446261815324d0

Molar gas constant (J/K/mol)

real(kind=real64), public :: Avogadro = 6.02214076*10.0d0**23

Avogadro constant (/mol)

real(kind=real64), public :: k = 1.380649*10.0d0**(-23)

Boltzmann constant (J/K)

real(kind=real64), public :: Boltzmann = 1.380649*10.0d0**(-23)

Boltzmann constant(J/K)


Type-Bound Procedures

procedure, public :: unit => unitPhysicalConstants

It shows units for a physical quantities defined in attributes.

  • public function unitPhysicalConstants(obj, tgt) result(ret)

    Arguments

    Type IntentOptional Attributes Name
    class(PhysicalConstants_), intent(in) :: obj
    character(len=*), intent(in) :: tgt

    Return Value character(len=:), allocatable