From f54de2aad9b97064dd965ab5e75b398f5fcaff49 Mon Sep 17 00:00:00 2001
From: mattijs <mattijs>
Date: Mon, 17 May 2010 18:05:04 +0100
Subject: [PATCH] ENH: porousExplicitSourceReactingParcelFoam adapted for
 createBaffles

---
 TODO                                          |   2 +-
 .../filter/0.org/G                            |   6 +
 .../filter/0/G                                |   6 +
 .../filter/Allrun                             |   4 +-
 .../filter/constant/polyMesh/blockMeshDict    | 114 ++++++++++++------
 .../filter/constant/reactingCloud1Properties  |   9 +-
 .../filter/system/controlDict                 |   2 +
 7 files changed, 99 insertions(+), 44 deletions(-)

diff --git a/TODO b/TODO
index 1a25319519..87c7bbebf3 100644
--- a/TODO
+++ b/TODO
@@ -83,7 +83,7 @@ OK - grep for size()/2
     OK - incompressible/boundaryFoam/boundaryLaunderSharma
     OK - incompressible/boundaryFoam/boundaryWallFunctions
     OK - incompressible/boundaryFoam/boundaryWallFunctionsProfile
-    needs createBaffles. ncompressible/pimpleFoam/t-junction-with-fan
+    OK - needs createBaffles. incompressible/pimpleFoam/t-junction-with-fan
     OK - incompressible/simpleSRFFoam/mixer
     needs createBaffles. lagrangian/porousExplicitSourceReactingParcelFoam/filter
     needs special coupledbcs. lagrangian/reactingParcelFilmFoam/multipleBoxes
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0.org/G b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0.org/G
index 46c0e6ce88..e95384474b 100644
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0.org/G
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0.org/G
@@ -27,6 +27,9 @@ boundaryField
         T               T;
         emissivity      1;
         value           uniform 0;
+        refValue        uniform 0;
+        refGradient     uniform 0;
+        valueFraction   uniform 0;
     }
     inlet
     {
@@ -34,6 +37,9 @@ boundaryField
         T               T;
         emissivity      1;
         value           uniform 0;
+        refValue        uniform 0;
+        refGradient     uniform 0;
+        valueFraction   uniform 0;
     }
     outlet
     {
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0/G b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0/G
index 46c0e6ce88..e95384474b 100644
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0/G
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/0/G
@@ -27,6 +27,9 @@ boundaryField
         T               T;
         emissivity      1;
         value           uniform 0;
+        refValue        uniform 0;
+        refGradient     uniform 0;
+        valueFraction   uniform 0;
     }
     inlet
     {
@@ -34,6 +37,9 @@ boundaryField
         T               T;
         emissivity      1;
         value           uniform 0;
+        refValue        uniform 0;
+        refGradient     uniform 0;
+        valueFraction   uniform 0;
     }
     outlet
     {
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/Allrun b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/Allrun
index b44a7c8e2f..2fee29a130 100755
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/Allrun
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/Allrun
@@ -17,10 +17,10 @@ setsToZones -noFlipMap >& log.setsToZones
 
 # create the first cyclic - lhs of porous zone
 unset FOAM_SETNAN
-createBaffles cycLeft cycLeft -overwrite >& log.createBaffles1
+createBaffles cycLeft '(cycLeft_half0 cycLeft_half1)' -overwrite >& log.createBaffles1
 
 # create the second cyclic - rhs of porous zone
-createBaffles cycRight cycRight -overwrite >& log.createBaffles2
+createBaffles cycRight '(cycRight_half0 cycRight_half1)' -overwrite >& log.createBaffles2
 
 runApplication $application
 
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/polyMesh/blockMeshDict b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/polyMesh/blockMeshDict
index 9470ef2b39..a7981f6186 100644
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/polyMesh/blockMeshDict
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/polyMesh/blockMeshDict
@@ -62,51 +62,87 @@ edges
 (
 );
 
-patches
+boundary
 (
-    wall walls
-    (
-        ( 0  1 13 12)
-        ( 1  2 14 13)
-        ( 2  3 15 14)
-        ( 3  4 16 15)
-        ( 4  5 17 16)
-        ( 6  7 19 18)
-        ( 7  8 20 19)
-        ( 8  9 21 20)
-        ( 9 10 22 21)
-        (10 11 23 22)
-    )
+    walls
+    {
+        type wall;
+        faces
+        (
+            ( 0  1 13 12)
+            ( 1  2 14 13)
+            ( 2  3 15 14)
+            ( 3  4 16 15)
+            ( 4  5 17 16)
+            ( 6  7 19 18)
+            ( 7  8 20 19)
+            ( 8  9 21 20)
+            ( 9 10 22 21)
+            (10 11 23 22)
+        );
+    }
 
-    patch inlet
-    (
-        (11  0 12 23)
-    )
+    inlet
+    {
+        type patch;
+        faces
+        (
+            (11  0 12 23)
+        );
+    }
 
-    patch outlet
-    (
-        ( 5  6 18 17)
-    )
+    outlet
+    {
+        type patch;
+        faces
+        (
+            ( 5  6 18 17)
+        );
+    }
 
-    cyclic cycLeft
-    ()
+    cycLeft_half0
+    {
+        type cyclic;
+        faces    ();
+        neighbourPatch cycLeft_half1;
+    }
+    cycLeft_half1
+    {
+        type cyclic;
+        faces    ();
+        neighbourPatch cycLeft_half0;
+    }
 
-    cyclic cycRight
-    ()
+    cycRight_half0
+    {
+        type cyclic;
+        faces    ();
+        neighbourPatch cycRight_half1;
+    }
+    cycRight_half1
+    {
+        type cyclic;
+        faces    ();
+        neighbourPatch cycRight_half0;
+    }
 
-    empty frontAndBack
-    (
-        ( 0 11 10  1)
-        ( 1 10  9  2)
-        ( 2  9  8  3)
-        ( 3  8  7  4)
-        ( 4  7  6  5)
-        (12 13 22 23)
-        (13 14 21 22)
-        (14 15 20 21)
-        (15 16 19 20)
-        (16 17 18 19)
-    )
+    frontAndBack
+    {
+        type empty;
+        faces
+        (
+            ( 0 11 10  1)
+            ( 1 10  9  2)
+            ( 2  9  8  3)
+            ( 3  8  7  4)
+            ( 4  7  6  5)
+            (12 13 22 23)
+            (13 14 21 22)
+            (14 15 20 21)
+            (15 16 19 20)
+            (16 17 18 19)
+        );
+    }
 );
 
 
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/reactingCloud1Properties b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/reactingCloud1Properties
index 70086f0b26..e2ebae02d6 100644
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/reactingCloud1Properties
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/constant/reactingCloud1Properties
@@ -136,7 +136,11 @@ LocalInteractionCoeffs
         {
             type    rebound;
         }
-        cycLeft
+        cycLeft_half0
+        {
+            type    rebound;
+        }
+        cycLeft_half1
         {
             type    rebound;
         }
@@ -184,7 +188,8 @@ PatchPostProcessingCoeffs
 
     patches
     (
-        cycLeft
+        cycLeft_half0
+        cycLeft_half1
     );
 }
 
diff --git a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/system/controlDict b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/system/controlDict
index b5f8df21a7..0f3fa40cf9 100644
--- a/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/system/controlDict
+++ b/tutorials/lagrangian/porousExplicitSourceReactingParcelFoam/filter/system/controlDict
@@ -15,6 +15,8 @@ FoamFile
 }
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
+libs            ("libcompressibleTurbulenceModel.so" "libcompressibleRASModels.so" "libradiation.so");
+
 application     porousExplicitSourceReactingParcelFoam;
 
 startFrom       startTime;