Commit f484dce0 authored by POLCHER Jan's avatar POLCHER Jan 🚴🏾
Browse files

Improvement which supresses the singularity in the FV case

parent 089021e5
......@@ -2805,7 +2805,7 @@ SUBROUTINE routing_reg_end_truncate(nbpt, nbasmax, gridarea, contfrac, gridcente
basin_cg(ib,1,2) = gridcenters(ib,2)
! To define in function of the minimum topoindex on the map
! (to revise)
basin_topoind(ib,1) = topoindexmin
basin_topoind(ib,1) = SQRT(hydro_meanlen**3./(hydro_meandz*1.0e6))
basin_rlen(ib,1) = hydro_meanlen
basin_rdz(ib,1) = hydro_meandz
basin_id(ib,1) = 0
......
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