#!/bin/sh
cd ${0%/*} || exit 1 # Run from this directory# Source tutorial run functions
. $WM_PROJECT_DIR/bin/tools/RunFunctionswmake 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 topoSetDict.tier$index## foamToVTK -cellSet tier$index
runApplication -s tier$index \r
refineMesh -dict 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 topoSetDict.range$index## foamToVTK -cellSet tier$index
runApplication -s range$index \r
refineMesh -dict refineMeshDict.range$index -overwriterm -r 0/*
done
#——————————————————————————
実行年月:07/01/2021