| # | Line 3 | Line 3 | subroutine setFsimParallel(thisComponentPlan, nAtomTag | |
|---|---|---|
| 3 | nGroupTags, groupTags, status) | |
| 4 | ||
| 5 | use mpiSimulation | |
| 6 | < | |
| 6 | > | |
| 7 | !! Passed Arguments | |
| 8 | !! mpiComponentPlan struct from C | |
| 9 | type (mpiComponentPlan), intent(inout) :: thisComponentPlan | |
| # | Line 18 | Line 18 | subroutine setFsimParallel(thisComponentPlan, nAtomTag | |
| 18 | ||
| 19 | call setupSimParallel(thisComponentPlan, nAtomTags, atomTags, & | |
| 20 | nGroupTags, groupTags, status) | |
| 21 | – | |
| 22 | – | end subroutine setFsimParallel |
| 21 | ||
| 22 | + | end subroutine setFsimParallel |
| 23 | + | |
| 24 | #else | |
| 25 | ||
| 26 | !! Dummy routine so that we don't have an empty compilation unit: | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |