fixed error with flow_out, scalar value

nhm-usgs · May 30, 2020 · 7569e70 · 7569e70
1 parent 5770e3c
commit 7569e70
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/bmi_prms_streamflow.f90 b/src/bmi_prms_streamflow.f90
@@ -324,6 +324,7 @@ function prms_var_grid(this, name, grid) result (bmi_status)
         bmi_status = BMI_SUCCESS
     case('flow_out')
         grid = 2
+        bmi_status = BMI_SUCCESS
     case('nowtime')
         grid = 3
         bmi_status = BMI_SUCCESS
@@ -373,7 +374,7 @@ function prms_grid_rank(this, grid, rank) result (bmi_status)
     case(1)
         rank = 1
     case(2)
-        rank = 1
+        rank = 0
     case(3)
         rank = 1
     case default