| # | Line 142 | Line 142 | contains | |
|---|---|---|
| 142 | deallocate(c_idents_Row) | |
| 143 | endif | |
| 144 | ||
| 145 | < | #else |
| 145 | > | #endif |
| 146 | > | |
| 147 | > | ! We build the local atid's for both mpi and nonmpi |
| 148 | do i = 1, nLocal | |
| 149 | ||
| 150 | me = getFirstMatchingElement(atypes, "c_ident", c_idents(i)) | |
| 151 | atid(i) = me | |
| 152 | ||
| 153 | enddo | |
| 152 | – | #endif |
| 154 | ||
| 155 | ||
| 156 | ||
| 157 | + | |
| 158 | do i = 1, nExcludes_Local | |
| 159 | excludesLocal(1,i) = CexcludesLocal(1,i) | |
| 160 | excludesLocal(2,i) = CexcludesLocal(2,i) | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |