Searched refs:sfctemp (Results 1 – 1 of 1) sorted by relevance
158 PetscScalar sfctemp; /* temperature at surface */ in main() local181 sfctemp = put.Ts; in main()187 …PetscCall(PetscPrintf(PETSC_COMM_WORLD, "Initial Temperature = %g\n", (double)sfctemp)); /* input … in main()189 deep_grnd_temp = sfctemp - 10; /* set underlying ground layer temperature */ in main()193 sfctemp = fahr_to_cel(sfctemp); in main()200 sfctemp += 273; in main()208 mixratio = calcmixingr(sfctemp, pressure1); in main()233 user.Ts = sfctemp; in main()348 PetscErrorCode calcfluxs(PetscScalar sfctemp, PetscScalar airtemp, PetscScalar emma, PetscScalar fr… in calcfluxs() argument351 …- emma) * PetscPowScalarInt(cloudTemp, 4)) - (EMMSFC * PetscPowScalarInt(sfctemp, 4))); /* calcula… in calcfluxs()[all …]