ANSYS二次开发培训练习题(4)

/PREP7 et,1,42 mp,ex,1,2e6 mp,nuxy,1,.3 r,1,100,0 tb,user,1 tbdata,1,100,2e3

blc4,0,0,4,2 esize,.5 type,1 mat,1 real,1 amesh,1

nsel,s,loc,x,0 d,all,all,0 nsel,s,loc,x,4 nsel,r,loc,y,0 f,all,fy,-1000 nsel,all /solu antype,static time,1 solve

5.  启动ANSYS（参见用户命令） D:\%user>ansys55cust -custom .\\ansys.exe -p ansysul 6.  输入a.dat，记录结果 /input,a,dat

E. 用户单元

1.  拷贝相关文件

D:\%user>copy c:\\ansys55\\custom\%user\\intel\?1.F D:\%user>copy c:\\ansys55\\custom\%user\\intel\%uel101.F

2.  编辑uel101.F 将下面的程序段 c

      call TrackBegin ('uel101') c

c --- define initial data

c --- elmdat pointers defined in elparm

      mat = elmdat(PMAT) 修改为： c

      call TrackBegin ('uel101')       iott=wrinqr(2)

      write (iott, *) 'In user element',elem c

c --- define initial data

c --- elmdat pointers defined in elparm

      mat = elmdat(PMAT) 3.  运行编译连接（参见用户命令） 4.  编辑命令流文件a.dat D:\%user>edit a.dat /PREP7 et,1,USER101 mp,ex,1,2e6 mp,nuxy,1,.3 r,1,100,0 k k,,100,0 l,1,2 esize,10 type,1 mat,1 real,1 lmesh,1

nsel,s,loc,x,0

d,all,all,0 nsel,s,loc,x,100 f,all,fx,1000 nsel,all /solu antype,static time,1 solve

5.  启动ANSYS（参见用户命令） D:\%user>ansys55cust -custom .\\ansys.exe -p ansysul

6.  输入a.dat，注意OUTPUT窗口中打印出来的信息，记录结果 /input,a,dat

7.  修改命令流文件a.dat，将单元类型换成LINK8，重新分析，并与LINK8对比 D:\%user>edit a.dat /PREP7 et,1,LINK8 mp,ex,1,2e6

E. 使用/DEBUG命令调试ANSYS单元矩阵及载荷矢量

1.  在ANSYS中以自己最熟悉的单元建立一个有限元模型，然后加载荷、边界条件，设定求解参数，如Time, Deltime等 2.  在ANSYS Input Box框中输入以下命令 /DEBUG,-3,,,1

3.  求解，键入求解命令 SOLVE

4.  观察OUTPUT窗口的输出

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库ANSYS二次开发培训练习题(4)在线全文阅读。