具有失效模式的多重耦合面问题!
请问有哪位朋友做过Dytran自带算例里面第四章流固耦合的“Blastwave Hitting a Bunker”。我在计算的时候,总是报错“The MESH entry 2 does not belong to any coupling surface. ”。我也定义了两个耦合面和两个欧拉域,基本和算例一样了。附上耦合部分内容,希望有大虾能指点下,无限感谢!bunker.dat
$ ------- General Coupling: couple_in -----
$
COUPLE 24 2 OUTSIDE ON ON +A000002
+A000002 +A000002
+A000002 1 1
$
SURFACE 2 ELEM 4
SET1 4 8171 THRU 8180 8305 THRU 8444 8121+
+ THRU 8170
$
COUP1FL,1,1.29,3e+08
$
$ ------- General Coupling: couple_out -----
$
COUPLE 25 3INSIDE ON ON 16 +
+ + +
+ 2 2
$
SURFACE 3 ELEM 5
SET1 5 8191 THRU 8444 8001 THRU 8044 8057+
+ THRU 8104 8117 THRU 8120 8181 THRU 8190
$
COUP1FL,2,1.29,3e+08
$
COUP1INT,1,25,24
$
COUPOR,1,16,32,PORFLCPL,81,,1.0
PORFLCPL,81,,,BOTH,25
SUBSURF 32 3 ELEM 45
SET1 45 8305 THRU 8444
$
mesh.dat
$ Outer Euler
$
MESH,2,BOX,,,,,,,+
+,0.,0.,0.,40.,40.,40.,,,+
+,30,30,30,,,,EULER,201
$
$ Inner Euler
$
MESH,1,BOX,,,,,,,+
+,2.5,2.5,0.,20.,20.,20.,,,+
+,20,20,20,,,,EULER,301
$
PEULER1,201,,2ndOrder,101
PEULER1,301,,2ndOrder,111
$
$
TICEUL 101 +A000003
+A000003SPHERE 8 1 5 2 +A000004
+A000004SPHERE 5 1 4 1
SPHERE 8 0.5 0.5 0.5 0.1
SPHERE 5 0.5 0.5 0.5 100
$
$
TICEUL 111 +A000003
+A000003SPHERE 9 1 4 1
SPHERE 9 5 5 2 100
$
$
$ ------- TICVAL BC AIR-INI -----
TICVAL 4 DENSITY 1.29 SIE 3e+08
$
$ ------- TICVAL BC EXP-INI -----
$TICVAL 5 DENSITY3.84e-06 SIE 8.7e+09
TICVAL 5 DENSITY 3.84 SIE 3e+09
$
$
页:
[1]