/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窗口的输出