From dd3ab613ee092c0bc7459170ac2a4d78417b642d Mon Sep 17 00:00:00 2001 From: Bryan Herman Date: Thu, 29 Mar 2012 14:38:48 -0700 Subject: [PATCH] changed bounds of source bank iteration loop --- src/cmfd_execute.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/cmfd_execute.F90 b/src/cmfd_execute.F90 index b9fd22621a..6aa456626a 100644 --- a/src/cmfd_execute.F90 +++ b/src/cmfd_execute.F90 @@ -330,7 +330,7 @@ contains subroutine cmfd_reweight() - use global, only: n_particles,meshes,source_bank,n_bank + use global, only: n_particles,meshes,source_bank,work use mesh_header, only: StructuredMesh use mesh, only: count_fission_sites,get_mesh_indices