#!/bin/sh
cd “${0%/*}” || exit # Run from this directory
. ${WM_PROJECT_DIR:?}/bin/tools/RunFunctions # Tutorial run functions
#——————————————————————————if ! canCompile
then
echo “skipping tutorial $PWD”
exit 0
fiwmake calcRadiusField
wclean calcRadiusFieldrunApplication blockMesh
##### Procedure for special refinement over Z
# We need the 0 folder to exist for these steps
mkdir 0# Refine over Z, in 6 passes
for index in 1 2 3 4 5 6
dorunApplication -s tier$index calcRadiusField
runApplication -s tier$index \r
topoSet -dict system/topoSetDict.tier$index## foamToVTK -cellSet tier$index
runApplication -s tier$index \r
refineMesh -dict system/refineMeshDict.tier$index -overwriterm -r 0/*
done
# Refine over cylindrical coordinates, in 3 passes
for index in 1 2 3
dorunApplication -s range$index calcRadiusField -calcDirections
runApplication -s range$index \r
topoSet -dict system/topoSetDict.range$index## foamToVTK -cellSet tier$index
runApplication -s range$index \r
refineMesh -dict system/refineMeshDict.range$index -overwriterm -r 0/*
done
#——————————————————————————
実行年月:08/01/2020