Juan 01/02/2023:ZSOLVER/../discretisation.f90, double size of NT1D buffer , to...

Juan 01/02/2023:ZSOLVER/../discretisation.f90, double size of NT1D buffer , to allow lev1 splitting in MG

src/ZSOLVER/tensorproductmultigrid_Source/discretisation.f90

@@ -148,7 +148,7 @@ private
 
   real(kind=rl), pointer , contiguous , dimension(:) :: zt1d_discretisation
   INTEGER                                            :: zt1d_discretisation_size = 10000000
-  INTEGER , parameter                                :: zt1d_discretisation_size_factor = 4 * 4
+  INTEGER , parameter                                :: zt1d_discretisation_size_factor = 4 * 8
   INTEGER                                            :: nt1d_discretisation_top = 0 , nt1d_discretisation_max = 0
   
   INTEGER , ALLOCATABLE, DIMENSION (:)               :: nt1d_discretisation_pointer , nt1d_discretisation_pointer_ksize