CFD/hypre
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed problems with previous version.

Browse Source 
This version seems to be working.
This commit is contained in:
falgout 1997-12-10 23:20:58 +00:00
parent 3b5f7d1219
commit f26123e24d
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
struct_matrix_vector/struct_grid.c
View File

@ -66,7 +66,7 @@ zzz_NewAssembledStructGrid( MPI_Comm *comm,
global_size = 0;
local_size = 0;
boxes = zzz_NewBoxArray();
box_ranks = zzz_TAlloc(int, zzz_BoxArraySize(boxes));
box_ranks = zzz_TAlloc(int, zzz_BoxArraySize(all_boxes));
j = 0;
zzz_ForBoxI(i, all_boxes)
@ -74,7 +74,7 @@ zzz_NewAssembledStructGrid( MPI_Comm *comm,
box = zzz_BoxArrayBox(all_boxes, i);
box_volume = zzz_BoxVolume(box);
if (zzz_StructGridProcess(grid, i) == my_rank)
if (processes[i] == my_rank)
{
zzz_AppendBox(box, boxes);
box_ranks[j++] = i;

4
struct_mv/struct_grid.c
View File

@ -66,7 +66,7 @@ zzz_NewAssembledStructGrid( MPI_Comm *comm,
global_size = 0;
local_size = 0;
boxes = zzz_NewBoxArray();
box_ranks = zzz_TAlloc(int, zzz_BoxArraySize(boxes));
box_ranks = zzz_TAlloc(int, zzz_BoxArraySize(all_boxes));
j = 0;
zzz_ForBoxI(i, all_boxes)
@ -74,7 +74,7 @@ zzz_NewAssembledStructGrid( MPI_Comm *comm,
box = zzz_BoxArrayBox(all_boxes, i);
box_volume = zzz_BoxVolume(box);
if (zzz_StructGridProcess(grid, i) == my_rank)
if (processes[i] == my_rank)
{
zzz_AppendBox(box, boxes);
box_ranks[j++] = i;