/dports/devel/ga/ga-5.8/armci/src-portals/ |
H A D | groups.c | 36 ARMCI_iGroup igroup; member 71 *igroup = &new_group_list_item->igroup; in armci_create_group_and_igroup() 101 return MPI_Group_rank((MPI_Group)(igroup->igroup), rank); in ARMCI_Group_rank() 111 MPI_Group_size((MPI_Group)(igroup->igroup), size); in ARMCI_Group_size() 254 if(comm==MPI_COMM_NULL || igroup->igroup==MPI_GROUP_NULL) in group_process_list() 359 rv=MPI_Group_free(&(igroup->igroup)); in armci_igroup_finalize() 466 MPI_Group_rank((MPI_Group)(igroup->igroup), &grp_me); in ARMCI_Group_create_child() 492 MPI_Comm_group(igroup->icomm, &igroup->igroup); /*the group associated with comm*/ in ARMCI_Group_create_child() 523 igroup = &group_list->igroup; in armci_group_init() 539 MPI_Comm_group(ARMCI_COMM_WORLD, &(igroup->igroup)); in armci_group_init() [all …]
|
/dports/devel/ga/ga-5.8/armci/src/common/ |
H A D | groups.c | 36 ARMCI_iGroup igroup; member 71 *igroup = &new_group_list_item->igroup; in armci_create_group_and_igroup() 101 return MPI_Group_rank((MPI_Group)(igroup->igroup), rank); in ARMCI_Group_rank() 111 MPI_Group_size((MPI_Group)(igroup->igroup), size); in ARMCI_Group_size() 255 if(comm==MPI_COMM_NULL || igroup->igroup==MPI_GROUP_NULL) in group_process_list() 360 rv=MPI_Group_free(&(igroup->igroup)); in armci_igroup_finalize() 467 MPI_Group_rank((MPI_Group)(igroup->igroup), &grp_me); in ARMCI_Group_create_child() 493 MPI_Comm_group(igroup->icomm, &igroup->igroup); /*the group associated with comm*/ in ARMCI_Group_create_child() 524 igroup = &group_list->igroup; in armci_group_init() 540 MPI_Comm_group(ARMCI_COMM_WORLD, &(igroup->igroup)); in armci_group_init() [all …]
|
/dports/devel/ga/ga-5.8/armci/src-gemini/ |
H A D | groups.c | 36 ARMCI_iGroup igroup; member 71 *igroup = &new_group_list_item->igroup; in armci_create_group_and_igroup() 101 return MPI_Group_rank((MPI_Group)(igroup->igroup), rank); in ARMCI_Group_rank() 111 MPI_Group_size((MPI_Group)(igroup->igroup), size); in ARMCI_Group_size() 254 if(comm==MPI_COMM_NULL || igroup->igroup==MPI_GROUP_NULL) in group_process_list() 359 rv=MPI_Group_free(&(igroup->igroup)); in armci_igroup_finalize() 466 MPI_Group_rank((MPI_Group)(igroup->igroup), &grp_me); in ARMCI_Group_create_child() 492 MPI_Comm_group(igroup->icomm, &igroup->igroup); /*the group associated with comm*/ in ARMCI_Group_create_child() 523 igroup = &group_list->igroup; in armci_group_init() 539 MPI_Comm_group(ARMCI_COMM_WORLD, &(igroup->igroup)); in armci_group_init() [all …]
|
/dports/comms/flamp/flamp-2.2.07/src/utils/ |
H A D | base128.cxx | 134 t_byte igroup[7], ogroup[8]; in encode() local 145 igroup[0] = igroup[1] = igroup[2] = in encode() 146 igroup[3] = igroup[4] = igroup[5] = igroup[6] = 0; in encode() 152 igroup[n] = (t_byte)in[iocp]; in encode() 157 ogroup[1] = ((igroup[0] << 6) & 0x40) | ((igroup[1] >> 2) & 0x3F); in encode() 158 ogroup[2] = ((igroup[1] << 5) & 0x60) | ((igroup[2] >> 3) & 0x1F); in encode() 159 ogroup[3] = ((igroup[2] << 4) & 0x70) | ((igroup[3] >> 4) & 0x0F); in encode() 160 ogroup[4] = ((igroup[3] << 3) & 0x78) | ((igroup[4] >> 5) & 0x07); in encode() 161 ogroup[5] = ((igroup[4] << 2) & 0x7C) | ((igroup[5] >> 6) & 0x03); in encode() 162 ogroup[6] = ((igroup[5] << 1) & 0x7E) | ((igroup[6] >> 7) & 0x01); in encode() [all …]
|
/dports/comms/flmsg/flmsg-4.0.19/src/utils/ |
H A D | base128.cxx | 123 t_type igroup[7], ogroup[8]; in encode() local 135 igroup[0] = igroup[1] = igroup[2] = in encode() 136 igroup[3] = igroup[4] = igroup[5] = igroup[6] = 0; in encode() 142 igroup[n] = (t_type)in[iocp]; in encode() 147 ogroup[1] = ((igroup[0] << 6) & 0x40) | ((igroup[1] >> 2) & 0x3F); in encode() 148 ogroup[2] = ((igroup[1] << 5) & 0x60) | ((igroup[2] >> 3) & 0x1F); in encode() 149 ogroup[3] = ((igroup[2] << 4) & 0x70) | ((igroup[3] >> 4) & 0x0F); in encode() 150 ogroup[4] = ((igroup[3] << 3) & 0x78) | ((igroup[4] >> 5) & 0x07); in encode() 151 ogroup[5] = ((igroup[4] << 2) & 0x7C) | ((igroup[5] >> 6) & 0x03); in encode() 152 ogroup[6] = ((igroup[5] << 1) & 0x7E) | ((igroup[6] >> 7) & 0x01); in encode() [all …]
|
/dports/science/sparta/sparta-20Oct2021/src/ |
H A D | compute_tvib_grid.cpp | 125 for (int igroup = 0; igroup < ngroup; igroup++) { in ComputeTvibGrid() local 126 nmap[igroup] = 2*groupsize[igroup]; in ComputeTvibGrid() 153 for (int igroup = 0; igroup < ngroup; igroup++) { in ComputeTvibGrid() local 154 nmap[igroup] = 2*groupsize[igroup]*maxmode; in ComputeTvibGrid() 185 for (int igroup = 0; igroup < ngroup; igroup++) { in ComputeTvibGrid() local 186 nmap[igroup*maxmode] = 2*groupsize[igroup]*maxmode; in ComputeTvibGrid() 201 for (int igroup = 0; igroup < ngroup; igroup++) { in ComputeTvibGrid() local 203 nmap[igroup*maxmode + imode] = nmap[igroup*maxmode]; in ComputeTvibGrid() 208 map[igroup*maxmode + imode][icol] = map[igroup*maxmode][icol]; in ComputeTvibGrid() 299 igroup = s2g[ispecies]; in compute_per_grid() [all …]
|
H A D | collide.h | 138 if (ngroup[igroup] == maxgroup[igroup]) { in addgroup() 139 maxgroup[igroup] += DELTAPART; in addgroup() 140 memory->grow(glist[igroup],maxgroup[igroup],"collide:grouplist"); in addgroup() 142 int ng = ngroup[igroup]; in addgroup() 143 glist[igroup][ng] = pindex; in addgroup() 144 p2g[pindex][0] = igroup; in addgroup() 146 ngroup[igroup]++; in addgroup() 151 int ng = ngroup[igroup]; in delgroup() 153 glist[igroup][i] = glist[igroup][ng-1]; in delgroup() 155 p2g[pindex][0] = igroup; in delgroup() [all …]
|
H A D | collide.cpp | 262 for (int igroup = 0; igroup < ngroups; igroup++) in init() local 264 vremax_initial[igroup][jgroup] = vremax_init(igroup,jgroup); in init() 396 for (int igroup = 0; igroup < ngroups; igroup++) in reset_vremax() local 643 if (ngroup[igroup] == maxgroup[igroup]) { in collisions_group() 645 memory->grow(glist[igroup],maxgroup[igroup],"collide:glist"); in collisions_group() 673 for (igroup = 0; igroup < ngroups; igroup++) in collisions_group() 1224 if (ngroup[igroup] == maxgroup[igroup]) { in collisions_group_ambipolar() 1226 memory->grow(glist[igroup],maxgroup[igroup],"collide:glist"); in collisions_group_ambipolar() 1266 for (igroup = 0; igroup < ngroups; igroup++) in collisions_group_ambipolar() 1785 for (int igroup = 0; igroup < ngroups; igroup++) in add_grid_one() local [all …]
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | qs_cdft_methods.F | 279 atom_in_group(igroup, group(igroup)%atoms(ip)) = .TRUE. 520 … sum_cell_f_group(igroup) = sum_cell_f_group(igroup) + group(igroup)%coeff(ip)* & 646 DO igroup = 1, SIZE(group) 739 DO igroup = 1, SIZE(group) 757 DO igroup = 1, SIZE(group) 864 …dE(igroup) = dE(igroup) + sign*accurate_dot_product(group(igroup)%weight%pw%cr3d, rho_r(i)%pw%cr3d… 867 … dE(igroup) = dE(igroup) + sign*accurate_sum(group(igroup)%weight%pw%cr3d*rho_r(i)%pw%cr3d)*dvol 919 …gapw_offset(igroup, i) = gapw_offset(igroup, i) + sign*group(igroup)%coeff(iatom)*mp_rho(jatom)%q0… 1085 cdft_control%target(igroup) = cdft_control%target(igroup) + & 1089 cdft_control%target(igroup) = cdft_control%target(igroup) + & [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | qs_cdft_methods.F | 278 atom_in_group(igroup, group(igroup)%atoms(ip)) = .TRUE. 519 … sum_cell_f_group(igroup) = sum_cell_f_group(igroup) + group(igroup)%coeff(ip)* & 645 DO igroup = 1, SIZE(group) 738 DO igroup = 1, SIZE(group) 756 DO igroup = 1, SIZE(group) 863 …dE(igroup) = dE(igroup) + sign*accurate_dot_product(group(igroup)%weight%pw%cr3d, rho_r(i)%pw%cr3d… 866 … dE(igroup) = dE(igroup) + sign*accurate_sum(group(igroup)%weight%pw%cr3d*rho_r(i)%pw%cr3d)*dvol 918 …gapw_offset(igroup, i) = gapw_offset(igroup, i) + sign*group(igroup)%coeff(iatom)*mp_rho(jatom)%q0… 1084 cdft_control%target(igroup) = cdft_control%target(igroup) + & 1088 cdft_control%target(igroup) = cdft_control%target(igroup) + & [all …]
|
/dports/devel/ga/ga-5.8/comex/src-mpi-pr/ |
H A D | groups.c | 127 *rank = igroup->rank; in comex_group_rank() 141 *size = igroup->size; in comex_group_size() 155 *comm = igroup->comm; in comex_group_comm() 203 COMEX_ASSERT(igroup); in _igroup_free() 225 free(igroup->world_ranks); in _igroup_free() 228 free(igroup); in _igroup_free() 265 igroup->world_ranks = (int*)malloc(sizeof(int)*igroup->size); in _igroup_set_world_ranks() 273 1,MPI_INT,igroup->comm); in _igroup_set_world_ranks() 558 status = MPI_Comm_group(igroup->comm, &(igroup->group)); in comex_group_init() 560 status = MPI_Comm_rank(igroup->comm, &(igroup->rank)); in comex_group_init() [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | sym_band.f90 | 242 dim_rap=istart(igroup+1,ik)-istart(igroup,ik) 250 istart(igroup,ik), istart(igroup+1,ik)-1, & 438 dim_rap=istart(igroup+1)-istart(igroup) 442 trace(iclass,igroup)=trace(iclass,igroup) + & 463 dim_rap=istart(igroup+1)-istart(igroup) 468 times(igroup,irap)=times(igroup,irap) & 472 times(igroup,irap)=times(igroup,irap)/nsym 792 dim_rap=istart(igroup+1)-istart(igroup) 821 dim_rap=istart(igroup+1)-istart(igroup) 826 times(igroup,irap)=times(igroup,irap) & [all …]
|
/dports/devel/ga/ga-5.8/comex/src-template/ |
H A D | groups.c | 19 comex_group_t *id, comex_igroup_t **igroup); 53 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 73 *igroup = new_group_list_item; in comex_create_group_and_igroup() 83 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 97 status = MPI_Group_size(igroup->group, size); in comex_group_size() 111 *comm = igroup->comm; in comex_group_comm() 143 assert(igroup); in comex_igroup_finalize() 145 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 146 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 152 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-mpi/ |
H A D | groups.c | 19 comex_group_t *id, comex_igroup_t **igroup); 53 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 73 *igroup = new_group_list_item; in comex_create_group_and_igroup() 83 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 97 status = MPI_Group_size(igroup->group, size); in comex_group_size() 111 *comm = igroup->comm; in comex_group_comm() 143 assert(igroup); in comex_igroup_finalize() 145 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 146 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 152 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-dmapp/ |
H A D | groups.c | 19 comex_group_t *id, comex_igroup_t **igroup); 53 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 73 *igroup = new_group_list_item; in comex_create_group_and_igroup() 83 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 97 status = MPI_Group_size(igroup->group, size); in comex_group_size() 111 *comm = igroup->comm; in comex_group_comm() 143 assert(igroup); in comex_igroup_finalize() 145 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 146 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 152 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-portals4/ |
H A D | groups.c | 19 comex_group_t *id, comex_igroup_t **igroup); 53 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 73 *igroup = new_group_list_item; in comex_create_group_and_igroup() 83 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 97 status = MPI_Group_size(igroup->group, size); in comex_group_size() 111 *comm = igroup->comm; in comex_group_comm() 143 assert(igroup); in comex_igroup_finalize() 145 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 146 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 152 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-ofi/ |
H A D | groups.c | 18 comex_group_t *id, comex_igroup_t **igroup); 50 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 70 *igroup = new_group_list_item; in comex_create_group_and_igroup() 79 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 92 status = MPI_Group_size(igroup->group, size); in comex_group_size() 105 *comm = igroup->comm; in comex_group_comm() 135 assert(igroup); in comex_igroup_finalize() 137 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 138 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 144 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/science/lammps/lammps-stable_29Sep2021/src/ |
H A D | group.cpp | 109 if (modify->fix[i]->igroup == igroup) in assign() 112 if (modify->compute[i]->igroup == igroup) in assign() 115 if (output->dump[i]->igroup == igroup) in assign() 158 if (igroup == -1) { in assign() 572 if (igroup == -1) { in create() 595 for (int igroup = 0; igroup < MAX_GROUP; igroup++) in find() local 596 if (names[igroup] && (name == names[igroup])) return igroup; in find() 608 if (igroup >= 0) return igroup; in find_or_create() 615 return igroup; in find_or_create() 625 for (int igroup = 0; igroup < MAX_GROUP; igroup++) in find_unused() local [all …]
|
/dports/devel/ga/ga-5.8/comex/src-ofa/ |
H A D | groups.c | 54 comex_group_t *id, comex_igroup_t **igroup) in comex_create_group_and_igroup() argument 72 *igroup = new_group_list_item; in comex_create_group_and_igroup() 85 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 102 status = MPI_Group_size(igroup->group, size); in comex_group_size() 114 *comm = igroup->comm; in comex_group_comm() 150 assert(NULL != igroup); in comex_group_set_default() 176 static void comex_igroup_finalize(comex_igroup_t *igroup) in comex_igroup_finalize() argument 180 assert(igroup); in comex_igroup_finalize() 182 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 187 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-mpi-mt/ |
H A D | groups.c | 116 *igroup = new_group_list_item; in _create_group_and_igroup() 124 *rank = igroup->rank; in comex_group_rank() 138 *size = igroup->size; in comex_group_size() 152 *comm = igroup->comm; in comex_group_comm() 200 COMEX_ASSERT(igroup); in _igroup_free() 212 if (igroup->comm != MPI_COMM_NULL) { in _igroup_free() 222 free(igroup); in _igroup_free() 373 comex_igroup_t *igroup = NULL; in comex_group_init() local 413 status = MPI_Comm_group(igroup->comm, &(igroup->group)); in comex_group_init() 415 status = MPI_Comm_rank(igroup->comm, &(igroup->rank)); in comex_group_init() [all …]
|
/dports/mail/bincimap/bincimap-1.2.13final/src/ |
H A D | base64.cc | 73 byte igroup[3], ogroup[4]; in base64encode() local 76 igroup[0] = igroup[1] = igroup[2] = 0; in base64encode() 79 igroup[n] = (byte) c; in base64encode() 82 ogroup[0] = dtable[igroup[0] >> 2]; in base64encode() 83 ogroup[1] = dtable[((igroup[0] & 3) << 4) | (igroup[1] >> 4)]; in base64encode() 84 ogroup[2] = dtable[((igroup[1] & 0xF) << 2) | (igroup[2] >> 6)]; in base64encode() 85 ogroup[3] = dtable[igroup[2] & 0x3F]; in base64encode()
|
/dports/science/liggghts/LIGGGHTS-PUBLIC-3.8.0-26-g6e873439/src/ |
H A D | group.cpp | 135 if (modify->fix[i]->igroup == igroup) in assign() 138 if (modify->compute[i]->igroup == igroup) in assign() 141 if (output->dump[i]->igroup == igroup) in assign() 153 names[igroup] = NULL; in assign() 164 if (igroup == -1) { in assign() 445 if (igroup == -1) { in create() 484 if (igroup == -1) in set() 512 for (int igroup = 0; igroup < MAX_GROUP; igroup++) in find() local 513 if (names[igroup] && strcmp(name,names[igroup]) == 0) return igroup; in find() 524 for (int igroup = 0; igroup < MAX_GROUP; igroup++) in find_unused() local [all …]
|
/dports/devel/ga/ga-5.8/comex/src-mpi-pt/ |
H A D | groups.c | 114 *igroup = new_group_list_item; in _create_group_and_igroup() 122 *rank = igroup->rank; in comex_group_rank() 136 *size = igroup->size; in comex_group_size() 150 *comm = igroup->comm; in comex_group_comm() 198 COMEX_ASSERT(igroup); in _igroup_free() 210 if (igroup->comm != MPI_COMM_NULL) { in _igroup_free() 220 free(igroup); in _igroup_free() 373 comex_igroup_t *igroup = NULL; in comex_group_init() local 437 status = MPI_Comm_group(igroup->comm, &(igroup->group)); in comex_group_init() 439 status = MPI_Comm_rank(igroup->comm, &(igroup->rank)); in comex_group_init() [all …]
|
/dports/devel/ga/ga-5.8/comex/src-mpi3/ |
H A D | groups.c | 23 comex_group_t *id, comex_igroup_t **igroup); 78 *igroup = new_group_list_item; in comex_create_group_and_igroup() 88 status = MPI_Group_rank(igroup->group, rank); in comex_group_rank() 102 status = MPI_Group_size(igroup->group, size); in comex_group_size() 116 *comm = igroup->comm; in comex_group_comm() 152 assert(igroup); in comex_igroup_finalize() 154 if (igroup->group != MPI_GROUP_NULL) { in comex_igroup_finalize() 155 status = MPI_Group_free(&igroup->group); in comex_igroup_finalize() 161 if (igroup->comm != MPI_COMM_NULL) { in comex_igroup_finalize() 162 status = MPI_Comm_free(&igroup->comm); in comex_igroup_finalize() [all …]
|
/dports/science/sparta/sparta-20Oct2021/src/KOKKOS/ |
H A D | compute_sonine_grid_kokkos.cpp | 176 const int igroup = d_s2g(imix,ispecies); in operator ()() local 177 if (igroup < 0) return; in operator ()() 187 a_vcom_tally(icell,igroup,3) += mass; in operator ()() 203 if (igroup < 0) continue; in operator ()() 209 d_vcom(icell,igroup,0) += mass * v[0]; in operator ()() 210 d_vcom(icell,igroup,1) += mass * v[1]; in operator ()() 212 d_vcom(icell,igroup,3) += mass; in operator ()() 255 if (igroup < 0) return; in operator ()() 259 int k = igroup*npergroup; in operator ()() 305 if (igroup < 0) continue; in operator ()() [all …]
|