Changeset 14975 for vendors/AGRIF/dev/AGRIF_FILES/modgrids.F90

Timestamp:

2021-06-11T11:05:32+02:00 (3 years ago)

Author:

jchanut

Message:

#2638, merge new AGRIF library into trunk

File:

• vendors/AGRIF/dev/AGRIF_FILES/modgrids.F90 (modified) (1 diff)

vendors/AGRIF/dev/AGRIF_FILES/modgrids.F90

@@ -44 +44 @@
     type(Agrif_Variable_i), dimension(:), allocatable :: tabvars_i  !< List of integer   grid variables
 !
-    real   , dimension(3)              :: Agrif_x   !< global x, y and z position
-    real   , dimension(3)              :: Agrif_dx  !< global space step in the x, y and z direction
+    real(kind=8), dimension(3)         :: Agrif_x   !< global x, y and z position
+    real(kind=8)   , dimension(3)      :: Agrif_dx  !< global space step in the x, y and z direction
     real   , dimension(3)              :: Agrif_dt  !< global time  step in the x, y and z direction
     integer, dimension(3)              :: nb = 1    !< number of cells in the x, y and z direction