Initial commit with file writing and create mode working for atoms
This commit is contained in:
parent
624886bbe9
commit
8217e8b51c
15 changed files with 2465 additions and 271 deletions
8
src/parameters.f90
Normal file
8
src/parameters.f90
Normal file
|
@ -0,0 +1,8 @@
|
|||
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
|
Loading…
Add table
Add a link
Reference in a new issue