bigpuma 发表于 2007-11-14 15:59

具有失效模式的多重耦合面问题!

请问有哪位朋友做过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]
查看完整版本: 具有失效模式的多重耦合面问题!