声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1789|回复: 0

[其他软件] 具有失效模式的多重耦合面问题!

[复制链接]
发表于 2007-11-14 15:59 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
请问有哪位朋友做过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       3  INSIDE      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
+A000003  SPHERE       8       1       5       2                        +A000004
+A000004  SPHERE       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
+A000003  SPHERE       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
$
$

本帖被以下淘专辑推荐:

回复
分享到:

使用道具 举报

您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-11-10 23:14 , Processed in 0.069505 second(s), 19 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表