ALGORITHMIC_MODEL AirFlowRep ABSTRACT " Flow report; add air flows in groups In/Out thru Internal/External walls" EQUATIONS IntWIn := SUM i = 1, n_in1 IntWInV[i] END_SUM; IntWOut := SUM i = 1, n_in2 IntWOutV[i] END_SUM; ExtWIn := SUM i = 1, n_in3 ExtWInV[i] END_SUM; ExtWOut := SUM i = 1, n_in4 ExtWOutV[i] END_SUM; LINKS /* type name variables */ Vf_m IWI POS_IN IntWIn; Vf_m IWO POS_OUT IntWOut; Vf_m EWI POS_IN ExtWIn; Vf_m EWO POS_OUT ExtWOut; FOR i=1, n_in1 Vf_m IWIv[i] POS_IN IntWInV[i] END_FOR; FOR i=1, n_in2 Vf_m IWOv[i] POS_IN IntWOutV[i] END_FOR; FOR i=1, n_in3 Vf_m EWIv[i] POS_IN ExtWInV[i] END_FOR; FOR i=1, n_in4 Vf_m EWOv[i] POS_IN ExtWOutV[i] END_FOR; VARIABLES /* type name role def min max description */ VolFlow_m IntWIn OUT 0 -BIG BIG " " VolFlow_m IntWOut OUT 0 -BIG BIG " " VolFlow_m ExtWIn OUT 0 -BIG BIG " " VolFlow_m ExtWOut OUT 0 -BIG BIG " " VolFlow_m IntWInV[n_in1] IN 0 -BIG BIG " " VolFlow_m IntWOutV[n_in2] IN 0 -BIG BIG " " VolFlow_m ExtWInV[n_in3] IN 0 -BIG BIG " " VolFlow_m ExtWOutV[n_in4] IN 0 -BIG BIG " " MODEL_PARAMETERS /* type name role def min max description */ INT n_in1 SMP 0 0 BIGINT "Number of In flows thru Internal wall" INT n_in2 SMP 0 0 BIGINT "Number of Out flows thru Internal wall" INT n_in3 SMP 0 0 BIGINT "Number of In flows thru External wall" INT n_in4 SMP 0 0 BIGINT "Number of Out flows thru External wall" /* PARAMETERS */ /*PARAMETER_PROCESSING */ END_MODEL