资源描述：
《apdl实例mpc定义万向联轴器滑动副转动副》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、/COM,ANSYSMEDIAREL.121(10/15/2009)REF.VERIF.MANUAL:REL.121/VERIFY,VM239/OUT,SCRATCH/PREP7/OUT/COM/TITLE,VM239,MECHANICSOFTHEREVOLUTEANDUNIVERSALJOINTS/COM/COM/COMJ.E.SHIGLEYANDJ.J.UICKER,"THEORYOFMACHINESAND/COMMECHANISMS"2NDEDITION,P.115,1995./COM/COM**
2、*ANALYSISUSINGALLFLEXIBLEBODIES/COM/COM!C***ADDUNIVERSALJOINTMECHANISMTOTHEABOVEPROBLEM.!C***PERFORMANALYSISUSINGALLFLEXIBLEBODIES/OUT,SCRATCHPI=4*ATAN(1.0)MULT=12PI15=PI/MULTANG=PI15*3R=.5!LENGTHOFROTATINGARML=1.5!LENGTHOFCRANKZDIST=L*SIN(ACOS(R/L))!C**
3、*DEFININGELEMENTSANDMATERIALPROPERTIESET,1,BEAM188!BEAMELEMENTSET,2,MPC184,7!UNIVERSALJOINTET,3,MPC184,6!REVOLUTEJOINTET,4,MPC184,3!SLIDERMP,EX,1,30E6MP,PRXY,1,0.33MP,DENS,1,10.0TYPE,1MAT,1SECTYPE,1,BEAM,CSOLID!其中csolid为截面类型SECDATA,.05!定义的圆柱为0.05!C***CRE
4、ATINGNODESANDLINKELEMENTSN,1,0,0,0N,2,1,0,0N,3,1,0,0N,4,1+COS(ANG),SIN(ANG),0.0N,5,1+COS(ANG),SIN(ANG),0.0N,6,2+COS(ANG),SIN(ANG),0N,8,2+COS(ANG),.5+SIN(ANG),0N,9,2+COS(ANG),.5+SIN(ANG),0N,10,2+COS(ANG),SIN(ANG),ZDISTN,11,2+COS(ANG),SIN(ANG),.75N,12,2+CO
5、S(ANG),SIN(ANG),2.25N,13,2+COS(ANG),SIN(ANG),2.26N,14,2+COS(ANG),SIN(ANG),.74TYPE,1MAT,1SECNUM,1EN,1,1,2EN,2,3,4EN,3,5,6EN,4,6,8EN,5,9,10EN,6,11,12EN,11,12,13EN,12,11,14LOCAL,11,0,0,0,0,-90.0!DEFININGLOCALCSYSFORUNIV.JOINTSLOCAL,12,0,0,0,0,-45.0LOCAL,14,
6、0,0,0,0,0,!DEFININGLOCALCSYSFORREVO.JOINTSLOCAL,15,0,0,0,0,0,CSLIST!C***CREATINGUNIVERSALCONNECTIVITYELEMENTSSECTYPE,2,JOIN,UNIV,TESTING02!DEFININGUNIVERSALJOINTSECJOINT,1,11,12TYPE,2SECNUM,2EN,7,2,3SECTYPE,3,JOIN,UNIV,TESTING03!DEFININGUNIVERSALJOINTSEC
7、JOINT,1,11,12TYPE,2SECNUM,3EN,8,5,4!C***CREATINGREVOLUTECONNECTIVITYELEMENTSSECTYPE,4,JOIN,REVO,TESTING04!DEFININGREVOLUTEJOINTSECJOINT,,14,15TYPE,3SECNUM,4EN,9,8,9!C***CREATINGSLIDERCONNECTIVITYELEMENTSTYPE,4EN,10,10,11,12CSYS,12NROTAT,4CSYS,0/SOLU!SOLU
8、TIONCSYS,0ANTYPE,STATNLGEOM,ON!LARGEDEFLECTIONOPTIONTIME,1.0NSUBST,32,32,32D,1,UX,0,,,,UY,UZ,,ROTY,ROTZD,6,UX,0,,,,UY,UZ,,ROTY,ROTZNSEL,S,NODE,,13,14,1D,ALL,ALLALLSEL,ALLD,1,ROTX,2*PIOUTRES,ALL,ALL!C***NOTE:THEFORCESINTHIS
