15 lines
794 B
C
15 lines
794 B
C
integer ifitmode,Currentiknowlimit,ilimittype,iphotolimit
|
|
double precision vcmax,fjelect,tpu,resistwp,resistch,stargamma,
|
|
&fkco,alpha,rdlight,pco2i_obs,anet_obs,chlflphips2,chlflfjelect,
|
|
&pco2i_pred,anet_pred,pco2c,realizedfjelect,weitanet,weitpco2i,
|
|
&weitphips2,weitfjelect,pco2i_pred_flu,anet_pred_flu,
|
|
&pco2c_anet_flu,pco2c_pco2i_flu,PhiPSIImax
|
|
common/int_pco2ianetfunc/ifitmode,Currentiknowlimit,ilimittype,
|
|
&iphotolimit
|
|
common/dble_pco2ianetfunc/vcmax,fjelect,tpu,resistwp,resistch,
|
|
&stargamma,fkco,alpha,rdlight,pco2i_obs,anet_obs,chlflphips2,
|
|
&chlflfjelect,pco2i_pred,anet_pred,pco2c,realizedfjelect,weitanet,
|
|
&weitpco2i,weitphips2,weitfjelect,pco2i_pred_flu,anet_pred_flu,
|
|
&pco2c_anet_flu,pco2c_pco2i_flu,PhiPSIImax
|
|
|