DXFEarClipping Module

Used By

Variables

twopi radtodeg trackit

Functions

InPolygon Modulus Triangulate angle_2dvector polygon_contains_point_2d

Subroutines

generate_ears CalcWallCoordinateTransformation CalcRfFlrCoordinateTransformation reorder

Variables

Type	Visibility	Attributes		Name		Initial
real(kind=r64),	private,	parameter	::	twopi	=	Pi*2.0D0
real(kind=r64),	private,	parameter	::	radtodeg	=	1.0D0/DegToRadians
logical,	private		::	trackit	=	.false.

Functions

private function InPolygon(point, poly, nsides)

Arguments

Type	Intent	Optional	Attributes		Name
type(vector)				::	point
type(vector),			dimension(nsides)	::	poly
integer				::	nsides

Return Value logical

private function Modulus(point) result(rModulus)

Arguments

Type	Intent	Optional	Attributes		Name
type(vector)				::	point

Return Value real(kind=r64)

public function Triangulate(nsides, polygon, outtriangles, surfazimuth, surftilt, surfname, surfclass)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nsides
type(vector),			dimension(nsides)	::	polygon
type(dTriangle),			allocatable, dimension(:)	::	outtriangles
real(kind=r64)				::	surfazimuth
real(kind=r64)				::	surftilt
character(len=*)				::	surfname
integer				::	surfclass

Return Value integer

private function angle_2dvector(xa, ya, xb, yb, xc, yc) result(angle)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r64),	intent(in)			::	xa
real(kind=r64),	intent(in)			::	ya
real(kind=r64),	intent(in)			::	xb
real(kind=r64),	intent(in)			::	yb
real(kind=r64),	intent(in)			::	xc
real(kind=r64),	intent(in)			::	yc

Return Value real(kind=r64)

private function polygon_contains_point_2d(nsides, polygon, point) result(inside)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nsides
type(Vector_2d)				::	polygon(nsides)
type(Vector_2d)				::	point

Return Value logical

Subroutines

private subroutine generate_ears(nvert, vertex, ears, nears, r_vertices, nrverts, c_vertices, ncverts, removed, earvert, rangles)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nvert
type(Vector_2d),			dimension(nvert)	::	vertex
integer				::	ears(nvert)
integer				::	nears
integer				::	r_vertices(nvert)
integer				::	nrverts
integer				::	c_vertices(nvert)
integer				::	ncverts
logical				::	removed(nvert)
integer				::	earvert(3)
real(kind=r64)				::	rangles(nvert)

private subroutine CalcWallCoordinateTransformation(nsides, polygon, surfazimuth, surftilt, xvt, yvt, zvt)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nsides
type(vector),			dimension(nsides)	::	polygon
real(kind=r64)				::	surfazimuth
real(kind=r64)				::	surftilt
real(kind=r64)				::	xvt(nsides)
real(kind=r64)				::	yvt(nsides)
real(kind=r64)				::	zvt(nsides)

private subroutine CalcRfFlrCoordinateTransformation(nsides, polygon, surfazimuth, surftilt, xvt, yvt, zvt)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nsides
type(vector),			dimension(nsides)	::	polygon
real(kind=r64)				::	surfazimuth
real(kind=r64)				::	surftilt
real(kind=r64)				::	xvt(nsides)
real(kind=r64)				::	yvt(nsides)
real(kind=r64)				::	zvt(nsides)

private subroutine reorder(nvert)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	nvert

All Modules

AirflowNetworkBalanceManager AirflowNetworkSolver BaseboardElectric BaseboardRadiator Boilers BoilerSteam BranchInputManager BranchNodeConnections ChillerAbsorption ChillerElectricEIR ChillerExhaustAbsorption ChillerGasAbsorption ChillerIndirectAbsorption ChillerReformulatedEIR CondenserLoopTowers ConductionTransferFunctionCalc ConvectionCoefficients CoolTower CostEstimateManager CrossVentMgr CTElectricGenerator CurveManager DataAirflowNetwork DataAirLoop DataAirSystems DataBranchAirLoopPlant DataBranchNodeConnections DataBSDFWindow DataComplexFenestration DataContaminantBalance DataConvergParams DataConversions DataCostEstimate DataDaylighting DataDaylightingDevices DataDefineEquip DataDElight DataEnvironment DataErrorTracking DataGenerators DataGlobalConstants DataGlobals DataHeatBalance DataHeatBalFanSys DataHeatBalSurface DataHVACControllers DataHVACGlobals DataInterfaces DataIPShortCuts DataLoopNode DataMoistureBalance DataMoistureBalanceEMPD DataOutputs DataPhotovoltaics DataPlant DataPlantPipingSystems DataPrecisionGlobals DataReportingFlags DataRoomAirModel DataRootFinder DataRuntimeLanguage DataShadowingCombinations DataSizing DataStringGlobals DataSurfaceColors DataSurfaceLists DataSurfaces DataSystemVariables DataTimings DataUCSDSharedData DataVectorTypes DataViewFactorInformation DataWater DataWindowEquivalentLayer DataZoneControls DataZoneEnergyDemands DataZoneEquipment DaylightingDevices DaylightingManager DELIGHTMANAGERF DELIGHTMANAGERF DemandManager DesiccantDehumidifiers DirectAirManager DisplacementVentMgr DualDuct DXCoils DXFEarClipping EarthTube EconomicLifeCycleCost EconomicTariff EcoRoofManager ElectricBaseboardRadiator EMSManager EvaporativeCoolers EvaporativeFluidCoolers ExteriorEnergyUse ExternalInterface FanCoilUnits Fans FaultsManager FluidCoolers FluidProperties FuelCellElectricGenerator Furnaces General GeneratorDynamicsManager GeneratorFuelSupply GlobalNames GroundHeatExchangers HeatBalanceAirManager HeatBalanceHAMTManager HeatBalanceIntRadExchange HeatBalanceManager HeatBalanceMovableInsulation HeatBalanceSurfaceManager HeatBalFiniteDiffManager HeatingCoils HeatPumpWaterToWaterCOOLING HeatPumpWaterToWaterHEATING HeatPumpWaterToWaterSimple HeatRecovery HighTempRadiantSystem Humidifiers HVACControllers HVACCooledBeam HVACDuct HVACDXHeatPumpSystem HVACDXSystem HVACHXAssistedCoolingCoil HVACInterfaceManager HVACManager HVACMultiSpeedHeatPump HVACSingleDuctInduc HVACStandAloneERV HVACUnitaryBypassVAV HVACUnitarySystem HVACVariableRefrigerantFlow HWBaseboardRadiator ICEngineElectricGenerator IceThermalStorage InputProcessor InternalHeatGains ISO_C_FUNCTION_BINDING ISO_C_FUNCTION_BINDING LowTempRadiantSystem ManageElectricPower MatrixDataManager MicroCHPElectricGenerator MicroturbineElectricGenerator MixedAir MixerComponent MoistureBalanceEMPDManager MundtSimMgr NodeInputManager NonZoneEquipmentManager OutAirNodeManager OutdoorAirUnit OutputProcessor OutputReportPredefined OutputReportTabular OutsideEnergySources PackagedTerminalHeatPump PackagedThermalStorageCoil Photovoltaics PhotovoltaicThermalCollectors PipeHeatTransfer Pipes PlantCentralGSHP PlantChillers PlantComponentTemperatureSources PlantCondLoopOperation PlantHeatExchangerFluidToFluid PlantLoadProfile PlantLoopEquip PlantLoopSolver PlantManager PlantPipingSystemsManager PlantPressureSystem PlantUtilities PlantValves PollutionModule PondGroundHeatExchanger PoweredInductionUnits Psychrometrics Pumps PurchasedAirManager RefrigeratedCase ReportSizingManager ReturnAirPathManager RoomAirModelManager RoomAirModelUserTempPattern RootFinder RuntimeLanguageProcessor ScheduleManager SetPointManager SimAirServingZones SimulationManager SingleDuct SizingManager SolarCollectors SolarReflectionManager SolarShading SortAndStringUtilities SplitterComponent SQLiteProcedures SQLiteProcedures StandardRatings SteamBaseboardRadiator SteamCoils SurfaceGeometry SurfaceGroundHeatExchanger SystemAvailabilityManager SystemReports TARCOGArgs TARCOGCommon TARCOGDeflection TARCOGGasses90 TARCOGGassesParams TARCOGMain TARCOGOutput TARCOGParams TarcogShading ThermalChimney ThermalComfort ThermalEN673Calc ThermalISO15099Calc TranspiredCollector UFADManager UnitHeater UnitVentilator UserDefinedComponents VariableSpeedCoils vectors VentilatedSlab WaterCoils WaterManager WaterThermalTanks WatertoAirHeatPump WatertoAirHeatPumpSimple WaterUse WeatherManager WindowAC WindowComplexManager WindowEquivalentLayer WindowManager WindTurbine ZoneAirLoopEquipmentManager ZoneContaminantPredictorCorrector ZoneDehumidifier ZoneEquipmentManager ZonePlenum ZoneTempPredictorCorrector