IGMBaseLib 1.0

src/util/phys/Universal_Constants.f90

説明を見る。
00001 
00012 module Universal_Constants
00013   ! モジュール引用 ; Use statements
00014   !
00015   
00016   ! 種類型パラメータ
00017   ! Kind type parameter
00018   !
00019   use dc_types, only: DP ! 倍精度実数型. Double precision.
00020 
00021   ! 宣言文 ; Declaration statements
00022   !
00023   implicit none
00024   private
00025 
00028   real(DP), parameter :: univ_G = 6.67428e-11
00029 
00032   real(DP), parameter :: uni_R = 8.314472
00033 
00034 end module Universal_Constants
 全て クラス ネームスペース ファイル 関数 変数