#	Example two, a box enclosure with an unknown media
#	temperature. All walls have known properties
#	(i.e. temperature, emissivity, and reflectivity). 
#	The media is participating. 

Seed(12345)        # Apply the optional random number seed 
Mode(Temperature)  # Model Mode is either temperature or view
Bundle(0.001)      # Bundle energy
Model(1)           # Number of enclosures in the model 


  # This is Box one , X = 1, Y = 5, Z = 5 meters
  # Note, ':'  ';'  '{blank}' and ',' can be used to separate data

Box(1;1,5,5)
    

    # For wall numbering, think of yourself as being inside of the box.
    #Bottom 
Wall(1;temp,100,.5,.5,0)
   

    # Left wall 1 meter long 5 meters high
    # temp = 100 K, emis = 1.0, Diffuse scattering
Wall(2;temp,100,1.0,0,0)
  

    # Back wall, 5 meters by 5 meters.
    # temp = 50 K, emis = 0.7, Diffuse scattering
Wall(3;temp,100,0.7,.3,0)


    # Top wall 1 meter long 5 meters high
Wall(4;temp,70,1.0,0,0)


    # Right wall 1 meter long 5 meters high
Wall(5;temp,100,0.6,.4,0)


   # Front wall is defined by using the element keyword
   # It is broken into a 3X3 grid
Wall(6; element,3,3)

   # Wall elements have a temperature of 100 K, diffuse scattering
   # and an emissivity of 0.4 or 0.9
Welement(temp, 100,0.9,.1,0  100,0.4,.6,0  100,0.4,.6,0 
               100,0.4,.6,0  100,0.9,.1,0  100,0.4,.6,0
               100,0.4,.6,0  100,0.4,.6,0  100,0.9,.1,0) 


Media(1;unknown,3,3,2,0.7,0.5,isotropic)

   # Iterate a maximum of 30 times or to a sent/receive ratio of 0.9 %
   # update factor = 1.0, and iterate to a net flux of 0.0 watts/m/m/m/element
Iterate(30,0.9,1.0,    0,0,0
                       0,0,0
                       0,0,0

                       0,0,0
                       0,0,0
                       0,0,0)