Skip to content

Commit

Permalink
Merge branch 'development' of https://github.com/CIMM-ORG/SWMM5plus i…
Browse files Browse the repository at this point in the history
…nto development
  • Loading branch information
benrhodges committed Jul 28, 2023
2 parents 52d5d38 + 8578dee commit d1b8ef1
Show file tree
Hide file tree
Showing 4 changed files with 264 additions and 78 deletions.
8 changes: 4 additions & 4 deletions definitions/define_settings.f90
Original file line number Diff line number Diff line change
Expand Up @@ -190,7 +190,7 @@ module define_settings
real(8) :: TargetCelerity = 15.0d0
real(8) :: Alpha = 3.0d0
real(8) :: DecayRate = 5.0
real(8) :: MinimumInitialPreissmannNumber = 3.0d0
real(8) :: PNminumum = 3.0d0
end type PreissmannSlotType

!% setting%Output%Report
Expand Down Expand Up @@ -1921,9 +1921,9 @@ subroutine define_settings_load()
if ((.not. found) .and. (jsoncheck)) stop "Error - json file - setting " // 'Solver.PreissmannSlot.DecayRate not found'

!% Minimum initial preissmann number
call json%get('Solver.PreissmannSlot.MinimumInitialPreissmannNumber', real_value, found)
if (found) setting%Solver%PreissmannSlot%MinimumInitialPreissmannNumber = real_value
if ((.not. found) .and. (jsoncheck)) stop "Error - json file - setting " // 'Solver.PreissmannSlot.MinimumInitialPreissmannNumber not found'
call json%get('Solver.PreissmannSlot.PNminumum', real_value, found)
if (found) setting%Solver%PreissmannSlot%PNminumum = real_value
if ((.not. found) .and. (jsoncheck)) stop "Error - json file - setting " // 'Solver.PreissmannSlot.PNminumum not found'


!% TestCase. =====================================================================
Expand Down
Loading

0 comments on commit d1b8ef1

Please sign in to comment.