ansys 蠕变例子

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

ansys蠕变例子绷紧的螺钉的应力松弛现象/COM,ANSYSMEDIAREL.8.1(03-15-2004)REF.VERIF.MANUAL:REL.8.1/VERIFY,VM132/PREP7/TITLE,VM132,STRESSRELAXATIONOFABOLTDUETOCREEPC***STR.OFMATL.,TIMOSHENKO,PART2,3RDED.,PAGE531ANTYPE,STATICET,1,LINK1!SPARELEMENTR,1,1,(1/30000)!INITIALSTRAINMP,EX,1,30E6TB,CREEP,1TBDATA,1,4.8E-30,7!CREEPPROPERTIESN,1N,2,10E,1,2BFUNIF,TEMP,900!UNIFORMTEMPERATURETIME,1000KBC,1D,ALL,ALL!FIXALLDOFSFINISH/SOLUSOLCONTROL,0NSUBST,100OUTPR,BASIC,10!PRINTBASICSOLUTIONFOREVERY10THSUBSTEPOUTRES,ESOL,1!STOREELEMENTSOLUTIONFOREVERYSUBSTEPSOLVEFINISH/POST26ESOL,2,1,,LS,1,SIG!STOREAXIALSTRESSPRVAR,2!PRINTAXIALSTRESSVSTIME*GET,T190,VARI,2,RTIME,190*GET,T420,VARI,2,RTIME,420*GET,T690,VARI,2,RTIME,690*GET,T880,VARI,2,RTIME,880*GET,T950,VARI,2,RTIME,950*status,parm*DIM,LABEL,CHAR,5,2*DIM,VALUE,,5,3LABEL(1,1)='SIG@','SIG@','SIG@','SIG@','SIG@'LABEL(1,2)='190hr','420hr','690hr','880hr','950hr'*VFILL,VALUE(1,1),DATA,975,950,925,910,905*VFILL,VALUE(1,2),DATA,T190,T420,T690,T880,T950V1=ABS(T190/975)V2=ABS(T420/950)V3=ABS(T690/925)V4=ABS(T880/910)V5=ABS(T950/905)*VFILL,VALUE(1,3),DATA,V1,V2,V3,V4,V5/COM/OUT,vm132,vrt/COM,-------------------VM132RESULTSCOMPARISON-------------/COM,/COM,|TARGET|ANSYS|RATIO/COM,*VWRITE,LABEL(1,1),LABEL(1,2),VALUE(1,1),VALUE(1,2),VALUE(1,3)(1X,A8,A8,'',F10.0,'',F10.0,'',1F5.2)/COM,----------------------------------------------------------/OUTFINISH*LIST,vm132,vrt==============================/COM,ANSYSMEDIAREL.8.1(03-15-2004)REF.VERIF.MANUAL:REL.8.1/VERIFY,VM133/PREP7MP,PRXY,,0.3/TITLE,VM133,MOTIONOFARODDUETOIRRADIATIONINDUCEDCREEPC***REFERENCE-ANYBASICCALCULUSBOOKANTYPE,STATICET,1,BEAM23!PLASTICBEAMR,1,.25,.0052083,.5!AREA,IZZ,HEIGHTMP,EX,1,300TB,CREEP,1TBDATA,55,0.5E-12,1E10!CREEPEQUATIONCONSTANTSK1ANDK2TBDATA,66,5!SELECTIRRADIATIONINDUCEDCREEPEQUATIONN,1N,2,1E,1,2D,1,ALL!FIXONEENDF,2,FX,.25!FORCEINDUCINGCONSTANTSTRESSFINISH/SOLU!SOLCONTROL,0BFE,1,TEMP,1,1000,1000,1000,1000!APPLYCONSTANTTEMPERATUREBFE,1,FLUE,1,0,0,0,0!APPLYZEROFLUENCETIME,1E-8!NEARZEROTIMEFORFIRSTLOADSTEPOUTPR,BASIC,1!PRINTBASICELEMENTSOLUTIONOUTRES,EPCR,1!STORECREEPSTRAINRESULTSFOREVERYSUBSTEPCNVTOL,F,,,,1E-6!NEARZEROVALUEFORMINREFFIELDCNVTOL,M,-1!CONVERGENCECRITERIONBASEDUPONMOMENTSIS!REMOVEDASITISNOTNEEDEDFORTHISTESTSOLVE!LOADSTEP1NSUBST,50,500,50TIME,5OUTPR,BASIC,5BFE,1,FLUE,1,5E10,5E10,5E10,5E10!FINALFLUENCES(RAMPED)SOLVE!LOADSTEP2FINISH/POST26ESOL,2,1,,LEPCR,1,EPCR!STORECREEPSTRAINPRVAR,2!PRINTSTRAINVARIATIONWITHTIME*GET,T1,VARI,2,RTIME,0*GET,T2,VARI,2,RTIME,.5*GET,T3,VARI,2,RTIME,1*GET,T4,VARI,2,RTIME,5*status,parm*DIM,LABEL,CHAR,4,2*DIM,VALUE,,4,3LABEL(1,1)='CRPSTR@','CRPSTR@','CRPSTR@','CRPSTR@'LABEL(1,2)='0hr','.5hr','1hr','5hr'*VFILL,VALUE(1,1),DATA,0,.00197,.00316,.00497*VFILL,VALUE(1,2),DATA,T1,T2,T3,T4*VFILL,VALUE(1,3),DATA,000,ABS(T2/.00197),ABS(T3/.00316),ABS(T4/.00497)/COM/OUT,vm133,vrt/COM,-------------------VM133RESULTSCOMPARISON-------------/COM,/COM,|TARGET|ANSYS|RATIO/COM,*VWRITE,LABEL(1,1),LABEL(1,2),VALUE(1,1),VALUE(1,2),VALUE(1,3)(1X,A8,A8,'',F10.5,'',F10.5,'',1F5.3)/COM,----------------------------------------------------------/OUTFINISH*LIST,vm133,vrt==============================/COM,ANSYSMEDIAREL.8.1(03-15-2004)REF.VERIF.MANUAL:REL.8.1/VERIFY,vm224JPGPRF,500,100,1!MACROTOSETPREFSFORJPEGPLOTS/SHOW,JPEG/TITLE,VM224,ImplicitCreepUnderBiaxialLoad/COM,NAFEMSFundamentalTestsofCreepBehavior,BeckerandHyde/NOPR/COM,/COM,2DCREEPTESTSWITHBIAXIALCONSTANTLOAD,/COM,REFERENCE:TEST10(A)FROMNAFEMSR0027./COM,/COM,EXPECTEDRESULTS:/COM,TIME|EPCRX|EPCRY/COM,----------------------------/COM,0.0|0.0|-0.0/COM,0.1|0.0427|-0.0427/COM,1.0|0.135|-0.135/COM,5.0|0.3019|-0.3019/COM,10.0|0.4269|-0.4269/COM,50.0|0.9546|-0.9546/COM,100.0|1.35|-1.35/COM,500.0|3.019|-3.019/COM,1000.0|4.2691|-4.2691/COM,/PREP7C***PARAMETRICINPUTFORCREEPCONSTANTS(PRIMARYCREEP)!****SET,C1,1.5625E-14!ASSIGNVALUE*SET,C2,5.0!ASSIGNVALUE*SET,C3,-0.5!ASSIGNVALUE*SET,C4,0!ASSIGNVALUEC***TIMEPARAMETER*SET,HOUR,1000!ASSIGNVALUEC***ELASTICCONSTANTMP,EX,1,200E3!DEFINEYOUNG'SMODULUSMP,NUXY,1,0.3!DEFINEPOISON'SRATIOTUNIF,HOT!ASSIGNTEMPTONODESTOFF,OFFS!SPECIFYTEMPRELATIVETOABSOLUTEVALUESTB,CREEP,1,,,6!ACTIVATEDATATABLETBDATA,1,C1,C2,C3,C4!DEFINEDATAFORTABLESAVE!SAVE/PREP7N,1,0,0,0N,2,100,0N,3,100,100N,4,0,100N,5,50,0N,6,100,50N,7,50,100N,8,0,50N,9,50,50ET,1,PLANE182KEYOPT,1,1,1KEYOPT,1,3,0E,1,5,9,8E,5,2,6,9E,9,6,3,7E,8,9,7,4NALLNSEL,S,LOC,XD,ALL,UXNSEL,S,LOC,YD,ALL,UYNALL/SOLUNSEL,S,LOC,X,100SF,ALL,PRES,-200NALLNSEL,S,LOC,Y,100SF,ALL,PRES,200NALLRATE,OFFDELT,1.0E-8,1.0E-9,1.0E-8TIME,1.0E-8/OUT,SCRATCHOUTRES,ESOL,ALLSOLVE/OUTRATE,ON,ONDELT,1E-5,1E-5,100TIME,1000/OUT,SCRATCHSOLVE/OUTFINISH/POST26ESOL,2,1,,EPCR,XESOL,3,1,,EPCR,YPRVAR,2,3PLVAR,2,3*GET,RES1X,VARI,2,RTIME,1000*GET,RES1Y,VARI,3,RTIME,1000FINISHPARSAV,ALLRESUMEPARRES,CHANGE/PREP7N,1,0,0,0N,2,100,0N,3,100,100N,4,0,100N,5,50,0N,6,100,50N,7,50,100N,8,0,50ET,1,PLANE183KEYOPT,1,3,0E,1,2,3,4,5,6,7,8NALLNSEL,S,LOC,XD,ALL,UXNSEL,S,LOC,YD,ALL,UYNALL/SOLUNSEL,S,LOC,X,100SF,ALL,PRES,-200NALLNSEL,S,LOC,Y,100SF,ALL,PRES,200NALLRATE

1 / 15
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功