tutorial scripts

src/meshTools/octree/PointIndexHit.H

@@ -141,6 +141,11 @@ public:
             return hitPoint_;
         }
 
+        Point& rawPoint()
+        {
+            return hitPoint_;
+        }
+
         void setHit()
         {
             hit_ = true;

tutorials/Allclean

@@ -43,23 +43,10 @@ echo ""
 
 for application in *
 do
-    if [ -d "$application" ]
+    if [ -d $application ]
     then
-        cd $application
+        (cd $application && ../cleanAll)
-        if [ -f "Allclean" ] 
+    fi
-        then
-            ./Allclean
-        else
-            for case in *
-            do
-                if [ -d "$case" ]
-                then
-                    cleanCase $case
-                fi
-            done
-        fi
-        cd ..
-     fi
 done
 
 #------------------------------------------------------------------------------

tutorials/Allrun

@@ -32,94 +32,64 @@
 
 . RunFunctions
 
-applications=\
-" \
-    icoFoam \
-    turbFoam \
-    simpleFoam \
-    icoDyMFoam \
-    nonNewtonianIcoFoam \
-    boundaryFoam \
-    interFoam \
-    lesInterFoam \
-    rasInterFoam \
-    multiphaseInterFoam \
-    buoyantSimpleFoam \
-    buoyantFoam \
-    potentialFoam \
-    laplacianFoam \
-    scalarTransportFoam \
-    oodles \
-    coodles \
-    channelOodles \
-    dnsFoam \
-    mhdFoam \
-    electrostaticFoam \
-    financialFoam \
-    sonicFoam \
-    rhoSonicFoam \
-    rhopSonicFoam \
-    sonicLiquidFoam \
-    sonicTurbFoam \
-    solidDisplacementFoam \
-    solidEquilibriumDisplacementFoam \
-    XiFoam \
-    Xoodles \
-    dieselFoam \
-    engineFoam \
-    bubbleFoam \
-    twoPhaseEulerFoam \
-    settlingFoam \
-    rhoExplicitPorousSimpleFoam \
-    rhoImplicitPorousSimpleFoam \
-    rhoTurbFoam \
-    cavitatingFoam \
-    MRFSimpleFoam \
-    interDyMFoam \
-"
 
+# logReport <logfile>
+# Extracts useful info from log file.
 logReport () {
-case=`dirname $1 | sed s/"\(.*\)\.\/"/""/g`
+    case=`dirname $1 | sed s/"\(.*\)\.\/"/""/g`
-app=`echo $1 | sed s/"\(.*\)\."/""/g`
+    app=`echo $1 | sed s/"\(.*\)\."/""/g`
-appAndCase="Application $app - case $case"
+    appAndCase="Application $app - case $case"
 
-fatalError=`grep "FOAM FATAL" $1`
+    fatalError=`grep "FOAM FATAL" $1`
-UxSS=`grep -E "Ux[:| ]*solution singularity" $1`
+    UxSS=`grep -E "Ux[:| ]*solution singularity" $1`
-UySS=`grep -E "Uy[:| ]*solution singularity" $1`
+    UySS=`grep -E "Uy[:| ]*solution singularity" $1`
-UzSS=`grep -E "Uz[:| ]*solution singularity" $1`
+    UzSS=`grep -E "Uz[:| ]*solution singularity" $1`
-completed=`grep -E "^[\t ]*[eE]nd" $1`
+    completed=`grep -E "^[\t ]*[eE]nd" $1`
 
-if [ "$fatalError" ] ; then
+    if [ "$fatalError" ] ; then
-    echo "$appAndCase: ** FOAM FATAL ERROR **"
+        echo "$appAndCase: ** FOAM FATAL ERROR **"
-    return
+        return
-elif [ "$UxSS" -a "$UySS" -a "$UzSS" ] ; then
+    elif [ "$UxSS" -a "$UySS" -a "$UzSS" ] ; then
-    echo "$appAndCase: ** Solution singularity **"
+        echo "$appAndCase: ** Solution singularity **"
-    return
+        return
-elif [ "$completed" ] ; then
+    elif [ "$completed" ] ; then
-    completionTime=`tail -10 $log | grep Execution | cut -d= -f2 | sed 's/^[ \t]*//'` 
+        completionTime=`tail -10 $log | grep Execution | cut -d= -f2 | sed 's/^[ \t]*//'` 
-    if [ "$completionTime" ] ; then
+        if [ "$completionTime" ] ; then
-        completionTime="in $completionTime"
+            completionTime="in $completionTime"
+        fi
+        echo "$appAndCase: completed $completionTime"
+        return
+    else
+        echo "$appAndCase: unconfirmed completion"
     fi
-    echo "$appAndCase: completed $completionTime"
-    return
-else
-    echo "$appAndCase: unconfirmed completion"
-fi
 }
 
+
+# Recursively run all tutorials
+for application in *
+do
+    if [ -d $application ]
+    then
+        #(cd $application && ../runAll)
+        $WM_SCHEDULER "cd $PWD/$application && ../runAll"
+    fi
+done
+
+# Analyse all log files
 rm testLoopReport > /dev/null 2>&1 &
 touch testLoopReport
-for application in $applications
+for application in *
 do
-    cd $application
+    if [ -d $application ]
-    ./Allrun
+    then
-#    echo "$application application completed" >> ../testLoopReport
+        cd $application
-    for log in `find . -name "log.*" | xargs ls -rt`
+        for log in `find . -name "log.*" | xargs ls -rt`
-    do
+        do
-        logReport $log >> ../testLoopReport
+            logReport $log >> ../testLoopReport
-    done
+        done
-    echo "" >> ../testLoopReport
+        echo "" >> ../testLoopReport
-    cd ..
+        cd ..
+    fi
 done
 
 find . -name "log.*" -exec cat {} \; >> logs

tutorials/Alltest

@@ -65,7 +65,22 @@ EOF
 #
 # VARIABLE
 #
-MAIN_CONTROL_DICT=${WM_PROJECT_DIR}/${FOAM_DOT_DIR}/controlDict
+MAIN_CONTROL_DICT=
+: ${FOAM_DOT_DIR:=.$WM_PROJECT-$WM_PROJECT_VERSION}
+
+for i in \
+  $HOME/$FOAM_DOT_DIR \
+  $HOME/.$WM_PROJECT/$WM_PROJECT_VERSION \
+  $HOME/.$WM_PROJECT \
+  $WM_PROJECT_DIR/etc \
+  $WM_PROJECT_DIR/$FOAM_DOT_DIR \
+  ;
+do
+  if [ -f "$i/controlDict" ]; then
+     MAIN_CONTROL_DICT="$i/controlDict"
+     break
+  fi
+done
 TUTORIALS_DIR=.
 TEST_RUN_DIR=../tutorialsTest
 FV_SCHEMES=\

tutorials/CleanFunctions

@@ -38,33 +38,33 @@
 #    do
 #        if [ $T != "0" ] ; then
 #            echo "Deleting directory $T"
-#            rm -rf $1/${T} > /dev/null 2>&1
+#            rm -rf ${T} > /dev/null 2>&1
 #        fi
 #    done
-#    rm -rf $1/{log,log.*,log-*,logSummary.*,.fxLock,*.xml,ParaView*,paraFoam*,*.foam} > /dev/null 2>&1
+#    rm -rf {log,log.*,log-*,logSummary.*,.fxLock,*.xml,ParaView*,paraFoam*,*.foam} > /dev/null 2>&1
 #}
 
 cleanTimeDirectories ()
 {
-    echo "Cleaning $case case of $application application"
+    echo "Cleaning $PWD case"
     nZeros=0
     zeros=""
     while [ $nZeros -lt 8 ] ; do
         timeDir="0.${zeros}[1-9]*"
-        rm -rf $1/${timeDir} > /dev/null 2>&1
+        rm -rf ${timeDir} > /dev/null 2>&1
-        rm -rf $1/-${timeDir} > /dev/null 2>&1
+        rm -rf ./-${timeDir} > /dev/null 2>&1
         zeros=`printf %0${nZeros}d 0`
         nZeros=$(($nZeros + 1))
     done
-    rm -rf $1/{[1-9]*,-[1-9]*,log,log.*,log-*,logSummary.*,.fxLock,*.xml,ParaView*,paraFoam*,*.foam} > /dev/null 2>&1
+    rm -rf ./{[1-9]*,-[1-9]*,log,log.*,log-*,logSummary.*,.fxLock,*.xml,ParaView*,paraFoam*,*.foam} > /dev/null 2>&1
 }
 
 cleanCase ()
 {
-    cleanTimeDirectories $1
+    cleanTimeDirectories
 
-    rm -rf $1/constant/polyMesh/{allOwner*,cell*,face*,meshModifiers*} \
+    rm -rf constant/polyMesh/{allOwner*,cell*,face*,meshModifiers*} \
-           $1/constant/polyMesh/{owner*,neighbour*,point*,edge*} \ 
+           constant/polyMesh/{owner*,neighbour*,point*,edge*} \ 
            > /dev/null 2>&1
 
     for f in `find . -name "*Dict"`
@@ -76,25 +76,25 @@ cleanCase ()
 
 cleanParallelCase ()
 {
-    cleanCase $1
+    cleanCase
 
-    rm -rf $1/processor* > /dev/null 2>&1
+    rm -rf processor* > /dev/null 2>&1
 }
 
 removeCase ()
 {
-    echo "Removing $case case of $application application"
+    echo "Removing $case case"
     rm -rf $1
 }
 
 cleanSamples ()
 {
-    rm -rf $1/{samples,sampleSurfaces} > /dev/null 2>&1
+    rm -rf {samples,sampleSurfaces} > /dev/null 2>&1
 }
 
 cleanUcomponents ()
 {
-    rm -rf $1/0/{Ux,Uy,Uz} > /dev/null 2>&1
+    rm -rf 0/{Ux,Uy,Uz} > /dev/null 2>&1
 }
 
 #------------------------------------------------------------------------------

tutorials/MRFSimpleFoam/mixerVessel2D/Allclean

@@ -0,0 +1,17 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+wclean ../MRFSimpleFoam

tutorials/MRFSimpleFoam/mixerVessel2D/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+compileApplication ../MRFSimpleFoam
+runApplication makeMesh
+runApplication $application
+

tutorials/README.txt

@@ -0,0 +1,129 @@
+To run all               : Allrun
+To run all one iteration : Alltest
+To clean all             : Allclean
+
+The structure now is that a case that only requires blockMesh
+and application does not need an Allrun or Allclean script.
+Only if running is special it requires an Allrun. Similarly
+if cleaning is non-standard.
+
+
+                                run clean
+boundaryFoam
+    boundaryLaunderSharma       ok
+    boundaryWallFunctions       ok
+bubbleFoam
+    bubbleColumn                ok
+buoyantFoam
+    hotRoom                     ok
+buoyantSimpleFoam
+    hotRoom                     ok
+buoyantSimpleRadiationFoam
+    hotRadiationRoom            ok
+cavitatingFoam
+    nozzle2D                    No cavitatingFoam solver.
+channelOodles
+    channel395                  ok
+coodles
+    pitzDaily                   ok
+dieselFoam
+    aachenBomb
+dnsFoam
+    boxTurb16
+electrostaticFoam
+    chargedWire                 ok
+engineFoam
+    kivaTest
+financialFoam
+    europeanCall                ok
+icoDyMFoam
+    movingCone                  ok  ok
+icoFoam
+    cavity                      ok  ok
+    cavityFine                  ok  ok
+    cavityGrade                 ok  ok
+    cavityHighRe                ok  ok
+    cavityClipped               ok  ok
+    elbow                       ok  ok
+interDyMFoam
+    damBreakWithObstacle        ok  ok
+interFoam
+    damBreak                    ok  ok
+    damBreakFine                ok  ok
+laplacianFoam
+    flange                      ok  ok
+lesInterFoam
+    nozzleFlow2D
+mdEquilibrationFoam
+    periodicCube
+mhdFoam                         ok
+    hartmann
+MRFSimpleFoam
+    mixerVessel2D
+multiphaseInterFoam
+    damBreak4phase
+    damBreak4phaseFine
+nonNewtonianIcoFoam
+    offsetCylinder
+oodles
+    pitzDaily
+    pitzDailyDirectMapped
+potentialFoam
+    cylinder
+    pitzDaily
+rasInterFoam
+    damBreak
+    damBreakFine
+rhoPimpleFoam
+    angledDuct
+rhoPorousSimpleFoam
+    angledDuctExplicit
+    angledDuctImplicit
+rhopSonicFoam
+    shockTube
+    wedge15Ma5
+rhoSonicFoam
+    forwardStep
+    shockTube               No setShock application
+rhoTurbFoam
+    cavity
+rhoTurbTwinParcelFoam
+    simplifiedSiwek
+scalarTransportFoam
+    pitzDaily
+settlingFoam
+    dahl
+    tank3D
+simpleFoam
+    pitzDaily
+    pitzDaily3Blocks
+    pitzDailyExptInlet
+simpleSRFFoam
+    mixer
+    simpleSRFFoam
+solidDisplacementFoam
+    plateHole
+solidEquilibriumDisplacementFoam
+    beamEndLoad
+sonicFoam
+    forwardStep
+    shockTube
+sonicLiquidFoam
+    decompressionTank
+    decompressionTankFine
+sonicTurbFoam
+    nacaAirfoil
+    prism
+turbFoam
+    cavity
+twoPhaseEulerFoam
+    bed
+    bed2
+    bubbleColumn
+XiFoam
+    moriyoshiHomogeneous
+    moriyoshiHomogeneousPart2
+Xoodles
+    pitzDaily
+    pitzDaily3D
+

tutorials/RunFunctions

@@ -33,31 +33,29 @@
 runApplication ()
 {
     APP_RUN=$1; shift
-    dir=$1; shift
 
-    if [ -f $dir/log.$APP_RUN ] ; then
+    if [ -f log.$APP_RUN ] ; then
-        echo "$APP_RUN already run on $dir: remove log file to run"
+        echo "$APP_RUN already run on $PWD: remove log file to run"
     else
-        echo "Running $APP_RUN on $dir"
+        echo "Running $APP_RUN on $PWD"
-        ( cd $dir && $APP_RUN $* > log.$APP_RUN 2>&1 )
+        $APP_RUN $* > log.$APP_RUN 2>&1
     fi
 }
 
 runParallel ()
 {
     APP_RUN=$1; shift
-    dir=$2; shift
 
-    if [ -f $dir/log.$APP_RUN ] ; then
+    if [ -f $log.$APP_RUN ] ; then
-        echo "$APP_RUN already run on $dir: remove log file to run"
+        echo "$APP_RUN already run on $PWD: remove log file to run"
     else
         if [ "$WM_MPLIB" = LAM ]
         then
             echo "Starting LAM using $2 machines file"
             lamboot -v $2
         fi
-        echo "Running $APP_RUN in parallel on $dir using $1 processes"
+        echo "Running $APP_RUN in parallel on $PWD using $1 processes"
-        ( cd $dir && mpirun -np $1 $APP_RUN -parallel < /dev/null > log.$APP_RUN 2>&1 )
+        ( mpirun -np $1 $APP_RUN -parallel < /dev/null > log.$APP_RUN 2>&1 )
         if [ "$WM_MPLIB" = LAM ]
         then
             echo "Stopping LAM"
@@ -68,8 +66,8 @@ runParallel ()
 
 compileApplication ()
 {
-    echo "Compiling $1/$2 application"
+    echo "Compiling $1 application"
-    wmake $1/$2
+    wmake $1
 }
 
 cloneCase ()

tutorials/XiFoam/Allclean

@@ -1,16 +1,26 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+
 keepCases="moriyoshiHomogeneous"
 loseCases="moriyoshiHomogeneousPart2"
 
-tutorialPath=`dirname $0`/..
-. $tutorialPath/CleanFunctions
 
 for case in $keepCases
 do
-    cleanCase $case
+    (cd $case && $tutorialsDir/cleanAll)
 done
 
 for case in $loseCases

tutorials/XiFoam/Allrun

@@ -1,14 +1,20 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="moriyoshiHomogeneous moriyoshiHomogeneousPart2"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/RunFunctions
 
+
+
 setControlDict () {
-    controlDict="$case/system/controlDict"
+    controlDict="system/controlDict"
     sed \
     -e s/"\(deltaT[ \t]*\) 5e-06;"/"\1 1e-05;"/g \
     -e s/"\(endTime[ \t]*\) 0.005;"/"\1 0.015;"/g \
@@ -17,14 +23,17 @@ setControlDict () {
     mv temp.$$ $controlDict    
 }
 
-for case in $cases
+
-do
+
-    if [ "$case" = "moriyoshiHomogeneousPart2" ] ; then
+# Do moriyoshiHomogeneous
-        cloneCase moriyoshiHomogeneous $case
+(cd moriyoshiHomogeneous && $tutorialPath/runAll)
-        cp -r moriyoshiHomogeneous/0.005 $case
+
-        setControlDict
+# Clone case
-    else
+cloneCase moriyoshiHomogeneous moriyoshiHomogeneousPart2
-        runApplication blockMesh $case
+# Modify and execute
-    fi
+cd moriyoshiHomogeneousPart2
-    runApplication $application $case
+    cp -r ../moriyoshiHomogeneous/0.005 .
-done
+    setControlDict
+    runApplication $application
+cd ..
+

tutorials/buoyantFoam/hotRoom/Allclean

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+cleanCase
+cp 0/T.org 0/T
+wclean setHotRoom    

tutorials/buoyantFoam/hotRoom/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+compileApplication setHotRoom
+runApplication blockMesh
+runApplication setHotRoom
+runApplication $application

tutorials/buoyantFoam/hotRoom/system/controlDict

@@ -24,7 +24,7 @@ FoamFile
 
 application buoyantFoam;
 
-startFrom       latestTime;
+startFrom       startTime;
 
 startTime       0;
 

tutorials/buoyantFoam/hotRoom/system/fvSolution

@@ -31,6 +31,12 @@ solvers
         relTol           0;
     };
     pd PCG
+    {
+        preconditioner   DIC;
+        tolerance        1e-06;
+        relTol           0.1;
+    };
+    pdFinal PCG
     {
         preconditioner   DIC;
         tolerance        1e-06;

tutorials/buoyantSimpleFoam/hotRoom/Allclean

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+cp 0/T.org 0/T
+wclean ../../buoyantFoam/hotRoom/setHotRoom

tutorials/buoyantSimpleFoam/hotRoom/Allrun

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+compileApplication ../../buoyantFoam/hotRoom/setHotRoom
+runApplication blockMesh
+runApplication setHotRoom
+runApplication $application

tutorials/channelOodles/channel395/Allrun

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runApplication blockMesh
+runApplication $application
+runApplication postChannel
+

tutorials/cleanAll

@@ -0,0 +1,67 @@
+#!/bin/sh
+#------------------------------------------------------------------------------
+# =========                 |
+# \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
+#  \\    /   O peration     |
+#   \\  /    A nd           | Copyright (C) 1991-2007 OpenCFD Ltd.
+#    \\/     M anipulation  |
+#------------------------------------------------------------------------------
+# License
+#     This file is part of OpenFOAM.
+#
+#     OpenFOAM is free software; you can redistribute it and/or modify it
+#     under the terms of the GNU General Public License as published by the
+#     Free Software Foundation; either version 2 of the License, or (at your
+#     option) any later version.
+#
+#     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
+#     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+#     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+#     for more details.
+#
+#     You should have received a copy of the GNU General Public License
+#     along with OpenFOAM; if not, write to the Free Software Foundation,
+#     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+#
+# Script
+#     cleanAll
+#
+# Description
+#       Run either Allclean or default cleanCase in current directory
+#       and all its subdirectories.
+#
+#------------------------------------------------------------------------------
+
+tutorialsDir=$PWD
+while [ ! -f $tutorialsDir/CleanFunctions ]
+do
+    tutorialsDir="$tutorialsDir/.."
+done
+. $tutorialsDir/CleanFunctions
+
+thisScript=$0
+if [ "/${thisScript#/}" != "$thisScript" ]
+then
+    thisScript="$PWD/$thisScript"
+fi
+
+if [ -f "./Allclean" ] 
+then
+    # Specialised script.
+    ./Allclean
+elif [ -d "./system" ]
+then
+    # Normal case. 
+    cleanCase
+else
+    # Recurse to subdirectories
+    for case in *
+    do
+        if [ -d $case ]
+        then
+            (cd $case && $thisScript)
+        fi
+    done
+fi
+
+#------------------------------------------------------------------------------

tutorials/dnsFoam/boxTurb16/Allclean

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+rm -rf 0
+cp -r 0.org 0

tutorials/dnsFoam/boxTurb16/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication boxTurb
+runApplication $application
+runApplication enstrophy

tutorials/engineFoam/kivaTest/Allclean

@@ -0,0 +1,21 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+mv ./-180 temp180
+rm -rf 0
+cp system/controlDict.1st system/controlDict
+cleanCase
+mv temp180 ./-180

tutorials/engineFoam/kivaTest/Allrun

@@ -0,0 +1,43 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runKivaToFoam ()
+{
+    if [ -f log.kivaToFoam ] ; then
+        echo "kivaToFoam already run on $PWD: remove log file to run"
+    else
+        echo "kivaToFoam: converting kiva file"
+        kivaToFoam -file $1 > log.kivaToFoam 2>&1
+    fi
+}
+
+restartApplication ()
+{
+    if [ -f log-2.$1 ] ; then
+        echo "$1 already run on $PWD: remove log file to run"
+    else
+        echo "Running $1 on $PWD"
+        $1 > log-2.$1 2>&1
+    fi
+}
+
+
+
+runKivaToFoam . $case/otape17
+cp system/controlDict.1st system/controlDict
+runApplication $application
+cp system/controlDict.2nd system/controlDict
+restartApplication $application

tutorials/icoFoam/Allclean

@@ -2,15 +2,24 @@
 
 currDir=`pwd`
 application=`basename $currDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
 keepCases="cavity cavityGrade cavityClipped elbow"
 loseCases="cavityFine cavityHighRe"
 
-tutorialPath=`dirname $0`/..
-. $tutorialPath/CleanFunctions
 
 for case in $keepCases
 do
-    cleanCase $case
+    (cd $case && $tutorialPath/cleanAll)
+
     if [ "$case" = "elbow" ]
     then
         rm -rf $case/fluentInterface

tutorials/icoFoam/Allrun

@@ -10,19 +10,19 @@ tutorialPath=`dirname $0`/..
 runMapFields ()
 {
     echo "Running mapFields from $1 to $2"
-    mapFields . $1 . $2 > $2/log.mapFields 2>&1
+    mapFields -source $1 -case $2 -sourceTime latestTime > $2/log.mapFields 2>&1
 }
 
 runMapFieldsConsistent ()
 {
     echo "Running mapFields from $1 to $2"
-    mapFields . $1 . $2 -consistent > $2/log.mapFields 2>&1
+    mapFields -source $1 -case $2 -sourceTime latestTime -consistent > $2/log.mapFields 2>&1
 }
 
 runFluentMeshToFoam ()
 {
     echo "fluentMeshToFoam: converting mesh $2"
-    fluentMeshToFoam . $1 $2 > $1/log.fluentMeshToFoam 2>&1
+    fluentMeshToFoam $2 -case $1 > $1/log.fluentMeshToFoam 2>&1
 }
 
 copySolutionDirs ()
@@ -76,7 +76,7 @@ do
         copySolutionDirs $case cavity
     fi
 
-    runApplication blockMesh $case
+    (cd $case && runApplication blockMesh)
 #
     if [ "$case" = "cavityFine" -o "$case" = "cavityGrade" ]
     then
@@ -96,13 +96,13 @@ do
 #
     previousCase="$case"
 #
-    runApplication $application $case
+    (cd $case && runApplication $application)
 done
 
 # elbow case for testing Fluent-FOAM conversion tools
 
 runFluentMeshToFoam elbow elbow/elbow.msh
-runApplication icoFoam elbow
+(cd elbow && runApplication $application)
-runApplication foamMeshToFluent elbow
+(cd elbow && runApplication foamMeshToFluent)
-runApplication foamDataToFluent elbow
+(cd elbow && runApplication foamDataToFluent)
 

tutorials/interDyMFoam/damBreakWithObstacle/Allrun

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication setSet -batch createObstacle.setSet
+runApplication subsetMesh c0 -patch walls
+runApplication setFields -latestTime
+runApplication $application

tutorials/interFoam/Allclean

@@ -1,16 +1,26 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
 keepCases="damBreak"
 loseCases="damBreakFine"
 
-tutorialPath=`dirname $0`/..
-. $tutorialPath/CleanFunctions
 
 for case in $keepCases
 do
-    cleanCase $case
+    (cd $case && $tutorialPath/cleanAll)
+
     if [ "$case" = "damBreak" ] 
     then 
         cp $case/0/gamma.org $case/0/gamma

tutorials/interFoam/Allrun

@@ -1,16 +1,21 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="damBreak damBreakFine"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/RunFunctions
 
+
 setDamBreakFine ()
 {
-    blockMeshDict="$case/constant/polyMesh/blockMeshDict"
+    blockMeshDict="constant/polyMesh/blockMeshDict"
-    controlDict="$case/system/controlDict"        
+    controlDict="system/controlDict"        
     sed \
     -e s/"23 8"/"46 10"/g \
     -e s/"19 8"/"40 10"/g \
@@ -26,24 +31,23 @@ setDamBreakFine ()
     mv temp.$$ $controlDict    
 }
 
-for case in $cases
-do
-    if [ "$case" = "damBreakFine" ] 
-    then
-        cloneCase damBreak $case
-        setDamBreakFine
-        cp damBreak/0/gamma.org $case/0/gamma
-    fi
 
-    runApplication blockMesh $case
+
-    runApplication setFields $case
+# Do damBreak
-    if [ "$case" = "damBreakFine" ]
+(cd damBreak && $tutorialPath/runAll)
-    then
+
-        runApplication decomposePar $case
+# Clone case
-        hostname > $case/system/machines
+cloneCase damBreak damBreakFine
-        runParallel $application $case 4 $case/system/machines
+
-        runApplication reconstructPar $case
+cd damBreakFine
-    else
+    # Modify case
-        runApplication $application $case
+    setDamBreakFine
-    fi
+    cp ../damBreak/0/gamma.org 0/gamma
-done
+    # And execute
+    runApplication blockMesh
+    runApplication setFields
+    runApplication decomposePar
+    hostname > system/machines
+    runParallel $application 4 system/machines
+    runApplication reconstructPar
+cd ..

tutorials/laplacianFoam/flange/Allclean

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+rm -rf Fieldview > /dev/null 2>&1
+rm -rf EnSight > /dev/null 2>&1
+

tutorials/laplacianFoam/flange/Allrun

@@ -0,0 +1,30 @@
+#!/bin/sh
+
+# Get application directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runIdeasToFoam ()
+{
+    if [ -f log.ideasToFoam ] ; then
+        echo "ansysToFoam already run on $PWD: remove log file to run"
+    else
+        echo "ansysToFoam: converting mesh $1"
+        ansysToFoam $1 -scale $2 > log.ansysToFoam 2>&1
+    fi
+}
+
+runIdeasToFoam flange.ans 0.001
+runApplication $application
+runApplication foamToFieldview
+runApplication foamToEnsight

tutorials/lesInterFoam/nozzleFlow2D/Allclean

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+cleanCase
+cp constant/polyMesh/boundary.org constant/polyMesh/boundary

tutorials/lesInterFoam/nozzleFlow2D/Allrun

@@ -0,0 +1,42 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runRefineMesh ()
+{
+    echo "Running refineMesh on $PWD"
+    refineMesh -dict > log.refineMesh 2>&1
+}
+
+runApplication blockMesh
+
+i=1
+if [ -f log.cellSet ] ; then
+   i=3
+fi
+while [ "$i" -lt 3 ] ; do
+    if [ -f log.cellSet ] ; then
+        mv log.cellSet log.cellSet.1
+    fi
+    cp system/cellSetDict.${i} system/cellSetDict
+    runApplication cellSet
+    runRefineMesh
+    cp -r 1e-08/polyMesh/* constant/polyMesh
+    rm -rf 1e-08
+    i=`expr $i + 1`
+done
+cp constant/polyMesh/boundary.org constant/polyMesh/boundary
+
+runApplication $application

tutorials/mdEquilibrationFoam/periodicCube/Allrun

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication molConfig
+runApplication $application

tutorials/mhdFoam/hartmann/Allclean

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+cleanSamples
+

tutorials/mhdFoam/hartmann/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runApplication blockMesh
+runApplication $application
+runApplication sample

tutorials/oodles/pitzDailyDirectMapped/Allrun

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication changeDictionary
+runApplication $application

tutorials/potentialFoam/Allclean

@@ -1,23 +1,29 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="cylinder pitzDaily"
-utility=analyticalCylinder
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/CleanFunctions
 
-for case in $cases
-do
-    cleanCase $case
-    rm -rf $case/0 > /dev/null 2>&1
-    cp -r $case/0.org $case/0
-
-    if [ "$case" = "cylinder" ] 
-    then
-        wclean $case/$utility
-    fi
-done 
 
 
+
+cd cylinder
+    cleanCase
+    rm -rf 0 > /dev/null 2>&1
+    cp -r 0.org 0
+    wclean analyticalCylinder
+cd ..
+
+cd pitzDaily
+    cleanCase
+    rm -rf 0 > /dev/null 2>&1
+    cp -r 0.org 0
+cd ..
+

tutorials/potentialFoam/cylinder/Allrun

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication $application
+compileApplication analyticalCylinder
+runApplication analyticalCylinder
+runApplication streamFunction

tutorials/potentialFoam/pitzDaily/Allrun

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath='.'
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="../$tutorialPath"
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication $application
+runApplication streamFunction

tutorials/rasInterFoam/Allclean

@@ -1,16 +1,25 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
 keepCases="damBreak"
 loseCases="damBreakFine"
 
-tutorialPath=`dirname $0`/..
-. $tutorialPath/CleanFunctions
-
 for case in $keepCases
 do
-    cleanCase $case
+    (cd $case && $tutorialPath/cleanAll)
+
     if [ "$case" = "damBreak" ] 
     then 
         cp $case/0/gamma.org $case/0/gamma

tutorials/rasInterFoam/Allrun

@@ -1,16 +1,22 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="damBreak damBreakFine"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/RunFunctions
 
+
+
 setDamBreakFine ()
 {
-    blockMeshDict="$case/constant/polyMesh/blockMeshDict"
+    blockMeshDict="constant/polyMesh/blockMeshDict"
-    controlDict="$case/system/controlDict"        
+    controlDict="system/controlDict"        
     sed \
     -e s/"23 8"/"46 10"/g \
     -e s/"19 8"/"40 10"/g \
@@ -26,24 +32,22 @@ setDamBreakFine ()
     mv temp.$$ $controlDict    
 }
 
-for case in $cases
-do
-    if [ "$case" = "damBreakFine" ] 
-    then
-        cloneCase damBreak $case
-        setDamBreakFine
-        cp damBreak/0/gamma.org $case/0/gamma
-    fi
 
-    runApplication blockMesh $case
+# Do damBreak
-    runApplication setFields $case
+(cd damBreak && $tutorialPath/runAll)
-    if [ "$case" = "damBreakFine" ]
+
-    then
+# Clone case
-        runApplication decomposePar $case
+cloneCase damBreak damBreakFine
-        hostname > $case/system/machines
+
-        runParallel $application $case 4 $case/system/machines
+cd damBreakFine
-        runApplication reconstructPar $case
+    # Modify case
-    else
+    setDamBreakFine
-        runApplication $application $case
+    cp ../damBreak/0/gamma.org 0/gamma
-    fi
+    # And execute
-done
+    runApplication blockMesh
+    runApplication setFields
+    runApplication decomposePar
+    hostname > system/machines
+    runParallel $application 4 system/machines
+    runApplication reconstructPar
+cd ..

tutorials/rasInterFoam/damBreak/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication setFields
+runApplication $application

tutorials/rhoSonicFoam/shockTube/Allclean

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+cleanCase
+rm -rf 0
+cp -r 0.org 0
+cleanSamples

tutorials/rhoSonicFoam/shockTube/Allrun

@@ -0,0 +1,23 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runApplication blockMesh
+compileApplication setShock
+runApplication setShock
+runApplication $application
+runApplication magU
+runApplication sample
+

tutorials/rhoTurbTwinParcelFoam/Allclean

@@ -1,16 +1,26 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="simplifiedSiwek"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/CleanFunctions
 
-wclean $application
 
-for case in $cases
+
+
+wclean rhoTurbTwinParcelFoam
+
+for case in *
 do
-    cleanCase $case
+    if [ -d $case ]
+    then
+        (cd $case && $tutorialPath/cleanAll)
+    fi
 done
 

tutorials/rhoTurbTwinParcelFoam/simplifiedSiwek/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+compileApplication $application
+runApplication blockMesh
+runApplication $application

tutorials/rhopSonicFoam/shockTube/Allclean

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+rm -rf 0
+cp -r 0.org 0
+cleanCase

tutorials/rhopSonicFoam/shockTube/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+
+runApplication blockMesh
+runApplication setFields
+runApplication $application

tutorials/runAll

@@ -0,0 +1,73 @@
+#!/bin/sh
+#------------------------------------------------------------------------------
+# =========                 |
+# \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
+#  \\    /   O peration     |
+#   \\  /    A nd           | Copyright (C) 1991-2007 OpenCFD Ltd.
+#    \\/     M anipulation  |
+#------------------------------------------------------------------------------
+# License
+#     This file is part of OpenFOAM.
+#
+#     OpenFOAM is free software; you can redistribute it and/or modify it
+#     under the terms of the GNU General Public License as published by the
+#     Free Software Foundation; either version 2 of the License, or (at your
+#     option) any later version.
+#
+#     OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
+#     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+#     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+#     for more details.
+#
+#     You should have received a copy of the GNU General Public License
+#     along with OpenFOAM; if not, write to the Free Software Foundation,
+#     Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+#
+# Script
+#     runAll
+#
+# Description
+#       Run either Allrun or blockMesh/application in current directory
+#       and all its subdirectories.
+#
+#------------------------------------------------------------------------------
+
+unset WM_COLOURS
+
+tutorialsDir=$PWD
+while [ ! -f $tutorialsDir/RunFunctions ]
+do
+    tutorialsDir="$tutorialsDir/.."
+done
+. $tutorialsDir/RunFunctions
+
+thisScript=$0
+if [ "/${thisScript#/}" != "$thisScript" ]
+then
+    thisScript="$PWD/$thisScript"
+fi
+
+if [ -f "./Allrun" ] 
+then
+    # Specialised script.
+    ./Allrun
+elif [ -d "./system" ]
+then
+    # Normal case. 
+    parentDir=`dirname $PWD`
+    application=`basename $parentDir`
+    runApplication blockMesh
+    runApplication $application
+else
+    # Recurse to subdirectories
+    for case in *
+    do
+        if [ -d $case ]
+        then
+            #(cd $case && $thisScript)
+            $WM_SCHEDULER "cd $PWD/$case && $thisScript"
+        fi
+    done
+fi
+
+#------------------------------------------------------------------------------

tutorials/settlingFoam/tank3D/Allclean

@@ -0,0 +1,16 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanTimeDirectories

tutorials/settlingFoam/tank3D/Allrun

@@ -0,0 +1,17 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication $application
+

tutorials/simpleSRFFoam/mixer/Allclean

@@ -0,0 +1,17 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+wclean ../simpleSRFFoam

tutorials/simpleSRFFoam/mixer/Allrun

@@ -0,0 +1,19 @@
+#!/bin/sh
+
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+compileApplication ../simpleSRFFoam
+runApplication blockMesh
+runApplication $application

tutorials/solidDisplacementFoam/plateHole/Allclean

@@ -0,0 +1,17 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+cleanCase
+cleanSamples

tutorials/solidDisplacementFoam/plateHole/Allrun

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication $application
+runApplication sample

tutorials/sonicFoam/shockTube/Allclean

@@ -0,0 +1,20 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/CleanFunctions
+
+
+
+cleanCase
+rm -rf 0
+cp -r 0.org 0
+cleanSamples

tutorials/sonicFoam/shockTube/Allrun

@@ -0,0 +1,21 @@
+#!/bin/sh
+
+# Get application name from directory
+parentDir=`dirname $PWD`
+application=`basename $parentDir`
+
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
+. $tutorialPath/RunFunctions
+
+
+runApplication blockMesh
+runApplication setFields
+runApplication $application
+runApplication magU
+runApplication sample
+

tutorials/sonicLiquidFoam/Allclean

@@ -1,19 +1,24 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-keepCases="decompressionTank"
-loseCases="decompressionTankFine"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/CleanFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/CleanFunctions
 
-for case in $keepCases
-do
-    cleanCase $case
-done
 
-for case in $loseCases
+
+removeCase decompressionTankFine
+
+for case in *
 do
-    removeCase $case
+    if [ -d $case ]
+    then
+        (cd $case && $tutorialsDir/cleanAll)
+    fi
 done

tutorials/sonicLiquidFoam/Allrun

@@ -1,12 +1,18 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="decompressionTank decompressionTankFine"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/RunFunctions
 
+
+
 setDecompressionTankFine ()
 {
     blockMeshDict="$case/constant/polyMesh/blockMeshDict"
@@ -25,14 +31,16 @@ setDecompressionTankFine ()
     mv temp.$$ $controlDict    
 }
 
-for case in $cases
+# Do decompressionTank
-do
+(cd decompressionTank && $tutorialPath/runAll)
-    if [ "$case" = "decompressionTankFine" ] 
+
-    then
+# Clone case
-        cloneCase decompressionTank $case
+cloneCase decompressionTank decompressionTankFine
-        setDecompressionTankFine
+
-    fi
+cd decompressionTankFine
-#
+    # Modify case
-    runApplication blockMesh $case
+    setDecompressionTankFine
-    runApplication $application $case
+    # And execute
-done 
+    runApplication blockMesh
+    runApplication $application
+cd ..

tutorials/sonicTurbFoam/Allrun

@@ -1,33 +1,38 @@
 #!/bin/sh
 
-currDir=`pwd`
+# Get application name from directory
-application=`basename $currDir`
+application=`basename $PWD`
-cases="prism nacaAirfoil"
 
-tutorialPath=`dirname $0`/..
+# Find and source additional functions
+tutorialPath=$PWD
+while [ ! -f $tutorialPath/RunFunctions ]
+do
+    tutorialPath="$tutorialPath/.."
+done
 . $tutorialPath/RunFunctions
 
+
 runStarToFoam ()
 {
-    if [ -f $1/log.starToFoam ] ; then
+    if [ -f log.starToFoam ] ; then
-        echo "starToFoam already run on $1: remove log file to run"
+        echo "starToFoam already run on $PWD: remove log file to run"
     else
-        echo "starToFoam: converting mesh $2"
+        echo "starToFoam: converting mesh $1"
-        starToFoam . $1 $2 > $1/log.starToFoam 2>&1
+        starToFoam $1 > log.starToFoam 2>&1
     fi
 }
 
-for case in $cases
+
-do
+
-    if [ "$case" = "nacaAirfoil" ] ; then
+# Do prism
-        runStarToFoam $case ${case}/prostar/${case}
+(cd prism && $tutorialPath/runAll)
-        mv ${case}/constant/polyMesh/boundary temp
+
-        sed -e s/"\([\t ]*type[\t ]*\)symmetryPlane"/"\1empty"/g \
+# Special handling for nacaAirFoil
-            temp > ${case}/constant/polyMesh/boundary
+cd nacaAirFoil
-        rm temp
+    runStarToFoam prostar/nacaAirFoil
-    else
+    mv constant/polyMesh/boundary temp
-        runApplication blockMesh $case
+    sed -e s/"\([\t ]*type[\t ]*\)symmetryPlane"/"\1empty"/g \
-    fi
+        temp > constant/polyMesh/boundary
-    runApplication $application $case
+    rm temp
-#    runApplication Mach $case
+    runApplication $application
-done 
+cd ..