声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1024|回复: 0

[前后处理] 求助:APDL砂轮截面进行优化,在划分网格的时候老是出错!

[复制链接]
发表于 2012-9-18 11:19 | 显示全部楼层 |阅读模式

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

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

x
如题,请各位大侠帮看一下,我尝试了各种网格划分,自由的,映射的,手动LESIZE还有refine at,都不行,请高手指点一下!不甚感激额!!parameters
*set,x1,10   
*set,x2,40  
*set,x3,10  
*set,x4,90  
*set,x5,90  
*afun,deg   
*set,sitahub,180-x4
*set,sitarim,180-x5
*set,h_rim,x1   
*set,h_hub,x3   
*set,l_hub,x2   
*set,xmid,78
*set,ymid,10
*set,h_rim,h_rim/1000   
*set,xmid,xmid/1000
*set,ymid,ymid/1000
*set,h_hub,h_hub/1000   
*set,l_hub,l_hub/1000   
*set,b,120/1000
keyw,pr_struc,1
/prep7  
et,1,plane82,,,1
uimp,1,ex,dens,nuxy,2.06e11,7850,0,29   
k,1,0,0,0   
k,2,0,h_hub
k,3,l_hub,h_hub
k,4,xmid,ymid   
k,5,0.12,h_rim  
k,6,0.12,0  
l,1,2   
l,2,3   
bsplin,3,4,5,,,,-sin(sitahub),cos(sitahub),0,sin(sitarim),-cos(sitarim),0   
l,5,6   
l,6,1  
FLST,2,5,4  
FITEM,2,1   
FITEM,2,2   
FITEM,2,3   
FITEM,2,4   
FITEM,2,5   
AL,P51X
! SAVE, file,db,
! SAVE, file,db,
! LGWRITE,'ll','lgw','I:\ylll\',COMMENT  

esize,0.001,0,
mshape,1,2d
mshkey,0
amesh,1
FINISH  
/SOL
d,all,,,,,,uy,,,,,
omega,0,2800,0,0
solve   
/POST1  
nsort,s,z,0,0,,0
*get,szmax,sort,,max
*get,szmin,sort,,min
*set,sz_data,szmax-szmin
/EFACET,1   
SAVE
lgwrite,ll,lgw,,comment
FINISH  
/OPT
OPANL,'ll','lgw',' '   
OPVAR,X1,DV,2,5,0.0001 ,  
OPVAR,X2,DV,35,45,0.0001 ,
OPVAR,X3,DV,8,14,0.0001 ,   
OPVAR,X4,DV,155,180, 0.0001,
OPVAR,X5,DV,85,98, 0.0001,
OPVAR,xmid,DV,77.5,82.5, 0.0001,
OPVAR,xmid,DV,5,9.5, 0.0001,
OPVAR,SZMAX,SV, ,355000000, 0.0001,   
opsave,'ll','opt',''
OPVAR,SZ_DATA,OBJ, , , 0.0001,
OPDATA, , ,
OPLOOP,TOP,IGNO,SCAL
OPPRNT,OFF  
OPKEEP,OFF  
OPTYPE,firs
OPfrst,100, , ,  
OPEXE   
回复
分享到:

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-11-11 07:10 , Processed in 0.060464 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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