# | 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 |