;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;      LISP global- and models-descriptions for IDA Modeller version 3.0
;;      Generated by IDA NMF Translator V1.632.
;;      Date/Time  : March 13, 2002; 16:28:03
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(:quantity-types
  (generic | | cross)
  (angle |Deg| cross)
  (angler |rad| cross)
  (area |m2| cross)
  (caprate |W/K| thru)
  (control |dimless| cross)
  (density |kg/m3| cross)
  (enthalpy |J/kg| cross)
  (factor |dimless| cross)
  (fractflow_m |g/s| thru)
  (fractflow_h |mg/h| thru)
  (fractflow_mh |g/h| thru)
  (fractflow_y |mg/s| thru)
  (fractflow_n |µg/s| thru)
  (fractflow_yh |mg/h| thru)
  (fraction |kg/kg| cross)
  (fraction_m |g/kg| cross)
  (fraction_y |mg/kg| cross)
  (fraction_n |µg/kg| cross)
  (frequency |1/s| cross)
  (heatcap |J/K| cross)
  (heatcapa |J/(K m2)| cross)
  (heatcapm |J/(kg K)| cross)
  (heatcond |W/K| cross)
  (heatcondl |W/(m K)| cross)
  (heatconda |W/(m2 K)| cross)
  (heatflux |W| thru)
  (heatflux_k |kW| thru)
  (heatflux_m |MW| thru)
  (heatres |K/W| cross)
  (heatresa |(m2 K)/W| cross)
  (hour |h| cross)
  (humflow |kg/s| thru)
  (humflow_m |g/s| thru)
  (humratio |kg/kg| cross)
  (humratio_m |g/kg| cross)
  (length |m| cross)
  (mass |kg| cross)
  (massflow |kg/s| thru)
  (massflow_h |kg/h| thru)
  (massflow_y |mg/s| thru)
  (numflow_h |1/h| thru)
  (numl_k |1/km| cross)
  (onoff |dimless| thru)
  (pressure |Pa| cross)
  (pressure_k |kPa| cross)
  (radiation |W| thru)
  (radiationa |W/m2| thru)
  (rada |W/m2| cross)
  (temp |Deg-C| cross)
  (temp_f |Deg-F| cross)
  (temp_k |K| cross)
  (velocity |m/s| thru)
  (velocity_k |km/h| thru)
  (vel |m/s| cross)
  (viscdyn |kg/(m s)| thru)
  (visckin |m2/s| thru)
  (volume |m3| cross)
  (volflow |m3/s| thru)
  (volflow_h |m3/h| thru)
  (volfract |kg/kg| cross)
  (volfract_m |g/m3| cross)
  (volfract_y |mg/m3| cross)
  (volfract_n |µg/m3| cross)
  (current |A| thru)
  (elcap |F| cross)
  (elinduct |H| cross)
  (elres |Ohm| cross)
  (power |W| thru)
  (voltage |V| cross)
  (volflow_m |l/s| thru)
  (elpowercons |W| cross)
  (primpowercons |W| cross)
  (power_k |kW| cross)
)
(:link-types
  (GENERIC)
  (Q HEATFLUX)
  (QQQ HEATFLUX HEATFLUX HEATFLUX)
  (T TEMP)
  (Z FACTOR)
  (X_Y FRACTION_Y)
  (XF_YH FRACTFLOW_YH)
  (HQ ENTHALPY HEATFLUX)
  (TQ TEMP HEATFLUX)
  (TQRR TEMP HEATFLUX RADIATION RADIATION)
  (TR TEMP RADIATIONA)
  (RR RADIATIONA RADIATIONA)
  (RRRR RADIATIONA RADIATIONA RADIATIONA RADIATIONA)
  (RRRWW RADIATION RADIATION RADIATION ANGLE ANGLE)
  (M MASSFLOW)
  (MT MASSFLOW TEMP)
  (PM PRESSURE MASSFLOW)
  (PMT PRESSURE MASSFLOW TEMP)
  (PMTQ PRESSURE MASSFLOW TEMP HEATFLUX)
  (PVFTX_Y PRESSURE VOLFLOW TEMP FRACTION_Y)
  (PVFTXX_YN PRESSURE VOLFLOW TEMP VOLFRACT_Y VOLFRACT_N)
  (V VELOCITY)
  (VF VOLFLOW)
  (W HUMRATIO)
  (XFXF_MHMH FRACTFLOW_MH FRACTFLOW_MH)
  (MOISTAIR PRESSURE MASSFLOW TEMP HUMRATIO)
  (VENTX PRESSURE MASSFLOW_H TEMP FRACTION_Y)
  (BIDIRFLOW PRESSURE MASSFLOW ENTHALPY HEATFLUX)
  (BIDIRX PRESSURE MASSFLOW_H TEMP HEATFLUX FRACTION_Y FRACTFLOW_YH)
  (HEATSUN TEMP HEATFLUX RADIATIONA RADIATIONA)
  (CONTROLLINK CONTROL)
  (CONTROLLIMIT CONTROL CONTROL)
  (UI VOLTAGE CURRENT)
  (UNIAIR PRESSURE MASSFLOW TEMP FRACTION_Y HUMRATIO)
  (BIDIRAIR PRESSURE MASSFLOW TEMP HEATFLUX FRACTION_Y FRACTFLOW_Y HUMRATIO HUMFLOW)
  (CLIMDATA PRESSURE TEMP FRACTION_Y FACTOR ANGLE VEL RADA RADA)
  (CLIM2FACE PRESSURE TEMP FRACTION_Y HUMRATIO TEMP TEMP ANGLE VEL RADA RADA ANGLE ANGLE)
  (FACE2WALL TEMP TEMP TEMP HEATCONDA RADA RADA RADA)
  (FACE2WIND TEMP TEMP TEMP HEATCONDA RADA RADA RADA ANGLE ANGLE ANGLE)
  (WIND2AMB HEATFLUX HEATFLUX HEATFLUX)
  (POW_K POWER_K)
  (P PRESSURE)
  (POW ELPOWERCONS)
  (S FREQUENCY)
  (VF_M VOLFLOW_M)
  (SPEED VEL)
)
;;; 
;;;CONSTANTS
;;;
;; (setf abs_zero -273.16)              ;; Deg-C
;; (setf boltz 0.0000000567)            ;; W/(m2 K4)
;; (setf cp_air 1006.0)                 ;; J/(kg K)
;; (setf cp_air_m 0.001006)             ;; MJ/(kg K)
;; (setf cp_vap 1805.0)                 ;; J/(kg K)
;; (setf cp_wat 4187.0)                 ;; J/(kg K)
;; (setf cv_air 720.0)                  ;; J/(kg K)
;; (setf g 9.81)                        ;; m/s2
;; (setf gascon 287.0)                  ;; 
;; (setf hf_vap 2501000.0)              ;; J/kg
;; (setf lambda_air 0.0243)             ;; W/(m K)
;; (setf lambda_wat 0.554)              ;; W/(m K)
;; (setf p_atm_0 101300.0)              ;; Pa
;; (setf pi 3.1415927)                  ;; dimless
;; (setf prandtl_air 0.71)              ;; dimless
;; (setf rho_air 1.2)                   ;; kg/m3
;; (setf rho_wat 1000.0)                ;; kg/m3
;; (setf visc_wat 0.001)                ;; kg/(m s)
;; (setf small 0.00000000000000000001)   ;; 
;; (setf big 100000000000000000000.0)   ;; 
;;; 
;;;COMPONENTS
;;;

;;;
;;; model CEDETZON
;;;

((template :n CEDETZON :c :eo :d "Detailed ZONe w T**4 lw radiation, view factors, displacement vent...")

;;    :model-parameters
        (:par :t system-parameter  :n NMAIN  :x SMP  :v 6  :kv (INTEGER 1 *) :f #X29 :d "main surfaces")
        (:par :t system-parameter  :n NSUBSUB  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "number of [sub of sub] relations")
        (:par :t system-parameter  :n NWALL  :x SMP  :v 6  :kv (INTEGER 1 *) :f #X29 :d "walls")
        (:par :t system-parameter  :n NLITE  :x SMP  :v 1  :kv (INTEGER 1 1) :f #X29 :d "lighted surfaces")
        (:par :t system-parameter  :n NWIND  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "windows")
        (:par :t system-parameter  :n NHCSURF  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "heated or cooled surfaces")
        (:par :t system-parameter  :n NEXCL  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "subsurf excluded to avoid overlapping")
        (:par :t system-parameter  :n NVERT  :x SMP  :v 8  :kv (INTEGER 8 *) :f #X29 :d "vertices")
        (:par :t system-parameter  :n NCVDEV  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "convective devices")
        (:par :t system-parameter  :n NUNIT  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "equipment loads")
        (:par :t system-parameter  :n NOP  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "operative points, where MRT is calculated")
        (:par :t system-parameter  :n NTERMINAL  :x SMP  :v 1  :kv (INTEGER 0 *) :f #X29 :d "air flow terminals")
        (:par :t system-parameter  :n NSENSOR  :x SMP  :v 1  :kv (INTEGER 0 *) :f #X29 :d "temperature sensors")
        (:par :t system-parameter  :n NLOCUNIT  :x SMP  :v 0  :kv (INTEGER 0 *) :f #X29 :d "local units cooler / heater")
        (:par :t system-parameter  :n NMAXLAYR  :x SMP  :v 4  :kv (INTEGER 1 *) :f #X29 :d "max number of layers in any wall")
        (:par :t system-parameter  :n NINTWALL  :x SMP  :v 1  :kv (INTEGER 0 *) :f #X29 :d "inside walls and internal masses combined to one mass in parameter proc")
        (:par :t system-parameter  :n NTRANSP  :x CMP  :v 6  :kv (INTEGER 1 *) :f #X168 :s (0 T 0 + NLITE)  :d "transparent surfaces (currently lights)")
        (:par :t system-parameter  :n NS  :x CMP  :v 2  :kv (INTEGER 2 2) :f #X168 :s (0 T 0 + 2)  :d "surf in surf")
        (:par :t system-parameter  :n NC  :x CMP  :v 3  :kv (INTEGER 3 3) :f #X168 :s (0 T 0 + 3)  :d "coordinates/vertex = 3")
        (:par :t system-parameter  :n NV  :x CMP  :v 4  :kv (INTEGER 3 *) :f #X168 :s (0 T 0 + 4)  :d "vertices/surface")
        (:par :t system-parameter  :n NSURF  :x CMP  :v 6  :kv (INTEGER 2 *) :f #X168 :s (0 T 0 + NWALL NHCSURF NWIND 1)  :d "solid surfaces (in LW balance)")
        (:par :t system-parameter  :n NALL  :x CMP  :v 6  :kv (INTEGER 1 *) :f #X168 :s (0 T 0 + NSURF NTRANSP NEXCL)  :d "all surfaces")
        (:par :t system-parameter  :n NSUB  :x CMP  :v 1  :kv (INTEGER 0 *) :f #X168 :s (0 T 0 + NSURF (I* -1 NMAIN) -1)  :d "subsurfaces")

;;    :parameters
        (:par :t POWER :n LITERATEDINPUT :x S_P :v 150.0 :kv (FREAL 0.0) :f #X29 :d "Rated light input power")
        (:par :t FACTOR :n LITEFRACTVISIBLE :x S_P :v 0.1 :kv (REAL 0.0 1.0) :f #X21 :d "Fraction short wave")
        (:par :t FACTOR :n LITEFRACTLW :x S_P :v 0.6 :kv (REAL 0.0 1.0) :f #X21 :d "Fraction long wave")
        (:par :t MASS :n NUMAIRMASS :x S_P :v 30.0 :kv (FREAL 0.0) :f #X21 :d "Additional mass to increase numerical robustness")
        (:par :t FACTOR :n DISPLACE :x S_P :v 0.0 :kv (REAL 0.0 1.0) :f #X21 :d "Displacement ventilation 0 = No 1 = Yes")
        (:par :t FACTOR :n FIXGRADIENT :x S_P :v -1.0 :kv (REAL -1.0 5.0) :f #X21 :d "Fixed temp gradient -1 if not applicable")
        (:par :t LENGTH :n XDESK :x S_P :v 1.0 :kv FREAL :f #X21 :d "")
        (:par :t LENGTH :n YDESK :x S_P :v 1.0 :kv FREAL :f #X21 :d "")
        (:par :t LENGTH :n ZDESK :x S_P :v 0.85 :kv (FREAL (0.0)) :f #X21 :d "")
        (:par :t LENGTH :n ZTERM_0 :x S_P :v 2.4 :kv (FREAL 0.0) :f #X21 :d "Height of terminal")
        (:par :t GENERIC :n LOSTWORKPERC :x S_P :v 0.02 :kv (REAL 0.0 1.0) :f #X21 :d "Loss in work efficency per C < 20 and > 25 (ie 10 % at 30 C)")
        (:par :t LENGTH :n ZCVDEV :x S_P :ie 2.4 :kv (FREAL 0.0) :f #X21 :sp (NCVDEV) :d "Height of conv device")
        (:par :t HEATFLUX :n QSRCCVEQUIP :x S_P :ie 100.0 :kv FREAL :f #X29 :sp (NUNIT) :d "Conv load from equipm")
        (:par :t RADIATION :n QSRCRADEQUIP :x S_P :ie 50.0 :kv FREAL :f #X29 :sp (NUNIT) :d "Rad load from equipm")
        (:par :t HUMFLOW :n VAPFSRCEQUIP :x S_P :ie 0.01 :kv FREAL :f #X29 :sp (NUNIT) :d "Vapour load from equipm")
        (:par :t HUMFLOW :n EVAPVAPFSRCEQUIP :x S_P :ie 0.0 :kv (FREAL 0.0) :f #X29 :sp (NUNIT) :d "Evaporative humidity load from equipm")
        (:par :t FRACTFLOW_Y :n CO2FSRCEQUIP :x S_P :ie 50.0 :kv FREAL :f #X29 :sp (NUNIT) :d "CO2 load from equipm")
        (:par :t FACTOR :n NOCC :x S_P :ie 0.0 :kv (FREAL 0.0) :f #X21 :sp (NOP) :d "number of occupants")
        (:par :t FACTOR :n M :x S_P :ie 1.0 :kv (REAL 0.6 10.0) :f #X21 :sp (NOP) :d "Activity[Met], 1 Met = 58 W/m2")
        (:par :t HEATCOND :n W :x S_P :ie 0.0 :kv (FREAL 0.0) :f #X21 :sp (NOP) :d "Outer work, normally 0")
        (:par :t FACTOR :n ICL :x S_P :ie 1.0 :kv (REAL 0.0 2.0) :f #X21 :sp (NOP) :d "Heat res[clo] of clothes 1 clo = 0.155 (m2 K)/W")
        (:par :t VELOCITY :n AIRVEL :x S_P :ie 0.1 :kv (REAL 0.0 1.0) :f #X29 :sp (NOP) :d "Air velocity")
        (:par :t LENGTH :n ZOP :x S_P :ie 0.6 :kv (FREAL 0.0) :f #X21 :sp (NOP) :d "Avg height of person, sitting .6, standing 1.1")
        (:par :t LENGTH :n ZTERM :x S_P :ie 2.4 :kv (FREAL 0.0) :f #X21 :sp (NTERMINAL) :d "Height of terminal")
        (:par :t LENGTH :n ZSENSOR :x S_P :ie 2.4 :kv (FREAL (0.0)) :f #X21 :sp (NSENSOR) :d "Height of sensor")
        (:par :t HEATFLUX :n QMAXLOC :x S_P :ie 0.0 :kv FREAL :f #X29 :sp (NLOCUNIT) :d "Max power of local unit")
        (:par :t TEMP :n TCOIL :x S_P :ie 5.0 :kv FREAL :f #X21 :sp (NLOCUNIT) :d "Coil temperature")
        (:par :t FACTOR :n COP :x S_P :ie 1.0 :kv (FREAL 1.0) :f #X21 :sp (NLOCUNIT) :d "COP of local unit")
        (:par :t AREA :n AINTWALL :x S_P :ie 3.0 :kv (FREAL (0.0)) :f #X21 :sp (NINTWALL) :d "Area of internal walls")
        (:par :t FACTOR :n NLAYERS :x S_P :ie 1.0 :kv (FREAL 1.0) :f #X21 :sp (NINTWALL) :d "Number of layers")
        (:par :t FACTOR :n EPSSURFI :x S_P :ie 0.9 :kv (REAL (0.0) 1.0) :f #X21 :sp (NINTWALL) :d "long wave emissivity")
        (:par :t FACTOR :n REFLSURFI :x S_P :ie 0.5 :kv (REAL (0.0) 1.0) :f #X21 :sp (NINTWALL) :d "short wave reflectance")
        (:par :t HEATCONDA :n HCONV :x S_P :ie 1.0 :kv FREAL :f #X21 :sp (NINTWALL) :d "Convective film coeff negative for walls positive for convective masses")
        (:par :t FACTOR :n EPSSURF :x S_P :ie 0.9 :kv (REAL (0.0) 1.0) :f #X21 :sp (NSURF) :d "long wave emissivity")
        (:par :t FACTOR :n REFLSURF :x S_P :ie 0.5 :kv (REAL (0.0) 1.0) :f #X21 :sp (NSURF) :d "short wave reflectance")
        (:par :t ANGLE :n SLOPESURF :x S_P :ie 90.0 :kv (REAL 0.0 180.0) :f #X21 :sp (NSURF) :d "surface slope, 0=floor, 180=ceiling")
        (:par :t FACTOR :n MAINSURF :x S_P :ie 1.0 :kv (FREAL 1.0) :f #X21 :sp (NSUB) :d "subsurface's main surface number")
        (:par :t FACTOR :n SUBSUB :x S_P :ie 1.0 :kv (FREAL 1.0) :f #X21 :sp (NSUBSUB NS) :d "[1,s] is part of [2,s]; sorted from innermost; not used for parts of main")
        (:par :t LENGTH :n L :x S_P :ie 0.01 :kv (FREAL (0.0)) :f #X21 :sp (NINTWALL NMAXLAYR) :d "Layer thickness")
        (:par :t DENSITY :n RHO :x S_P :ie 1000.0 :kv (FREAL (0.0)) :f #X21 :sp (NINTWALL NMAXLAYR) :d "Layer density")
        (:par :t HEATCONDL :n LAMBDA :x S_P :ie 0.13 :kv (FREAL (0.0)) :f #X21 :sp (NINTWALL NMAXLAYR) :d "Layer heat cond")
        (:par :t HEATCAPM :n CP :x S_P :ie 1300.0 :kv (FREAL (0.0)) :f #X21 :sp (NINTWALL NMAXLAYR) :d "Layer heat cap")
        (:par :t LENGTH :n COORDVERT :x S_P :ie 0.0 :kv FREAL :f #X21 :sp (NVERT NC) :d "coordinates of vertices")
        (:par :t FACTOR :n VERTSURF :x S_P :ie 1.0 :kv (FREAL 1.0) :f #X21 :sp (NALL NV) :d "vertices of surfaces")
        (:par :t LENGTH :n LOCOP :x S_P :ie 0.0 :kv FREAL :f #X21 :sp (NOP NC) :d "locations of op points")

;;    :variables
        (:var :t TEMP :n TAIR :x DER :iv 25.0 :kv (FREAL -273.16) :f #X6 :d "Zone air temp, at ceiling level")
        (:var :t TEMP :n TINTWALL :x DER :iv 25.0 :kv (FREAL -273.16) :f #X6 :d "Temp of internal walls")
        (:var :t FRACTION_Y :n XCO2 :x DER :iv 594.0 :kv (FREAL (0.0)) :f #X6 :d "Fraction conc in zone")
        (:var :t HUMRATIO :n XHUM :x DER :iv 0.002 :kv (FREAL (0.0)) :f #X6 :d "Humidity in zone, repoerted out from model ratio [kg/kg]")
        (:var :t HUMRATIO :n XHUMLOC :x DER :iv 0.002 :kv (FREAL (0.0)) :f #X6 :d "Humidity in zone, local only ratio [kg/kg]")
        (:var :t HEATFLUX :n QLWOCC2ZONE :x U :iv 0.0 :kv FREAL :f #XA :d "Rad load from occ (total)")
        (:var :t FACTOR :n GRADIENT :x U :iv -1.0 :kv FREAL :f #X2 :d "Temperature gradient, >0  determined by model w displacement vent, -1  w/o displacement")
        (:var :t GENERIC :n EWORKPLANE :x U :iv 0.0 :kv (FREAL 0.0) :f #X2 :d "Illumin. at work plane")
        (:var :t TEMP :n TAIRTERM_0 :x U :iv 20.0 :kv (FREAL -273.16) :f #X2 :d "Temp at term_0 heigth")
        (:var :t MASSFLOW :n MF_0 :x U :iv 0.024 :kv FREAL :f #XA :d "Mass flow from term_0")
        (:var :t FACTOR :n RELATIVEHUM :x U :iv 0.3 :kv (REAL (0.0) 1.0) :f #X2 :d "Zone relative humidity")
        (:var :t CONTROL :n LITEON :x X :iv 0.0 :kv (REAL 0.0 1.0) :f #X1 :d "Scheduled Lite On / Off")
        (:var :t CONTROL :n AUTOLITEON :x X :iv 0.0 :kv (REAL 0.0 1.0) :f #X1 :d "Autom. conrolled Lite On / Off")
        (:var :t HEATFLUX :n Q_0 :x X :iv 917.0 :kv FREAL :f #X9 :d "Heat flux from term_0")
        (:var :t FRACTFLOW_Y :n XF_0 :x X :iv 0.0 :kv FREAL :f #X9 :d "Fract flow from term_0")
        (:var :t HUMFLOW :n VAPF_0 :x X :iv 0.0 :kv FREAL :f #X9 :d "Vapour flow, term_0")
        (:var :t PRESSURE :n P :x X :iv 1325.0 :kv (FREAL (0.0)) :f #X1 :d "Zone air pressure")
        (:var :t CONTROL :n CHGSTRAT :x A_S :iv 0.0 :kv (REAL -1.0 1.0) :f #X10 :d "Ventilation change")
        (:var :t GENERIC :n GRADON :x A_S :iv 0.0 :kv (REAL 0.0 1.0) :f #X10 :d "Gradient on / off")
        (:var :t HUMRATIO :n HUMAS :x A_S :iv -0.1 :kv FREAL :f #X10 :d "Sat memory")
        (:var :t FACTOR :n SATURATED :x A_S :iv 0.0 :kv (REAL 0.0 1.0) :f #X10 :d "0 = Normal 1 = Saturated")
        (:var :t RADIATION :n QDAYLITE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "total SW net thru all wdws")
        (:var :t RADIATION :n QSW2AMB :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "total SW back thru all wdws")
        (:var :t ELPOWERCONS :n QLITE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X140 :d "Supplied lite power")
        (:var :t HEATFLUX :n QSWLITE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "SW radiation from light")
        (:var :t HEATFLUX :n QLWLITE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "LW radiation from light")
        (:var :t HEATFLUX :n QCVLITE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "Convective heat from light")
        (:var :t HEATFLUX :n QCDINT2ZONE :x LOC :iv 216.0 :kv FREAL :f #X148 :d "Total from internal walls")
        (:var :t HEATFLUX :n QCDWALLS2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Conducted from walls")
        (:var :t HEATFLUX :n QLCWINDS2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Flow from windows")
        (:var :t HEATFLUX :n QHC2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Total flow from HCSurf")
        (:var :t HEATFLUX :n QCVDEV2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Total flow from cv dev")
        (:var :t HEATFLUX :n QCV2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Convected flux to zone")
        (:var :t ELPOWERCONS :n QCVEQUIP2ZONE :x LOC :iv 0.0 :kv FREAL :f #X140 :d "Conv load from equipm")
        (:var :t ELPOWERCONS :n QRADEQUIP2ZONE :x LOC :iv 0.0 :kv FREAL :f #X140 :d "Rad load from equipm")
        (:var :t HEATFLUX :n QEQUIP2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Total load from equipm")
        (:var :t HEATFLUX :n QCVOCC2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Conv load from occ (total)")
        (:var :t HEATFLUX :n QOCC2ZONE :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Total load from occ")
        (:var :t TEMP :n TAIRMEAN :x LOC :iv 25.0 :kv (FREAL -273.16) :f #X140 :d "Mean air temp")
        (:var :t MASSFLOW :n MSUPPLY :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Supply mass flow")
        (:var :t HUMRATIO :n HUMSUPPLY :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X140 :d "Humidity in supply")
        (:var :t TEMP :n TSUPPLY :x LOC :iv 25.0 :kv (FREAL -273.16) :f #X140 :d "Supply air temp")
        (:var :t ENTHALPY :n HSUPPLY :x LOC :iv 40000.0 :kv FREAL :f #X140 :d "Enthalpy of supply air")
        (:var :t TEMP :n TAIRFLOOR :x LOC :iv 25.0 :kv (FREAL -273.16) :f #X140 :d "Temp just above floor")
        (:var :t TEMP :n TAIRFLOORCHK :x LOC :iv 25.0 :kv (FREAL -273.16) :f #X140 :d "Temp just above floor")
        (:var :t GENERIC :n TOTWORKHOUR :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X140 :d "Total working hours")
        (:var :t GENERIC :n LOSTWORKHOUR :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X140 :d "Lost working hours")
        (:var :t FACTOR :n LMPERW :x LOC :iv 118.0 :kv (FREAL 0.0) :f #X140 :d "Lumen per solar watt")
        (:var :t HEATFLUX :n QTERM2ZONE :x LOC :iv 917.0 :kv FREAL :f #X148 :d "Heat flux from terminals")
        (:var :t HEATFLUX :n QTERM2AIR :x LOC :iv 917.0 :kv FREAL :f #X148 :d "Heat flux from terminals")
        (:var :t GENERIC :n XCO2VOL :x LOC :iv 330.0 :kv (FREAL (0.0)) :f #X140 :d "CO2 ppm/vol")
        (:var :t HUMFLOW :n VAPFOCC2ZONE :x LOC :iv 0.0 :kv (FREAL 0.0) :f #X148 :d "Vapour flow from occ")
        (:var :t HUMRATIO :n HUMSAT :x LOC :iv 0.005 :kv (FREAL (0.0)) :f #X140 :d "Saturated humidity")
        (:var :t PRESSURE :n PVAP :x LOC :iv 1300.0 :kv (REAL (0.0) 2700.0) :f #X140 :d "Vapour pressure")
        (:var :t PRESSURE :n PVAPSAT :x LOC :iv 4000.0 :kv (FREAL (0.0)) :f #X140 :d "Saturation pressure")
        (:var :t NUMFLOW_H :n ACH :x LOC :iv 0.5 :kv (FREAL 0.0) :f #X148 :d "Air change per hour")
        (:var :t ENTHALPY :n HAIR :x LOC :iv 20000.0 :kv FREAL :f #X140 :d "Air enthalpy")
        (:var :t HEATFLUX :n QLOCUNIT :x LOC :iv 0.0 :kv FREAL :f #X148 :d "Heatflux from all local units")
        (:var :t TEMP :n TMRTOPDIR :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NMAIN) :d "Directed mean rad temp at op loc")
        (:var :t TEMP :n TOPDIR :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NMAIN) :d "Directed operative temperature at op loc")
        (:var :t HEATFLUX :n QCDWALL2SURF :x U :ie 0.0 :kv FREAL :f #XA :sp (NWALL) :d "Conducted from wall")
        (:var :t TEMP :n TWALL :x X :ie 25.0 :kv (FREAL -273.16) :f #X1 :sp (NWALL) :d "Wall surface temp")
        (:var :t RADIATION :n QSWWIND2AMB :x U :ie 0.0 :kv (FREAL * 0.0) :f #XA :sp (NWIND) :d "SW rad leaving, (all diffuse), POS_IN")
        (:var :t HEATFLUX :n QLCWIND2ZONE :x U :ie 0.0 :kv FREAL :f #XA :sp (NWIND) :d "Flow from window")
        (:var :t ANGLE :n AZIMUTIN :x X :ie 0.0 :kv (REAL 0.0 360.0) :f #X1 :sp (NWIND) :d "Az of incident direct")
        (:var :t ANGLE :n ELEVIN :x X :ie 0.0 :kv (REAL -90.0 90.0) :f #X1 :sp (NWIND) :d "Elev of incident direct")
        (:var :t RADIATION :n QDFWIND2ZONE :x X :ie 0.0 :kv (FREAL 0.0) :f #X9 :sp (NWIND) :d "SW diff rad entering")
        (:var :t RADIATION :n QDRWIND2ZONE :x X :ie 0.0 :kv (FREAL 0.0) :f #X9 :sp (NWIND) :d "SW dir rad entering")
        (:var :t TEMP :n TWIND :x X :ie 25.0 :kv (FREAL -273.16) :f #X1 :sp (NWIND) :d "Window surface temp, innermost pane")
        (:var :t RADIATION :n QSWWIND2ZONE :x LOC :ie 0.0 :kv (FREAL 0.0) :f #X148 :sp (NWIND) :d "total SW in thru wdw")
        (:var :t HEATFLUX :n QHCSURFFRONT :x U :ie 0.0 :kv FREAL :f #XA :sp (NHCSURF) :d "Flow from HCSurf front")
        (:var :t TEMP :n TAIRHCSURF :x U :ie 25.0 :kv (FREAL -273.16) :f #X2 :sp (NHCSURF) :d "Air temp at HC surf")
        (:var :t HEATFLUX :n QHCSURFBACK :x X :ie 0.0 :kv FREAL :f #X9 :sp (NHCSURF) :d "Flow from HCSurf back")
        (:var :t TEMP :n THCSURF :x X :ie 25.0 :kv (FREAL -273.16) :f #X1 :sp (NHCSURF) :d "Heating or Cooling surface Temp")
        (:var :t TEMP :n TCVDEVAIR :x U :ie 25.0 :kv (FREAL -273.16) :f #X2 :sp (NCVDEV) :d "Air temp at devices")
        (:var :t HEATFLUX :n QCVDEV :x X :ie 0.0 :kv FREAL :f #X9 :sp (NCVDEV) :d "Flow from conv device")
        (:var :t CONTROL :n SCHEDEQUIP :x X :ie 0.0 :kv (REAL 0.0 1.0) :f #X1 :sp (NUNIT) :d "Equipment On / Off")
        (:var :t TEMP :n TCL :x U :ie 30.0 :kv (FREAL -273.16) :f #X2 :sp (NOP) :d "Temp of clothes")
        (:var :t CONTROL :n SCHEDOCC :x X :ie 0.0 :kv (REAL 0.0 1.0) :f #X1 :sp (NOP) :d "Occupancy On / Off")
        (:var :t HEATFLUX :n QSWEAT :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NOP) :d "Sweat from occ")
        (:var :t HEATFLUX :n QCVOCC :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NOP) :d "Conv load from occ")
        (:var :t HEATFLUX :n QOCCVAP :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NOP) :d "Vapour load from occ")
        (:var :t HEATFLUX :n QOCCMET :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NOP) :d "Total load from occ")
        (:var :t HEATFLUX :n QLWOCC :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NOP) :d "Rad load from occ")
        (:var :t TEMP :n TAIROP :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NOP) :d "Air temp at 'operative'location")
        (:var :t TEMP :n TMRTOP :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NOP) :d "Mean rad temp at op loc")
        (:var :t TEMP :n TOP :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NOP) :d "Operative temperature")
        (:var :t FACTOR :n PMV :x LOC :ie 0.0 :kv (REAL -3.0 3.0) :f #X140 :sp (NOP) :d "PMV index")
        (:var :t FACTOR :n PPD :x LOC :ie 5.0 :kv (REAL 5.0 100.0) :f #X140 :sp (NOP) :d "PPD index")
        (:var :t FACTOR :n HCL :x LOC :ie 4.0 :kv (FREAL 0.0) :f #X140 :sp (NOP) :d "Heat transfer coeff clothes to air")
        (:var :t TEMP :n TAIRTERM :x U :ie 20.0 :kv (FREAL -273.16) :f #X2 :sp (NTERMINAL) :d "Temp at term[i] heigth")
        (:var :t MASSFLOW :n MF :x X :ie 0.024 :kv FREAL :f #X9 :sp (NTERMINAL) :d "Mass flow from term[i]")
        (:var :t HEATFLUX :n Q :x X :ie 917.0 :kv FREAL :f #X9 :sp (NTERMINAL) :d "Heat flux from term[i]")
        (:var :t FRACTFLOW_Y :n XF :x X :ie 0.0 :kv FREAL :f #X9 :sp (NTERMINAL) :d "Fract flow from term[i]")
        (:var :t HUMFLOW :n VAPF :x X :ie 0.0 :kv FREAL :f #X9 :sp (NTERMINAL) :d "Vapour flow, term[i]")
        (:var :t TEMP :n TSENSOR :x U :ie 25.0 :kv (FREAL -273.16) :f #X2 :sp (NSENSOR) :d "Temp read for ctrl")
        (:var :t CONTROL :n CTRLOCUNIT :x X :ie 0.0 :kv (REAL 0.0 1.0) :f #X1 :sp (NLOCUNIT) :d "Local unit On / Off")
        (:var :t ENTHALPY :n HCHILLCOIL :x LOC :ie 20000.0 :kv FREAL :f #X140 :sp (NLOCUNIT) :d "Leaving air enthalpy")
        (:var :t HEATFLUX :n QLOCALUNIT :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NLOCUNIT) :d "Heatflux from local unit[i]")
        (:var :t HUMRATIO :n WCHILLCOIL :x LOC :ie 0.003 :kv (FREAL (0.0)) :f #X140 :sp (NLOCUNIT) :d "Moisture cont of cooling coil leaving air")
        (:var :t MASSFLOW :n MAIR :x LOC :ie 0.0 :kv (FREAL 0.0) :f #X148 :sp (NLOCUNIT) :d "Ficticious air massflow throug the unit")
        (:var :t ELPOWERCONS :n QEL :x LOC :ie 0.0 :kv (FREAL 0.0) :f #X140 :sp (NLOCUNIT) :d "El. consumption")
        (:var :t HUMFLOW :n WF :x LOC :ie 0.0 :kv (FREAL 0.0) :f #X148 :sp (NLOCUNIT) :d "Condesation in local unit")
        (:var :t RADIATION :n QLW2SURF :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NSURF) :d "LW net to surface")
        (:var :t RADIATION :n QSW2SURF :x LOC :ie 0.0 :kv FREAL :f #X148 :sp (NSURF) :d "SW net to surface")
        (:var :t RADIATIONA :n M0 :x LOC :ie 462.0 :kv (FREAL (0.0)) :f #X148 :sp (NSURF) :d "Black body rad")
        (:var :t HEATCONDA :n H :x LOC :ie 2.0 :kv (FREAL 0.0) :f #X140 :sp (NSURF) :d "Surface film coeff")
        (:var :t TEMP :n TAIRSURF :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NSURF) :d "Mean air temp at surf")
        (:var :t TEMP :n TSURF :x LOC :ie 25.0 :kv (FREAL -273.16) :f #X140 :sp (NSURF) :d "Surface temp")
        (:var :t RADIATION :n QSWSURF2ZONE :x LOC :ie 0.0 :kv (FREAL 0.0) :f #X148 :sp (NSURF) :d "Daylight from surfaces")

;;    :interfaces
         (:int :t TQ :n TQWALL :v (TWALL QCDWALL2SURF) :dir (NIL -1) :sp (NWALL))
         (:int :t TQ :n TQWIND :v (TWIND QLCWIND2ZONE) :dir (NIL -1) :sp (NWIND))
         (:int :t RRRWW :n RADWIND :v (QDFWIND2ZONE QDRWIND2ZONE QSWWIND2AMB AZIMUTIN ELEVIN) :dir (-1 -1 -1 NIL NIL) :sp (NWIND))
         (:int :t TQ :n TQHCFRONT :v (THCSURF QHCSURFFRONT) :dir (NIL -1) :sp (NHCSURF))
         (:int :t TQ :n TQHCBACK :v (TAIRHCSURF QHCSURFBACK) :dir (NIL -1) :sp (NHCSURF))
         (:int :t TQ :n TQCVDEV :v (TCVDEVAIR QCVDEV) :dir (NIL -1) :sp (NCVDEV))
         (:int :t BIDIRAIR :n TERM_0 :v (P MF_0 TAIRTERM_0 Q_0 XCO2 XF_0 XHUM VAPF_0) :dir (NIL -1 NIL -1 NIL -1 NIL -1))
         (:int :t BIDIRAIR :n TERM :v (P MF TAIRTERM Q XCO2 XF XHUM VAPF) :dir (NIL -1 NIL -1 NIL -1 NIL -1) :sp (NTERMINAL))
         (:int :t CONTROLLINK :n SETOCC :v (SCHEDOCC) :dir (NIL) :sp (NOP))
         (:int :t CONTROLLINK :n SETEQUIP :v (SCHEDEQUIP) :dir (NIL) :sp (NUNIT))
         (:int :t CONTROLLINK :n CTRLOCALUNIT :v (CTRLOCUNIT) :dir (NIL) :sp (NLOCUNIT))
         (:int :t CONTROLLINK :n CTRLLIGHT :v (LITEON) :dir (NIL))
         (:int :t CONTROLLINK :n AUTOCTRLLIGHT :v (AUTOLITEON) :dir (NIL))
         (:int :t GENERIC :n LITELEVEL :v (EWORKPLANE) :dir (NIL))
         (:int :t T :n READTEMP :v (TSENSOR) :dir (NIL) :sp (NSENSOR))
         (:int :t GENERIC :n READHUMIDITY :v (RELATIVEHUM) :dir (NIL))
         (:int :t X_Y :n READCO2 :v (XCO2) :dir (NIL)))

;;;;;;
;;;;;;end of model CEDETZON
;;;;;;