diff options
author | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2006-08-01 12:57:45 +0000 |
---|---|---|
committer | hawke <hawke@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2006-08-01 12:57:45 +0000 |
commit | 1db9e820e488272d13b6331d4f81aa9c2d637fbc (patch) | |
tree | 502778f424980849482fc46ad3a8b2454a5c3bf4 /src/RK4.c | |
parent | 5b12759aff89d3e5854999776b169112e8510111 (diff) |
Modification for evolving array variables; change to local
arrays. This gets around the problems with the driver allocating the
scratch space differently on multiprocessors from the individual
arrays.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@116 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b
Diffstat (limited to 'src/RK4.c')
-rw-r--r-- | src/RK4.c | 21 |
1 files changed, 0 insertions, 21 deletions
@@ -212,27 +212,6 @@ CCTK_WARN(0, "not done"); arrayscratchlocation = 0; - arraytotalsize = MoL_Max_Evolved_Array_Size; - if (MoL_Num_Scratch_Levels) - { - groupindex = CCTK_GroupIndex("MOL::ARRAYSCRATCHSPACE"); - ierr = CCTK_GroupDynamicData(cctkGH, groupindex, - &arraydata); - if (ierr) - { - CCTK_VWarn(0, __LINE__, __FILE__, CCTK_THORNSTRING, - "The driver does not return group information " - "for group '%s' (%d).", - CCTK_GroupName(groupindex), ierr); - } - arraytotalsize = 1; - for (arraydim = 0; arraydim < arraydata.dim; arraydim++) - { - arraytotalsize *= arraydata.lsh[arraydim]; - } - } - singlearraysize = arraytotalsize / MoLNumEvolvedArrayVariables; - for (var = 0; var < MoLNumEvolvedArrayVariables; var++) { |