Subversion Repositories public iLand

Rev

Rev 513 | Rev 639 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 513 Rev 536
Line 45... Line 45...
45
    return epsilon;
45
    return epsilon;
46
}
46
}
47
47
48
inline double Production3PG::abovegroundFraction() const
48
inline double Production3PG::abovegroundFraction() const
49
{
49
{
50
    double harsh =  1 - 0.8/(1 + 2.5 * mResponse->nitrogenResponse());
-
 
-
 
50
    double utilized_frac = 1.;
-
 
51
    if (Model::settings().usePARFractionBelowGroundAllocation) {
-
 
52
        utilized_frac = mResponse->totalUtilizedRadiation() / mResponse->yearlyRadiation();
-
 
53
    }
-
 
54
    double harsh =  1 - 0.8/(1 + 2.5 * mResponse->nitrogenResponse() * utilized_frac);
51
    return harsh;
55
    return harsh;
52
}
56
}
53
57
54
void Production3PG::clear()
58
void Production3PG::clear()
55
{
59
{