1 cellSet heater new boxToCell (-0.01 0 -100 )(0.01 0.01 100)
2 cellSet heater add boxToCell (-0.01 -100 -0.01)(0.01 0.01 0.01)
3 cellZoneSet heater new setToCellZone heater
4 cellSet leftSolid new boxToCell (-100 0 -100 )(-0.01 0.01 100)
5 cellZoneSet leftSolid new setToCellZone leftSolid
6 cellSet rightSolid new boxToCell (0.01 0 -100 )(100 0.01 100)
7 cellZoneSet rightSolid new setToCellZone rightSolid
8 cellSet topAir new boxToCell (-100 0.01 -100 )(100 100 100)
9 cellZoneSet topAir new setToCellZone topAir
10 cellSet bottomAir clear
11 cellSet bottomAir add cellToCell heater
12 cellSet bottomAir add cellToCell leftSolid
13 cellSet bottomAir add cellToCell rightSolid
14 cellSet bottomAir add cellToCell topAir
15 cellSet bottomAir invert
16 cellZoneSet bottomAir new setToCellZone bottomAir