CONTINUOUS_MODEL CeFan ABSTRACT "FAN w On/Off control (low flow when off). Efficiency & temp rise given. Date: March 27, 1997 Made by: Mika Vuolle Call: RHODRY from Psychro2.nmf AB 971203 Changed default for dpMin PS 970918 added parameter dpMin and altered corresponding assignment for dp removed if-then-else stucture around Trise MV 971125 FlowLS local variable is added to presentation purpose " EQUATIONS dp:= dpMax*FanOn + dpMin*(1 - FanOn); PAirOut = PAirIn + dp; TAirOut = TAirIn + TRise; VolFlow := MAir / RHODRY(TAirIn,WAir) * 1000; QSup := MAir / RHODRY (TAirIn,WAir) * dp / eta ; LINKS /* type name variables .... */ ControlLink FanControl FanOn; UniAir FanIn PAirIn, POS_IN MAir, TAirIn, XAir, WAir; UniAir FanOut PAirOut, POS_OUT MAir, TAirOut, XAir, WAir; VARIABLES /* type name role def min max description*/ Control FanOn IN 1 0 1 " 0 = Fan Off 1 = Fan On" Pressure PAirIn IN 1325 -BIG BIG "Pressure of entering air" Pressure PAirOut OUT 1425 -BIG BIG "Pressure of leaving air" Pressure dP LOC 100 0 BIG "Pressure rise in fan" MassFlow MAir IN 3.2 0 BIG "Dry air massflow rate" Temp TAirIn IN 18 ABS_ZERO BIG "Temp of entering air" Temp TAirOut OUT 20 ABS_ZERO BIG "Temp of leaving air" HumRatio WAir IN 0.01 0 1 "Humidity ratio of entering air" Fraction_y XAir IN 594 0 BIG "Pollutant fraction" ElPowerCons QSup LOC 296 0 BIG "Power supply of fan" VolFlow_m VolFLow LOC 2666 0 BIG "Air flow in l/s" PARAMETERS /* type name role def min max description */ Pressure dpMax S_P 500 SMALL BIG "Pressure head at FanOn = 1" Pressure dpMin S_P 0.1 SMALL BIG "Pressure head at FanOn <= 0 (for numerical reasons)" /*Temp TRise S_P 2 0 BIG "Temp rise in fan" */ Temp TRise S_P 1 0 BIG "Temp rise in fan" Factor eta S_P 0.9 SMALL 1 "Fan efficiency" END_MODEL