| # | Line 184 | Line 184 | contains | |
|---|---|---|
| 184 | do i = 1, nExcludes_Global | |
| 185 | excludesGlobal(i) = CexcludesGlobal(i) | |
| 186 | enddo | |
| 187 | < | |
| 187 | > | |
| 188 | if (status == 0) simulation_setup_complete = .true. | |
| 189 | ||
| 190 | end subroutine SimulationSetup | |
| # | Line 281 | 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 |