Fix: deal with min_vegfrac values found in veget_max Fix: ensure almost equal swc_adj and mcs they have the exact value.
Otherwise a floating point exception takes place in the formula due to negative value. This 2 lines below are responsible of this issue: ( ( (swc_adj(ji,jsl,jv) - mcr(njsc(ji)) ) / & ( mcs(njsc(ji)) - mcr(njsc(ji)) ) ) &
Otherwise a floating point exception takes place in the formula due to negative value. This 2 lines below are responsible of this issue:
( ( (swc_adj(ji,jsl,jv) - mcr(njsc(ji)) ) / & ( mcs(njsc(ji)) - mcr(njsc(ji)) ) ) &
( ( (swc_adj(ji,jsl,jv) - mcr(njsc(ji)) ) / &
( mcs(njsc(ji)) - mcr(njsc(ji)) ) ) &