CO2 supply and demand function (mol / m^2 s)
This function is not intended to be called by users directly.
A_supply(C_chl, pars, unitless = FALSE) A_demand(C_chl, pars, unitless = FALSE)
C_chl |
Chloroplastic CO2 concentration in Pa of class |
pars |
Concatenated parameters ( |
unitless |
Logical. Should |
Supply function:
A = g_tc (C_air - C_chl)
Demand function:
A = (1 - Γ* / C_chl) min(W_carbox, W_regen, W_tpu) - R_d
| Symbol | R | Description | Units | Default |
| A | A |
photosynthetic rate | μmol CO2 / (m^2 s) | calculated |
| g_tc | g_tc |
total conductance to CO2 | μmol CO2 / (m^2 s Pa) | calculated |
| C_air | C_air |
atmospheric CO2 concentration | Pa | 41 |
| C_chl | C_chl |
chloroplastic CO2 concentration | Pa | calculated |
| R_d | R_d |
nonphotorespiratory CO2 release | μmol CO2 / (m^2 s) | 2 |
| Γ* | gamma_star |
chloroplastic CO2 compensation point | Pa | 3.743 |
Value in mol / (m^2 s) of class units
bake_par <- make_bakepar() constants <- make_constants(use_tealeaves = FALSE) enviro_par <- make_enviropar(use_tealeaves = FALSE) leaf_par <- make_leafpar(use_tealeaves = FALSE) leaf_par <- bake(leaf_par, bake_par, constants) # Or bake with piping (need library(magrittr)) # leaf_par %<>% bake(bake_par, constants) enviro_par$T_air <- leaf_par$T_leaf pars <- c(leaf_par, enviro_par, constants) C_chl <- set_units(35, "Pa") A_supply(C_chl, pars) A_demand(C_chl, pars)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.