| # | Line 174 | Line 174 | contains | |
|---|---|---|
| 174 | status = -1 | |
| 175 | return | |
| 176 | endif | |
| 177 | + | |
| 178 | ||
| 179 | do i = 1, nExcludes_Local | |
| 180 | excludesLocal(1,i) = CexcludesLocal(1,i) | |
| # | Line 280 | Line 281 | contains | |
| 281 | function getRrf() result(rrf) | |
| 282 | real( kind = dp ) :: rrf | |
| 283 | rrf = thisSim%rrf | |
| 284 | + | write(*,*) 'getRrf = ', rrf, thisSim%rrf |
| 285 | end function getRrf | |
| 286 | ||
| 287 | function getRt() result(rt) | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |