| 1592 | } |
| 1593 | |
| 1594 | int OPS_getPID() |
| 1595 | { |
| 1596 | int pid = 0; |
| 1597 | |
| 1598 | #ifdef _PARALLEL_INTERPRETERS |
| 1599 | MPI_Comm_rank(MPI_COMM_WORLD, &pid); |
| 1600 | #endif |
| 1601 | |
| 1602 | int size = 1; |
| 1603 | if (OPS_SetIntOutput(&size, &pid, true) < 0) { |
| 1604 | opserr << "WARNING: failed to set pid\n"; |
| 1605 | return -1; |
| 1606 | } |
| 1607 | |
| 1608 | return 0; |
| 1609 | } |
| 1610 | |
| 1611 | int OPS_getNP() |
| 1612 | { |
no test coverage detected