一个FORTRAN和ANSYS开发的接口程序,前台运行FORTRAN,后台处理数据用ANSYS
源代码在线查看: data.out
=========PLANE STRESS PROBLEM========
* * * * * RESULTS BY FEM2D * * * * *
--DISPLACEMENT OF NODE--
NODE NO X-DISP Y-DISP
1 0.000000E+00 -0.525275E+01
2 0.000000E+00 -0.225275E+01
3 -0.108791E+01 -0.137363E+01
4 0.000000E+00 0.000000E+00
5 -0.824176E+00 0.000000E+00
6 -0.182418E+01 0.000000E+00
--STRESSES OF ELEMENT--
ELEMENT NO.= 1
STX=-.108791E+01 STY=-.300000E+01 TXY=0.439560E+00
ELEMENT NO.= 2
STX=-.824176E+00 STY=-.225275E+01 TXY=0.000000E+00
ELEMENT NO.= 3
STX=-.108791E+01 STY=-.137363E+01 TXY=0.307692E+00
ELEMENT NO.= 4
STX=-.100000E+01 STY=-.137363E+01 TXY=-.131868E+00
--STRESSES OF NODE--
NODE NO.= 1
STX=-.108791E+01 STY=-.300000E+01 TXY=0.439560E+00
NODE NO.= 2
STX=-.100000E+01 STY=-.220879E+01 TXY=0.249084E+00
NODE NO.= 3
STX=-.105861E+01 STY=-.191575E+01 TXY=0.205128E+00
NODE NO.= 4
STX=-.824176E+00 STY=-.225275E+01 TXY=0.000000E+00
NODE NO.= 5
STX=-.970696E+00 STY=-.166667E+01 TXY=0.586081E-01
NODE NO.= 6
STX=-.100000E+01 STY=-.137363E+01 TXY=-.131868E+00