Skip to content
Snippets Groups Projects
Commit c24703ea authored by Juan Escobar's avatar Juan Escobar
Browse files

Juan 24/03/2017 : modd_wp.F90 , auto detection of size of real for possible compilation in 4/8bytes

parent 71693a7b
No related branches found
No related tags found
No related merge requests found
......@@ -5,5 +5,7 @@
MODULE modd_wp
!! necessary for compiling Gelato, but not included in LIB/GELATO for reasons relevant to
!! Gelato build process
INTEGER, PUBLIC, PARAMETER :: wp = SELECTED_REAL_KIND(12,307) !: double precision (real 8)
!! Modi J.Escobar 24/03/2017 : auto detection of size of real for possible compilation in 4/8bytes
REAL , PRIVATE :: REAL_DEF_WP
INTEGER, PUBLIC, PARAMETER :: wp = KIND(REAL_DEF_WP) ! SELECTED_REAL_KIND(12,307) !: double precision (real 8)
END MODULE modd_wp
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment