[cig-commits] [commit] devel: Fix ADIOS routine that was not compiling because of module changes (c672433)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Sat Jun 21 15:28:15 PDT 2014


Repository : https://github.com/geodynamics/specfem3d_globe

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d_globe/compare/1bc4138645fec5dc69d2dcc94a048c7330439566...d7e975d51811674e2c626eae1fdacffdf368ed92

>---------------------------------------------------------------

commit c6724332907b862865ed25fb0428f1acfff3793f
Author: Matthieu Lefebvre <ml15 at princeton.edu>
Date:   Sat Jun 21 18:17:39 2014 -0400

    Fix ADIOS routine that was not compiling because of module changes


>---------------------------------------------------------------

c6724332907b862865ed25fb0428f1acfff3793f
 src/specfem3D/read_mesh_databases_adios.f90 | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/specfem3D/read_mesh_databases_adios.f90 b/src/specfem3D/read_mesh_databases_adios.f90
index 6c4cbd7..0d9ea67 100644
--- a/src/specfem3D/read_mesh_databases_adios.f90
+++ b/src/specfem3D/read_mesh_databases_adios.f90
@@ -627,7 +627,6 @@ subroutine read_mesh_databases_addressing_adios()
   implicit none
 
   ! local parameters
-  integer, dimension(NCHUNKS_VAL,0:NPROC_XI_VAL-1,0:NPROC_ETA_VAL-1) :: addressing
   integer, dimension(0:NPROCTOT_VAL-1) :: ichunk_slice,iproc_xi_slice,iproc_eta_slice
   integer :: ierr,iproc,iproc_read,iproc_xi,iproc_eta
 



More information about the CIG-COMMITS mailing list