declarations array(pos,real,21,3) array(size,real,21,3) array(nam,char,21) real(doorhite,doorwide,parthite,partthck,suppwide,suppsize,supphite) real(prt1wide,prt1zpos,prt2wide,prt3zpos,suppypos,suppxpos,doorzpos) real(roomhigh,roomwide,roomlong) real(fireypos,firezpos,firesize) settings roomhigh=2.895600E+00 roomwide=6.400800E+00 roomlong=8.534400E+00 doorhigh=2.438400E+00 doorwide=9.144000E-01 doorzpos=7.924800E+00 prt1wide=3.048000E+00 prt2wide=2.438400E+00 parthigh=1.828800E+00 partthck=1.524000E-01 prt1zpos=4.267200E+00 prt3zpos=3.352800E+00 suppypos=2.743200E+00 suppxpos=1.828800E+00 suppwide=9.144000E-01 supphigh=3.048000E-01 fireypos=2.288400E+00 firezpos=7.644000E-01 firesize=3.000000E-01 GVIEW(P,8.630785E-01,-5.050615E-01,-2.881525E-03) GVIEW(UP,5.031418E-01,8.592720E-01,9.219494E-02) > DOM, SIZE, roomhigh , roomwide , roomlong > DOM, MONIT, 4.999400E-01, 5.721000E-01, 4.777500E-01 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > DOM, SNAPSIZE, 1.000000E-02 representations of aspects of the geometry -------------------------------- -------------------------------- ! ^ ! supp ! roomwide-! ! ^ ! supp ! roomwide-! ! roomhigh ! wide ! ! ! roomhigh ! wide ! ! ! supp-! ! ! ! supp-! ! ! ! ypos ! ! ! ! ypos ! ! ! ! ! L4 ! ! ! ! H3 ! ! ! !------! ! ! !------! ! ! L1 !supply! L2 ! ! H1 !return! H2 ! ! !------! ! ! !------! ! ! ! ^ ! ! ! ! ^ ! ! ! ! supp ! ! ! ! supp ! ! ! ! xpos ! ! ! ! xpos ! ! ! ! ! ! ! ! ! ! ! ! L3 ! ! ! ! H4 ! ! !-------------!------!----------! !-------------!------!----------! zpos=0 zpos=roomlong ------------------------------------------------------------- ! ! ! ! ! ! N3 ! ! ! ! ! ! ! !-------------! ! ! ! ^ ! ! ! ! doorhigh ! ! ! N2 ! ! N1 ! ! !- doorwide -! ! ! ! ! ! ! ! OPEN ! ! ! ! ! ! ! ! ! ! ! ! ! ! !-roomlong !-doorzpos ! ! ------------------------------------------------------------ filling the arrays nam(1) =wall-l1 pos(1,1) =0.0 pos(1,2) =0.0 pos(1,3) =0.0 size(1,1)=roomhigh size(1,2)=suppypos size(1,3)=0.0 nam(2) =wall-l2 pos(2,1) =0.000000E+00 pos(2,2) =suppypos+suppwide pos(2,3) =0.000000E+00 size(2,1)=roomhigh size(2,2)=roomwide-suppwide-suppypos size(2,3)=0.000000E+00 nam(3) = WALL-L3 pos(3,1) = 0.000000E+00 pos(3,2) =suppypos pos(3,3) =0.000000E+00 size(3,1)=suppxpos size(3,2)=suppwide size(3,3)=0.000000E+00 nam(4) =WALL-L4 pos(4,1) =suppxpos+supphigh pos(4,2) =suppypos pos(4,3) =0.000000E+00 size(4,1)=roomhigh-suppxpos-supphigh size(4,2)=suppwide size(4,3)=0.000000E+00 nam(5) =SUPPLY pos(5,1) =suppxpos pos(5,2) =suppypos pos(5,3) =0.000000E+00 size(5,1)=supphigh size(5,2)=suppwide size(5,3)=0.000000E+00 nam(6) =RETURN pos(6,1) =suppxpos pos(6,2) =suppypos pos(6,3) =roomlong size(6,1)=supphigh size(6,2)=suppwide size(6,3)=0.000000E+00 nam(7) =WALL-H3 pos(7,1) =suppxpos+supphigh pos(7,2) =suppypos pos(7,3) =roomlong size(7,1)=roomhigh-suppxpos-supphigh size(7,2)=suppwide size(7,3)=0.000000E+00 nam(8) =WALL-H4 pos(8,1) =0.000000E+00 pos(8,2) =suppypos pos(8,3) =roomlong size(8,1)=suppxpos size(8,2)=suppwide size(8,3)=0.000000E+00 nam(9) =WALL-H1 pos(9,1) =0.0 pos(9,2) =0.0 pos(9,3) =roomlong size(9,1)=roomhigh size(9,2)=suppypos size(9,3)=0.0 nam(10) =WALL-H2 pos(10,1) =0.000000E+00 pos(10,2) =suppypos+suppwide pos(10,3) =roomlong size(10,1)=roomhigh size(10,2)=roomwide-suppwide-suppypos size(10,3)=0.000000E+00 nam(11) =WALL-S1 pos(11,1) =0.000000E+00 pos(11,2) =0.000000E+00 pos(11,3) =0.000000E+00 size(11,1)=roomhigh size(11,2)=0.000000E+00 size(11,3)=roomlong nam(12) =WALL-N1 pos(12,1) =0.000000E+00 pos(12,2) =roomwide pos(12,3) =0.000000E+00 size(12,1)=roomhigh size(12,2)=0.000000E+00 size(12,3)=doorzpos-doorwide nam(13) =WALL-N2 pos(13,1) =0.000000E+00 pos(13,2) =roomwide pos(13,3) =doorzpos size(13,1)=roomhigh size(13,2)=0.000000E+00 size(13,3)=roomlong-doorzpos nam(14) =OPEN pos(14,1) =0.0 pos(14,2) =roomwide pos(14,3) =doorzpos-doorwide size(14,1)=doorhigh size(14,2)=0.000000E+00 size(14,3)=doorwide nam(15) =WALL-N3 pos(15,1) =doorhigh pos(15,2) =roomwide pos(15,3) =doorzpos-doorwide size(15,1)=roomhigh-doorhigh size(15,2)=0.000000E+00 size(15,3)=doorwide nam(16) =DOOR pos(16,1) =0.000000E+00 pos(16,2) =roomwide-doorwide pos(16,3) =doorzpos size(16,1)=doorhigh size(16,2)=doorwide size(16,3)=0.000000E+00 nam(17) =PART-1 pos(17,1) =0.000000E+00 pos(17,2) =0.000000E+00 pos(17,3) =prt1zpos size(17,1)=parthigh size(17,2)=prt1wide size(17,3)=partthck nam(18) =PART-2 pos(18,1) =0.000000E+00 pos(18,2) =prt1wide pos(18,3) =0.000000E+00 size(18,1)=parthigh size(18,2)=partthck size(18,3)=prt2wide nam(19) =PART-3 pos(19,1) =0.000000E+00 pos(19,2) =prt1wide pos(19,3) =prt3zpos size(19,1)=parthigh size(19,2)=partthck size(19,3)=prt2wide nam(20) =FIRE pos(20,1) =0.000000E+00 pos(20,2) =fireypos pos(20,3) =firezpos size(20,1)=firesize size(20,2)=firesize size(20,3)=firesize nam(21) =ROOF pos(21,1) =roomhigh pos(21,2) =0.000000E+00 pos(21,3) =0.000000E+00 size(21,1)=0.000000E+00 size(21,2)=roomwide size(21,3)=roomlong > OBJ, NAME, :NAM(1): > OBJ, POSITION, :pos(1,1):,:pos(1,2):,:pos(1,3): > OBJ, SIZE, :size(1,1):,:size(1,2): ,:size(1,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(2): > OBJ, POSITION, :pos(2,1):,:pos(2,2):,:pos(2,3): > OBJ, SIZE, :size(2,1):,:size(2,2):,:size(2,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(3): > OBJ, POSITION, :pos(3,1):,:pos(3,2):,:pos(3,3): > OBJ, SIZE, :size(3,1):,:size(3,2):,:size(3,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(4): > OBJ, POSITION, :pos(4,1):,:pos(4,2):,:pos(4,3): > OBJ, SIZE, :size(4,1):,:size(4,2):,:size(4,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(5): > OBJ, POSITION, :pos(5,1):,:pos(5,2):,:pos(5,3): > OBJ, SIZE, :size(5,1):,:size(5,2):,:size(5,3): > OBJ, GEOMETRY, cube3 > OBJ, ROTATION24, 1 > OBJ, TYPE, INLET > OBJ, PRESSURE, 0.000000E+00 > OBJ, VOLUFLOW, 4.205200E-01 > OBJ, TEMPERATURE, 1.500000E+01 > OBJ, TURB-INTENS, 5.000000E+00 > OBJ, NAME, :nam(6): > OBJ, POSITION, :pos(6,1):,:pos(6,2):,:pos(6,3): > OBJ, SIZE, :size(6,1):,:size(6,2):,:size(6,3): > OBJ, GEOMETRY, cube3 > OBJ, ROTATION24, 1 > OBJ, TYPE, INLET > OBJ, PRESSURE, 0.000000E+00 > OBJ, VOLUFLOW, -3.364200E-01 > OBJ, TEMPERATURE, 0.000000E+00 > OBJ, TURB-INTENS, 5.000000E+00 > OBJ, NAME, :nam(7): > OBJ, POSITION, :pos(7,1):,:pos(7,2):,:pos(7,3): > OBJ, SIZE, :size(7,1):,:size(7,2):,:size(7,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(8): > OBJ, POSITION, :pos(8,1):,:pos(8,2):,:pos(8,3): > OBJ, SIZE, :size(8,1):,:size(8,2):,:size(8,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(9): > OBJ, POSITION, :pos(9,1):,:pos(9,2):,:pos(9,3): > OBJ, SIZE, :size(9,1):,:size(9,2):,:size(9,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(10): > OBJ, POSITION, :pos(10,1):,:pos(10,2):,:pos(10,3): > OBJ, SIZE, :size(10,1):,:size(10,2):,:size(10,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(11): > OBJ, POSITION, :pos(11,1):,:pos(11,2):,:pos(11,3): > OBJ, SIZE, :size(11,1):,:size(11,2):,:size(11,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(12): > OBJ, POSITION, :pos(12,1):,:pos(12,2):,:pos(12,3): > OBJ, SIZE, :size(12,1):,:size(12,2):,:size(12,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(13): > OBJ, POSITION, :pos(13,1):,:pos(13,2):,:pos(13,3): > OBJ, SIZE, :size(13,1):,:size(13,2):,:size(13,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(14): > OBJ, POSITION, :pos(14,1):,:pos(14,2):,:pos(14,3): > OBJ, SIZE, :size(14,1):,:size(14,2):,:size(14,3): > OBJ, GEOMETRY, cube12 > OBJ, ROTATION24, 1 > OBJ, TYPE, OPENING > OBJ, PRESSURE, 0.000000E+00 > OBJ, TEMPERATURE, 1.500000E+01 > OBJ, COEFFICIENT, 1.000000E+03 > OBJ, TURBULENCE, SAME , SAME > OBJ, NAME, :nam(15): > OBJ, POSITION, :pos(15,1):,:pos(15,2):,:pos(15,3): > OBJ, SIZE, :size(15,1):,:size(15,2):,:size(15,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, NAME, :nam(16): > OBJ, POSITION, :pos(16,1):,:pos(16,2):,:pos(16,3): > OBJ, SIZE, :size(16,1):,:size(6,2):,:size(16,3): > OBJ, GEOMETRY, cube > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE > OBJ, POROSITY, 0.000000E+00 > OBJ, SIDE, BOTH > OBJ, NAME, :nam(17): > OBJ, POSITION, :pos(17,1):,:pos(17,2):,:pos(17,3): > OBJ, SIZE, :size(17,1):,:size(17,2):,:size(17,3): > OBJ, GEOMETRY, cube14 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, MATERIAL, 198,Solid with smooth-wall friction > OBJ, NAME, :nam(18): > OBJ, POSITION, :pos(18,1):,:pos(18,2):,:pos(18,3): > OBJ, SIZE, :size(18,1):,:size(18,2):,:size(18,3): > OBJ, GEOMETRY, cube14 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, MATERIAL, 198,Solid with smooth-wall friction > OBJ, NAME, :nam(19): > OBJ, POSITION, :pos(19,1):,:pos(19,2):,:pos(19,3): > OBJ, SIZE, :size(19,1):,:size(19,2):,:size(19,3): > OBJ, GEOMETRY, cube14 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, MATERIAL, 198,Solid with smooth-wall friction > OBJ, NAME, :nam(20): > OBJ, POSITION, :pos(20,1):,:pos(20,2):,:pos(20,3): > OBJ, SIZE, :size(20,1):,:size(20,2):,:size(20,3): > OBJ, GEOMETRY, fire > OBJ, ROTATION24, 9 > OBJ, TYPE, BLOCKAGE > OBJ, MATERIAL, 0, Air at 20 deg C, 1 atm > OBJ, HEAT_FLUX, 0.000000E+00, 7.000000E+04 > OBJ, SCAL_FIXF, 0.000000E+00 > OBJ, NAME, :nam(21): > OBJ, POSITION, :pos(21,1):,:pos(21,2):,:pos(21,3): > OBJ, SIZE, :size(21,1):,:size(21,2):,:size(21,3): > OBJ, GEOMETRY, cube11 > OBJ, ROTATION24, 1 > OBJ, VISIBLE, NO > OBJ, TYPE, PLATE