/prep7
nn=100000 !ANSYS模型总的节点数
*dim,Pressreal,ARRAY,nn,1 !定义一个(nn,1)维的array矩阵
*dim,Pressimag,ARRAY,nn,1
*vread,Pressreal(1),realpart,txt,,JIK,1,nn !采用ANSYS_pressure_freq_real_fillzero.txt文件中的数据填充矩阵Pressdata,行优先读入
(f11.5) !读入数据的格式Fortran format
*vread,Pressimag(1),imagpart,txt,,JIK,1,nn
(f11.5)
!将读入的数据矩阵Pressdata再写入文件outdat.txt,以验证读入过程是否正确
*CFOPEN,outdat1,txt
*VWRITE,Pressreal(1) !一行写一个数字,正好与VWRITE的用法对应
(f11.5)
*CFCLOS
*CFOPEN,outdat2,txt
*VWRITE,Pressimag(1) !一行写一个数字,正好与VWRITE的用法对应
(f11.5)
*CFCLOS
csys,0 !强迫总体坐标系为直角坐标系
! 加载
sffun,pres,Pressreal(1),Pressimag(1) !将Pressdata的数据与压力边界条件联系起来
cmsel,s,wallup,node
看了帖子中的人的售价太贵了,我贴一下自己的方法,大家共同讨论,另外希望斑竹加技术分 |