You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
8 lines
235 B
8 lines
235 B
5 years ago
|
module parameters
|
||
|
|
|
||
|
|
implicit none
|
||
|
|
|
||
|
|
integer, parameter :: dp= selected_real_kind(15,307)
|
||
|
|
real(kind=dp), parameter :: lim_zero = epsilon(1.0_dp), &
|
||
|
|
lim_large = huge(1.0_dp)
|
||
|
|
end module parameters
|