Forced scaling in do_ftemp_kphio with C4 plants

[davidorme]

Hi,

There is something odd going on with the code for setting kphio here:
https://github.com/computationales/rpmodel/blob/master/R/rpmodel.R#L305

  if (do_ftemp_kphio) {
    kphio <- ftemp_kphio( tc, c4 ) * kphio
  } else {
    if (c4){
      kphio <- ftemp_kphio( 15.0, c4 ) * kphio
    }
  }

If the temperature correction is turned off, C4 plants are forced to be reduced by a scaling factor ftemp_kphio( 15.0, c4 ) = 0.2816. That seems like an error?