diff --git a/Source/ccib.f90 b/Source/ccib.f90 index 36aaae79f4..b34e548c2b 100644 --- a/Source/ccib.f90 +++ b/Source/ccib.f90 @@ -12046,6 +12046,10 @@ SUBROUTINE GET_EXPLICIT_ADVDIFFVECTOR_SCALAR_3D(N) INTEGER :: IIG,JJG,KKG,IOR REAL(EB) :: UN +U_TEMP => U_WORK +F_TEMP => F_WORK +Z_TEMP => Z_WORK + ! Mesh Loop: MESH_LOOP : DO NM=LOWER_MESH_INDEX,UPPER_MESH_INDEX