isIP Function

public function isIP()

Check whether the system in use is IP or SI

Arguments

None

Return Value logical


Called by

proc~~isip~~CalledByGraph proc~isip isIP proc~getstandardatmpressure GetStandardAtmPressure proc~getstandardatmpressure->proc~isip proc~gethumratiofromenthalpyandtdrybulb GetHumRatioFromEnthalpyAndTDryBulb proc~gethumratiofromenthalpyandtdrybulb->proc~isip proc~getmoistairvolume GetMoistAirVolume proc~getmoistairvolume->proc~isip proc~getdryairvolume GetDryAirVolume proc~getdryairvolume->proc~isip proc~getsealevelpressure GetSeaLevelPressure proc~getsealevelpressure->proc~isip proc~gettdrybulbfromenthalpyandhumratio GetTDryBulbFromEnthalpyAndHumRatio proc~gettdrybulbfromenthalpyandhumratio->proc~isip proc~gettdewpointfromvappres GetTDewPointFromVapPres proc~gettdewpointfromvappres->proc~isip proc~dlnpws_ dLnPws_ proc~gettdewpointfromvappres->proc~dlnpws_ proc~getsatvappres GetSatVapPres proc~gettdewpointfromvappres->proc~getsatvappres proc~getmoistairenthalpy GetMoistAirEnthalpy proc~getmoistairenthalpy->proc~isip proc~gethumratiofromtwetbulb GetHumRatioFromTWetBulb proc~gethumratiofromtwetbulb->proc~isip proc~getsathumratio GetSatHumRatio proc~gethumratiofromtwetbulb->proc~getsathumratio proc~getdryairdensity GetDryAirDensity proc~getdryairdensity->proc~isip proc~dlnpws_->proc~isip proc~getdryairenthalpy GetDryAirEnthalpy proc~getdryairenthalpy->proc~isip proc~getstandardatmtemperature GetStandardAtmTemperature proc~getstandardatmtemperature->proc~isip proc~getsatvappres->proc~isip proc~getsathumratio->proc~getsatvappres proc~gettdewpointfromrelhum GetTDewPointFromRelHum proc~gettdewpointfromrelhum->proc~gettdewpointfromvappres proc~getvappresfromrelhum GetVapPresFromRelHum proc~gettdewpointfromrelhum->proc~getvappresfromrelhum proc~getstationpressure GetStationPressure proc~getstationpressure->proc~getsealevelpressure proc~gettdewpointfromhumratio GetTDewPointFromHumRatio proc~gettdewpointfromhumratio->proc~gettdewpointfromvappres proc~gettdewpointfromtwetbulb GetTDewPointFromTWetBulb proc~gettdewpointfromtwetbulb->proc~gethumratiofromtwetbulb proc~gettdewpointfromtwetbulb->proc~gettdewpointfromhumratio proc~getvappresfromtdewpoint GetVapPresFromTDewPoint proc~getvappresfromtdewpoint->proc~getsatvappres proc~calcminimaldxheating CalcMinimalDXHeating proc~calcminimaldxheating->proc~gethumratiofromenthalpyandtdrybulb proc~calcminimaldxheating->proc~gettdrybulbfromenthalpyandhumratio proc~calcminimaldxheating->proc~getmoistairenthalpy proc~gethumratiofromtdewpoint GetHumRatioFromTDewPoint proc~calcminimaldxheating->proc~gethumratiofromtdewpoint proc~getmoistairdensity GetMoistAirDensity proc~calcminimaldxheating->proc~getmoistairdensity proc~gettwetbulbfromhumratio GetTWetBulbFromHumRatio proc~calcminimaldxheating->proc~gettwetbulbfromhumratio proc~getrelhumfromhumratio GetRelHumFromHumRatio proc~calcminimaldxheating->proc~getrelhumfromhumratio proc~psytsatfnhpb PsyTsatFnHPb proc~calcminimaldxheating->proc~psytsatfnhpb proc~calcpsychrometricsfromrelhum CalcPsychrometricsFromRelHum proc~calcpsychrometricsfromrelhum->proc~getmoistairvolume proc~calcpsychrometricsfromrelhum->proc~getmoistairenthalpy proc~calcpsychrometricsfromrelhum->proc~gettdewpointfromhumratio proc~calcpsychrometricsfromrelhum->proc~gettwetbulbfromhumratio proc~gethumratiofromrelhum GetHumRatioFromRelHum proc~calcpsychrometricsfromrelhum->proc~gethumratiofromrelhum proc~getdegreeofsaturation GetDegreeOfSaturation proc~calcpsychrometricsfromrelhum->proc~getdegreeofsaturation proc~getrelhumfromvappres GetRelHumFromVapPres proc~getrelhumfromvappres->proc~getsatvappres proc~gethumratiofromtdewpoint->proc~getsatvappres proc~getrelhumfromtdewpoint GetRelHumFromTDewPoint proc~getrelhumfromtdewpoint->proc~getsatvappres proc~getvappresfromrelhum->proc~getsatvappres proc~getsatairenthalpy GetSatAirEnthalpy proc~getsatairenthalpy->proc~getmoistairenthalpy proc~getsatairenthalpy->proc~getsathumratio proc~calcminimaldxcooling CalcMinimalDXCooling proc~calcminimaldxcooling->proc~gethumratiofromenthalpyandtdrybulb proc~calcminimaldxcooling->proc~gettdrybulbfromenthalpyandhumratio proc~calcminimaldxcooling->proc~getmoistairenthalpy proc~calcminimaldxcooling->proc~getmoistairdensity proc~calcminimaldxcooling->proc~gettwetbulbfromhumratio proc~calcminimaldxcooling->proc~psytsatfnhpb proc~getrelhumfromtwetbulb GetRelHumFromTWetBulb proc~getrelhumfromtwetbulb->proc~gethumratiofromtwetbulb proc~getrelhumfromtwetbulb->proc~getrelhumfromhumratio proc~calcpsychrometricsfromtwetbulb CalcPsychrometricsFromTWetBulb proc~calcpsychrometricsfromtwetbulb->proc~getmoistairvolume proc~calcpsychrometricsfromtwetbulb->proc~getmoistairenthalpy proc~calcpsychrometricsfromtwetbulb->proc~gethumratiofromtwetbulb proc~calcpsychrometricsfromtwetbulb->proc~gettdewpointfromhumratio proc~calcpsychrometricsfromtwetbulb->proc~getrelhumfromhumratio proc~calcpsychrometricsfromtwetbulb->proc~getdegreeofsaturation proc~getmoistairdensity->proc~getmoistairvolume proc~getvaporpressuredeficit GetVaporPressureDeficit proc~getvaporpressuredeficit->proc~getsatvappres proc~getvaporpressuredeficit->proc~getrelhumfromhumratio proc~calcpsychrometricsfromtdewpoint CalcPsychrometricsFromTDewPoint proc~calcpsychrometricsfromtdewpoint->proc~getmoistairvolume proc~calcpsychrometricsfromtdewpoint->proc~getmoistairenthalpy proc~calcpsychrometricsfromtdewpoint->proc~gethumratiofromtdewpoint proc~calcpsychrometricsfromtdewpoint->proc~gettwetbulbfromhumratio proc~calcpsychrometricsfromtdewpoint->proc~getrelhumfromhumratio proc~calcpsychrometricsfromtdewpoint->proc~getdegreeofsaturation proc~gettwetbulbfromhumratio->proc~gethumratiofromtwetbulb proc~gettwetbulbfromhumratio->proc~gettdewpointfromhumratio proc~gethumratiofromrelhum->proc~getvappresfromrelhum proc~gettwetbulbfromtdewpoint GetTWetBulbFromTDewPoint proc~gettwetbulbfromtdewpoint->proc~gethumratiofromtdewpoint proc~gettwetbulbfromtdewpoint->proc~gettwetbulbfromhumratio proc~simminimaldxheating SimMinimalDXHeating proc~simminimaldxheating->proc~calcminimaldxheating proc~simminimaldxcooling SimMinimalDXCooling proc~simminimaldxcooling->proc~calcminimaldxcooling proc~getrelhumfromhumratio->proc~getrelhumfromvappres proc~psytsatfnhpb->proc~getsatairenthalpy proc~getdegreeofsaturation->proc~getsathumratio proc~gettwetbulbfromrelhum GetTWetBulbFromRelHum proc~gettwetbulbfromrelhum->proc~gettwetbulbfromhumratio proc~gettwetbulbfromrelhum->proc~gethumratiofromrelhum

Contents

Source Code


Source Code

  function isIP()
    !+ Check whether the system in use is IP or SI
    logical :: isIP
    if (PSYCHROLIB_UNITS == IP) then
      isIP = .true.
    else if (PSYCHROLIB_UNITS == SI) then
      isIP = .false.
    else
      error stop "The system of units has not been defined."
    end if
  end function isIP