Lines Matching full:map
246 /* copy over in_elms list and create inverse map */ in gsi_check_args()
271 /* set up inverse map */ in gsi_check_args()
310 /* compess map as well as keep track of local ops */ in gsi_check_args()
386 PetscInt *map; in gsi_via_bit_mask() local
400 map = gs->companion; in gsi_via_bit_mask()
408 map = gs->companion; in gsi_via_bit_mask()
416 **reduce = map[**reduce]; in gsi_via_bit_mask()
447 for (i = 0; i < nel; i++) elms[i] = map[elms[i]]; in gsi_via_bit_mask()
451 for (i = 0; i < nel; i++) elms[i] = map[elms[i]]; in gsi_via_bit_mask()
820 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_local_out() local
826 while ((map = *reduce++)) { in PCTFS_gs_gop_local_out()
830 vals[map[1]] = vals[map[0]]; in PCTFS_gs_gop_local_out()
833 vals[map[2]] = vals[map[1]] = vals[map[0]]; in PCTFS_gs_gop_local_out()
836 vals[map[3]] = vals[map[2]] = vals[map[1]] = vals[map[0]]; in PCTFS_gs_gop_local_out()
839 tmp = *(vals + *map++); in PCTFS_gs_gop_local_out()
840 while (*map >= 0) *(vals + *map++) = tmp; in PCTFS_gs_gop_local_out()
849 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_local_plus() local
855 while ((map = *reduce)) { in PCTFS_gs_gop_local_plus()
860 vals[map[1]] = vals[map[0]] += vals[map[1]]; in PCTFS_gs_gop_local_plus()
864 vals[map[2]] = vals[map[1]] = vals[map[0]] += (vals[map[1]] + vals[map[2]]); in PCTFS_gs_gop_local_plus()
868 …vals[map[1]] = vals[map[2]] = vals[map[3]] = vals[map[0]] += (vals[map[1]] + vals[map[2]] + vals[m… in PCTFS_gs_gop_local_plus()
872 while (*map >= 0) tmp += *(vals + *map++); in PCTFS_gs_gop_local_plus()
874 map = *reduce++; in PCTFS_gs_gop_local_plus()
875 while (*map >= 0) *(vals + *map++) = tmp; in PCTFS_gs_gop_local_plus()
884 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_local_in_plus() local
890 while ((map = *reduce++)) { in PCTFS_gs_gop_local_in_plus()
894 vals[map[0]] += vals[map[1]]; in PCTFS_gs_gop_local_in_plus()
897 vals[map[0]] += (vals[map[1]] + vals[map[2]]); in PCTFS_gs_gop_local_in_plus()
900 vals[map[0]] += (vals[map[1]] + vals[map[2]] + vals[map[3]]); in PCTFS_gs_gop_local_in_plus()
903 base = vals + *map++; in PCTFS_gs_gop_local_in_plus()
904 while (*map >= 0) *base += *(vals + *map++); in PCTFS_gs_gop_local_in_plus()
1020 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_vec_local_plus() local
1026 while ((map = *reduce)) { in PCTFS_gs_gop_vec_local_plus()
1027 base = vals + map[0] * step; in PCTFS_gs_gop_vec_local_plus()
1033 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1034 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1038 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1039 PetscCall(PCTFS_rvec_add(base, vals + map[2] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1040 PetscCall(PCTFS_rvec_copy(vals + map[2] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1041 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1045 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1046 PetscCall(PCTFS_rvec_add(base, vals + map[2] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1047 PetscCall(PCTFS_rvec_add(base, vals + map[3] * step, step)); in PCTFS_gs_gop_vec_local_plus()
1048 PetscCall(PCTFS_rvec_copy(vals + map[3] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1049 PetscCall(PCTFS_rvec_copy(vals + map[2] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1050 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1053 while (*++map >= 0) PetscCall(PCTFS_rvec_add(base, vals + *map * step, step)); in PCTFS_gs_gop_vec_local_plus()
1055 map = *reduce; in PCTFS_gs_gop_vec_local_plus()
1056 while (*++map >= 0) PetscCall(PCTFS_rvec_copy(vals + *map * step, base, step)); in PCTFS_gs_gop_vec_local_plus()
1067 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_vec_local_in_plus() local
1073 while ((map = *reduce++)) { in PCTFS_gs_gop_vec_local_in_plus()
1074 base = vals + map[0] * step; in PCTFS_gs_gop_vec_local_in_plus()
1079 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1082 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1083 PetscCall(PCTFS_rvec_add(base, vals + map[2] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1086 PetscCall(PCTFS_rvec_add(base, vals + map[1] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1087 PetscCall(PCTFS_rvec_add(base, vals + map[2] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1088 PetscCall(PCTFS_rvec_add(base, vals + map[3] * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1091 while (*++map >= 0) PetscCall(PCTFS_rvec_add(base, vals + *map * step, step)); in PCTFS_gs_gop_vec_local_in_plus()
1100 PetscInt *num, *map, **reduce; in PCTFS_gs_gop_vec_local_out() local
1106 while ((map = *reduce++)) { in PCTFS_gs_gop_vec_local_out()
1107 base = vals + map[0] * step; in PCTFS_gs_gop_vec_local_out()
1112 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1115 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1116 PetscCall(PCTFS_rvec_copy(vals + map[2] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1119 PetscCall(PCTFS_rvec_copy(vals + map[1] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1120 PetscCall(PCTFS_rvec_copy(vals + map[2] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1121 PetscCall(PCTFS_rvec_copy(vals + map[3] * step, base, step)); in PCTFS_gs_gop_vec_local_out()
1124 while (*++map >= 0) PetscCall(PCTFS_rvec_copy(vals + *map * step, base, step)); in PCTFS_gs_gop_vec_local_out()