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

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Thu Nov 6 08:22:35 PST 2014


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

On branches: devel,master
Link       : https://github.com/geodynamics/specfem3d_globe/compare/bc58e579b3b0838a0968725a076f5904845437ca...be63f20cbb6f462104e949894dbe205d2398cd7f

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

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