Commit b6bf6a41 authored by David Deepwell's avatar David Deepwell
Browse files

Fix bug in BPE calculation for unmapped grids

parent 1df50bf9
......@@ -369,8 +369,10 @@ void compute_Background_PE(double & BPE_tot, TArrayn::DTArray & rho,
while ( (sort_hill[LL] > tmpH) && (LL > 0) ) {
LL--;
}
Area_star = Lx_partsum[LL]*Ly;
} else {
Area_star = Lx*Ly;
}
Area_star = Lx_partsum[LL]*Ly;
// spread volume over domain and compute BPE for that cell
dH = sort_quad(II,JJ,KK)/Area_star;
......
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