cp2k/tools/Fun2D/kinds.f90

3 lines
65 B
Fortran

MODULE kinds
INTEGER, PARAMETER :: dp = KIND(0.0D0)
END MODULE