Unverified Commit 221fa825 authored by Malachi's avatar Malachi Committed by GitHub
Browse files

Fix minor bug in setting nfldt in re2 bc reading routine (#711)

parent 478fb41d
......@@ -28,7 +28,7 @@ c-----------------------------------------------------------------------
! number of fields to read
if (param(32).gt.0) then
nfldt = ibc + int(param(32)) - 1
nfldt = min(nfldt,1)
nfldt = max(nfldt,1)
if (nelgt.gt.nelgv) nfldt = max(nfldt,2)
endif
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment