Enginerd4390
Mechanical
- Mar 13, 2019
- 2
Hello all, So I am running into a code issue. Need help please.
Task: To get a solution that was solved to export stress intensity across a path from node start to end.
issue is that I cant get it to load the stress across the path as well as export it to excel. It is just making a empty excel. the error it gives me is
Error in format, not enough data format specifiers
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,.
This is the code I wrote:
! enter the number of nodes to extract results
nnnode=2
! enter the number of time steps at which to extract results
nnnstep=1
!1DIMENSION ARRY
*dim,nni,array,nnnode
*dim,nnstep,array,nnnstep
*dim,neptoint,array,nnnode
*dim,nepto1,array,nnnode
*dim,nepto2,array,nnnode
*dim,nepto3,array,nnnode
*dim,neptox,array,nnnode
*dim,neptoy,array,nnnode
*dim,neptoz,array,nnnode
*dim,neptoxy,array,nnnode
*dim,neptoyz,array,nnnode
*dim,neptoxz,array,nnnode
*dim,nepplint,array,nnnode
*dim,neppl1,array,nnnode
*dim,neppl2,array,nnnode
*dim,neppl3,array,nnnode
*dim,nepplx,array,nnnode
*dim,nepply,array,nnnode
*dim,nepplz,array,nnnode
*dim,nepplxy,array,nnnode
*dim,nepplyz,array,nnnode
*dim,nepplxz,array,nnnode
*dim,nepelint,array,nnnode
*dim,nepel1,array,nnnode
*dim,nepel2,array,nnnode
*dim,nepel3,array,nnnode
*dim,nepelx,array,nnnode
*dim,nepely,array,nnnode
*dim,nepelz,array,nnnode
*dim,nepelxy,array,nnnode
*dim,nepelyz,array,nnnode
*dim,nepelxz,array,nnnode
! node 1 - PATH
allse
nsel,s,ext
csys,0
nni(1)=node(1054.9,1048.3,2952.8)
! node 2 - PATH
allse
nsel,s,ext
csys,0
nni(2)=node(1054.9,0,2952.8)
allse
nnstep(1)=1
set,list
*CFOPEN,epto1,csv
*do,i,1,nnnstep
set,nnstep(i)
*do,j,1,nnnode
*get,neptoint(j),node,nni(j),epto,int
*get,neptox(j),node,nni(j),epto,x
*get,neptoy(j),node,nni(j),epto,y
*get,neptoz(j),node,nni(j),epto,z
*get,neptoxy(j),node,nni(j),epto,xy
*get,neptoyz(j),node,nni(j),epto,yz
*get,neptoxz(j),node,nni(j),epto,xz
*get,nepto1(j),node,nni(j),epto,1
*get,nepto2(j),node,nni(j),epto,2
*get,nepto3(j),node,nni(j),epto,3
var1=nnstep(i)
var2=nni(j)
var3=neptoint(j)
var4=nepto1(j)
var5=nepto2(j)
var6=nepto3(j)
var7=neptox(j)
var8=neptoy(j)
var9=neptoz(j)
var10=neptoxy(j)
var11=neptoyz(j)
var12=neptoxz(j)
*vwrite,var1,var2,var3,var4,var5,var6,var7,var8,var9,var10,var11,var12
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,)
*enddo
*enddo
*CFCLOSE
set,list
Task: To get a solution that was solved to export stress intensity across a path from node start to end.
issue is that I cant get it to load the stress across the path as well as export it to excel. It is just making a empty excel. the error it gives me is
Error in format, not enough data format specifiers
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,.
This is the code I wrote:
! enter the number of nodes to extract results
nnnode=2
! enter the number of time steps at which to extract results
nnnstep=1
!1DIMENSION ARRY
*dim,nni,array,nnnode
*dim,nnstep,array,nnnstep
*dim,neptoint,array,nnnode
*dim,nepto1,array,nnnode
*dim,nepto2,array,nnnode
*dim,nepto3,array,nnnode
*dim,neptox,array,nnnode
*dim,neptoy,array,nnnode
*dim,neptoz,array,nnnode
*dim,neptoxy,array,nnnode
*dim,neptoyz,array,nnnode
*dim,neptoxz,array,nnnode
*dim,nepplint,array,nnnode
*dim,neppl1,array,nnnode
*dim,neppl2,array,nnnode
*dim,neppl3,array,nnnode
*dim,nepplx,array,nnnode
*dim,nepply,array,nnnode
*dim,nepplz,array,nnnode
*dim,nepplxy,array,nnnode
*dim,nepplyz,array,nnnode
*dim,nepplxz,array,nnnode
*dim,nepelint,array,nnnode
*dim,nepel1,array,nnnode
*dim,nepel2,array,nnnode
*dim,nepel3,array,nnnode
*dim,nepelx,array,nnnode
*dim,nepely,array,nnnode
*dim,nepelz,array,nnnode
*dim,nepelxy,array,nnnode
*dim,nepelyz,array,nnnode
*dim,nepelxz,array,nnnode
! node 1 - PATH
allse
nsel,s,ext
csys,0
nni(1)=node(1054.9,1048.3,2952.8)
! node 2 - PATH
allse
nsel,s,ext
csys,0
nni(2)=node(1054.9,0,2952.8)
allse
nnstep(1)=1
set,list
*CFOPEN,epto1,csv
*do,i,1,nnnstep
set,nnstep(i)
*do,j,1,nnnode
*get,neptoint(j),node,nni(j),epto,int
*get,neptox(j),node,nni(j),epto,x
*get,neptoy(j),node,nni(j),epto,y
*get,neptoz(j),node,nni(j),epto,z
*get,neptoxy(j),node,nni(j),epto,xy
*get,neptoyz(j),node,nni(j),epto,yz
*get,neptoxz(j),node,nni(j),epto,xz
*get,nepto1(j),node,nni(j),epto,1
*get,nepto2(j),node,nni(j),epto,2
*get,nepto3(j),node,nni(j),epto,3
var1=nnstep(i)
var2=nni(j)
var3=neptoint(j)
var4=nepto1(j)
var5=nepto2(j)
var6=nepto3(j)
var7=neptox(j)
var8=neptoy(j)
var9=neptoz(j)
var10=neptoxy(j)
var11=neptoyz(j)
var12=neptoxz(j)
*vwrite,var1,var2,var3,var4,var5,var6,var7,var8,var9,var10,var11,var12
('EPTO',F10.4,3X,F10,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,E10.4,3X,E10.4,3X,E10.4,3X,e10.4,3X,)
*enddo
*enddo
*CFCLOSE
set,list