应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 专业学科区 » 土木建筑 » 土木综合 » 用ANSYS--DYNA做锚杆
31/1返回列表
查看: 890  |  回复: 2
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

kang8698

新虫 (初入文坛)

[求助] 用ANSYS--DYNA做锚杆 已有1人参与

急急急~~~
求帮助~~~~谁用ANSYS--DYNA做锚杆方面问题的。初学者，看不懂程序，总是出错，求大神帮助！急急急~~~~
fini/clear
/PREP7  
ET,1,SOLID185   
MP,DENS,1,7800  
MP,EX,1,2.1e11  
MP,NUXY,1, 0.3  
MP,EX,2,5e+10   
MP,DENS,2,2000  
MP,NUXY,2,0.2   
MP,EX,3,3.3E+10
MP,DENS,3,2001  
MP,NUXY,3,0.2   
cylind,0.01,0.015,0,2,0,360
wprota,,90  
vsbw,all
wprota,,,90
vsbw,all
wprota,,,-90
wprota,,-90
CYLIND,0,0.01,0,4,0,360
VGLUE,ALL   
NUMMERG,ALL
NUMCMP,ALL  
ALLSEL,ALL  



cylind,0.015,0.1,0,2,0,360  
wprota,,90  
vsbw,6                               单步运行有错


wprota,,,90
vsbw,8  
vsbw,7  
wprota,,,-90
wprota,,-90
vglue,8,6,9,10


/VIEW,1,1,1,1   
/REP
VATT,1,,1   
esize,0.02  
LSEL,S,LOC,Z,4  
LESIZE,all,,,12
VSWEEP,5
allsel,all  
vatt,2,,1   
mshape,0,3d
mshkey,1
lesize,54,,,10  
lesize,53,,,10  
lesize,52,,,10  
lesize,51,,,10  
lesize,25,,,2   
lesize,19,,,2   
lesize,23,,,2   
lesize,18,,,2   
lesize,60,,,4   
lesize,70,,,4   
lesize,62,,,4   
lesize,66,,,4   
allsel,all  
vmesh,1
vmesh,2
vmesh,3
vmesh,4
allsel,all  
vatt,3,,1   
mshape,0,3d
mshkey,1
vmesh,6
vmesh,8
vmesh,9
vmesh,10
allsel,all



NSEL,S,LOC,Z,-0.01,0.01
D,ALL,,,,,,ALL  
ALLSEL,ALL  
nsel,s,loc,z,3.999,4.001
f,all,fz,15000  
allsel,all  
antype,0
FINISH  
/SOL
/STATUS,SOLU
SOLVE   
FINISH  



/FILNAME,jobname2,0
/PREP7  
ETCHG,ITE   
FINISH  
/SOL
REXPORT,DYNA,DISP,NODE,LAST,LAST,'jobname1','rst',' '   
!*  
EDDRELAX,ANSYS,250,0.001,0.995, ,0,0,0.04,  
*DIM,TIME,ARRAY,12,1,1, , ,
!*  
*SET,TIME(1,1,1) , 0
*SET,TIME(2,1,1) , 0.000001
*SET,TIME(3,1,1) , 0.000002
*SET,TIME(4,1,1) , 0.000003
*SET,TIME(5,1,1) , 0.000004
*SET,TIME(6,1,1) , 0.000005
*SET,TIME(7,1,1) , 0.000006
*SET,TIME(8,1,1) , 0.000007
*SET,TIME(9,1,1) , 0.000008
*SET,TIME(10,1,1) , 0.000009
*SET,TIME(11,1,1) , 0.000010
*SET,TIME(12,1,1) , 0.005   
*DIM,DISPLACEMENT,ARRAY,12,1,1, , ,
!*  
*SET,DISPLACEMENT(1,1,1) , 0
*SET,DISPLACEMENT(2,1,1) , 3.09
*SET,DISPLACEMENT(3,1,1) , 5.878
*SET,DISPLACEMENT(4,1,1) , 8.09
*SET,DISPLACEMENT(5,1,1) , 9.511
*SET,DISPLACEMENT(6,1,1) , 10   
*SET,DISPLACEMENT(7,1,1) , 9.511
*SET,DISPLACEMENT(8,1,1) , 8.09
*SET,DISPLACEMENT(9,1,1) , 5.878
*SET,DISPLACEMENT(10,1,1) , 3.09
*SET,DISPLACEMENT(11,1,1) , 0   
*SET,DISPLACEMENT(12,1,1) , 0   
edpart,creat
FINISH  




! /EXIT,NOSAV   
/BATCH  
/COM,ANSYS RELEASE 10.0    UP20050718       11:59:50    08/26/2013
/input,menust,tmp,'',,,,,,,,,,,,,,,,1   
/GRA,POWER
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1   
/REPLOT,RESIZE  
WPSTYLE,,,,,,,,0
/REPLOT,RESIZE  
/VIEW,1,1,1,1   
/ANG,1  
/REP,FAST   
/FILNAME,jobname1,0
/TITLE,123  
!*  
/NOPR   
/PMETH,OFF,0
KEYW,PR_SET,1   
KEYW,PR_STRUC,1
KEYW,PR_FLUID,0
KEYW,PR_MULTI,0
KEYW,LSDYNA,0   
/GO
!*  
/COM,   
/COM,Preferences for GUI filtering have been set to display:
/COM,  Structural   
!*  





/PREP7  
ET,1,SOLID185   
MP,DENS,1,7800  
MP,EX,1,2.1e11  
MP,NUXY,1, 0.3  
MP,EX,2,5e+10   
MP,DENS,2,2000  
MP,NUXY,2,0.2   
MP,EX,3,3.3E+10
MP,DENS,3,2001  
MP,NUXY,3,0.2   
cylind,0.01,0.015,0,2,0,360
wprota,,90  
vsbw,all
wprota,,,90                              错误
vsbw,all
wprota,,,-90
wprota,,-90
CYLIND,0,0.01,0,4,0,360
VGLUE,ALL   
NUMMERG,ALL
NUMCMP,ALL  
ALLSEL,ALL  
cylind,0.015,0.1,0,2,0,360  
wprota,,90  
vsbw,6  
wprota,,,90
vsbw,8  
vsbw,7  
wprota,,,-90
wprota,,-90
vglue,8,6,9,10  
/VIEW,1,1,1,1   
/REP




VATT,1,,1   
esize,0.02  
LSEL,S,LOC,Z,4  
LESIZE,all,,,12
VSWEEP,5
allsel,all  
vatt,2,,1   
mshape,0,3d
mshkey,1
lesize,54,,,10  
lesize,53,,,10  
lesize,52,,,10  
lesize,51,,,10  
lesize,25,,,2   
lesize,19,,,2   
lesize,23,,,2   
lesize,18,,,2   
lesize,60,,,4   
lesize,70,,,4   
lesize,62,,,4   
lesize,66,,,4   
allsel,all  
vmesh,1
vmesh,2
vmesh,3
vmesh,4
allsel,all  
vatt,3,,1   
mshape,0,3d
mshkey,1
vmesh,6
vmesh,8
vmesh,9
vmesh,10
allsel,all  
NSEL,S,LOC,Z,-0.01,0.01
D,ALL,,,,,,ALL  
ALLSEL,ALL  
nsel,s,loc,z,3.999,4.001
f,all,fz,15000  
allsel,all  
antype,0
FINISH  
/SOL
/STATUS,SOLU
SOLVE   
FINISH  
/FILNAME,jobname2,0
/PREP7  
ETCHG,ITE   
FINISH  
/SOL
REXPORT,DYNA,DISP,NODE,LAST,LAST,'jobname1','rst',' '   
!*  
EDDRELAX,ANSYS,250,0.001,0.995, ,0,0,0.04,  
*DIM,TIME,ARRAY,12,1,1, , ,
!*  
*SET,TIME(1,1,1) , 0
*SET,TIME(2,1,1) , 0.000001
*SET,TIME(3,1,1) , 0.000002
*SET,TIME(4,1,1) , 0.000003
*SET,TIME(5,1,1) , 0.000004
*SET,TIME(6,1,1) , 0.000005
*SET,TIME(7,1,1) , 0.000006
*SET,TIME(8,1,1) , 0.000007
*SET,TIME(9,1,1) , 0.000008
*SET,TIME(10,1,1) , 0.000009
*SET,TIME(11,1,1) , 0.000010
*SET,TIME(12,1,1) , 0.005   
*DIM,DISPLACEMENT,ARRAY,12,1,1, , ,
!*  
*SET,DISPLACEMENT(1,1,1) , 0
*SET,DISPLACEMENT(2,1,1) , 3.09
*SET,DISPLACEMENT(3,1,1) , 5.878
*SET,DISPLACEMENT(4,1,1) , 8.09
*SET,DISPLACEMENT(5,1,1) , 9.511
*SET,DISPLACEMENT(6,1,1) , 10   
*SET,DISPLACEMENT(7,1,1) , 9.511
*SET,DISPLACEMENT(8,1,1) , 8.09
*SET,DISPLACEMENT(9,1,1) , 5.878
*SET,DISPLACEMENT(10,1,1) , 3.09
*SET,DISPLACEMENT(11,1,1) , 0   
*SET,DISPLACEMENT(12,1,1) , 0   
edpart,creat
EDDAMP,1,,1E-5  
EDDAMP,2,,1E-5  
EDDAMP,3,,1E-5  
MP,DAMP,1,1E-5  
MP,DAMP,2,1E-5  
MP,DAMP,3,1E-5  
EDPVEL,VGEN,1   
EDPVEL,VGEN,2   
EDPVEL,VGEN,3   
NSEL,S,LOC,Z,-0.01,0.01
D,ALL,,,,,,ALL  
ALLSEL,ALL  
NSEL,S,LOC,Z,4  
CM,LOAD,NODE
EDLOAD,ADD,fZ,,LOAD,TIME,DISPLACEMENT,0
ALLSEL,ALL  
TIME,0.005  
EDRST,300,  
EDHTIME,300,
EDDUMP,1,   
EDOPT,ADD,blank,BOTH
/STATUS,SOLU
SOLVE   
FINISH  
FINISH  
! /EXIT,NOSAV
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2014-02-20 12:34:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kang8698

新虫 (初入文坛)
急急急~~~~~~~~~~谢谢各位大神
赞一下 回复此楼
2楼2014-02-20 12:35:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wonder11077

金虫 (正式写手)

【答案】应助回帖

感谢参与，应助指数 +1
吧错误文件粘上来看看。。。。。。。。。
赞一下 回复此楼
3楼2014-02-20 12:49:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 kang8698 的主题更新
31/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 范进中举一文的中心思想 +4 炎黄贵胄 2026-08-22 5/250 2026-08-24 02:09 by 流流伤
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +4 process2012 2026-08-23 5/250 2026-08-23 19:58 by jurkat.1640
[教师之家] 跳槽后在研项目怎么办？ +5 简单化xn 2026-08-22 10/500 2026-08-23 12:38 by 简单化xn
[基金申请] 什么时候开奖？ +9 CrisMessi 2026-08-18 10/500 2026-08-23 12:03 by 丶昵称占用
[基金申请] 今天放榜吗？ +15 布布和一二 2026-08-19 16/800 2026-08-23 09:55 by 张春生
[基金申请] 93BebMhtakh前后11位开头都是大写 +7 且听虎啸 2026-08-17 8/400 2026-08-22 21:55 by 医学老男孩
[基金申请] filecode，4个jtjc了 +13 ziyangfang 2026-08-19 16/800 2026-08-22 17:08 by WH3796
[基金申请] 今天基金会出结果吗？20260819 +16 kkkl_v 2026-08-19 17/850 2026-08-22 16:12 by 阿布Abu
[基金申请] 时间戳今天，20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[基金申请] 放榜前的不淡定 40+4 snowwithsea 2026-08-19 14/700 2026-08-21 23:51 by cratir
[基金申请] 今日不放榜？网传国自然预计 8 月 27 日可查结果 +16 医学老男孩 2026-08-20 20/1000 2026-08-21 21:13 by Ldrop2023
[基金申请] 时间戳又变了 +13 wuchongjun 2026-08-20 19/950 2026-08-21 17:21 by 紫杉醇
[基金申请] 应该是下周三26日公布了吧？ +4 哈哈蛤？ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[论文投稿] 投稿咨询 +5 wwm09 2026-08-17 7/350 2026-08-21 10:11 by 期刊论文帮手
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 估计是周四 +3 archvillain 2026-08-18 3/150 2026-08-21 01:48 by jnhyjjm
[基金申请] 时间戳变了，能看出什么问题？ +18 基诺咪客 2026-08-17 23/1150 2026-08-20 17:19 by Godzela
[基金申请] 朋友圈看到的 +6 wangzilk 2026-08-18 8/400 2026-08-19 10:55 by Haru815
[基金申请] 明天放榜？ +5 Shxjjxjkx 2026-08-18 5/250 2026-08-18 18:14 by -大大大大大-
[基金申请] 今天维护系统维护 祝所有人 高中 +8 gjjjzhong 2026-08-18 9/450 2026-08-18 13:01 by 家与远方
信息提示
关闭
请填处理意见
关闭