Average result on surface

[Robert000]

Hi all,

I have still problems with getting averagized results
in Fortran - Ansys (but the problem might be same as in
structural analyze).

I get pressure distribution on a wall, but I need
only one number: the average value of pressure on
the whole wall (average on surface, not on elements).

How is it posible to get this?
(I heard something about exporting
results on elements to excell and averagizing there,
but I don´t know how?)
Maybe Ansys is able to calculate this....?

Thanks

Robert

 

[meshparts]

Hi,

you could select the nodes on the wall (nsel,s,area) then get the nodal pressures in a vector (press(i)=pres) and then average this vector (*vscfun,avpress,mean,press).

Or am I geting all this wrong?

Regards,
Alex

 

[Robert000]

Hi Alex,

I tried what you wrote above, but
something I do wrong.
Below is an example copied from a log file.
The aim is to get the average result
of PCOE on area A11.
I hope you will have a time to see it.

Thanks a lot,

Robert



/COM,ANSYS RELEASE 8.1 UP20040329 08:05:00 01/11/2006
/input,menust,tmp,'',,,,,,,,,,,,,,,,1
/GRA,POWER
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1
/REPLOT,RESIZE
WPSTYLE,,,,,,,,0
/CWD,'C:\Documents and Settings\R\Desktop\test'
/TITLE,test
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/PREP7
BLC4,0,0,100,50,100
LPLOT
BLOCK,40,45,0,10,45,55,
FLST,2,2,6,ORDE,2
FITEM,2,1
FITEM,2,-2
VSBV,P51X, 2
VPLOT
LPLOT
vlist
!*
ET,1,FLUID142
!*
FLDATA12,PROP,DENS,4
FLDATA13,VARY,DENS,0
FLDATA12,PROP,VISC,4
FLDATA13,VARY,VISC,0
FLDATA12,PROP,COND,0
FLDATA13,VARY,COND,0
FLDATA12,PROP,SPHT,0
FLDATA13,VARY,SPHT,0
!*
FLDATA7,PROT,DENS,AIR-SI
FLDATA8,NOMI,DENS,-1
FLDATA9,COF1,DENS,0
FLDATA10,COF2,DENS,0
FLDATA11,COF3,DENS,0
FLDATA7,PROT,VISC,AIR-SI
FLDATA8,NOMI,VISC,-1
FLDATA9,COF1,VISC,0
FLDATA10,COF2,VISC,0
FLDATA11,COF3,VISC,0
FLDATA12,PROP,IVIS
FLDATA7,PROT,COND,CONSTANT
FLDATA8,NOMI,COND,-1,
FLDATA9,COF1,COND,0
FLDATA10,COF2,COND,0
FLDATA11,COF3,COND,0
FLDATA7,PROT,SPHT,CONSTANT
FLDATA8,NOMI,SPHT,-1,
FLDATA9,COF1,SPHT,0
FLDATA10,COF2,SPHT,0
FLDATA11,COF3,SPHT,0
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,1.23
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,VISC,1,,1.79e-005
LPLOT
/PNUM,KP,0
/PNUM,LINE,1
/PNUM,AREA,1
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0
!*
/PNUM,ELEM,0
/REPLOT
!*
/VIEW,1,,,1
/ANG,1
/REP,FAST
/VIEW,1,1
/ANG,1
/REP,FAST
FLST,5,14,4,ORDE,4
FITEM,5,9
FITEM,5,-10
FITEM,5,13
FITEM,5,-24
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,10, , , , ,1
!*
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/VIEW,1,,,1
/ANG,1
/REP,FAST
/VIEW,1,1
/ANG,1
/REP,FAST
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/VIEW,1,,,1
/ANG,1
/REP,FAST
/VIEW,1,1
/ANG,1
/REP,FAST
/VIEW,1,,,-1
/ANG,1
/REP,FAST
/VIEW,1,-1
/ANG,1
/REP,FAST
/VIEW,1,,-1
/ANG,1
/REP,FAST
FLST,5,12,4,ORDE,2
FITEM,5,1
FITEM,5,-12
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,10, , , , ,1
!*
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
MSHKEY,0
MSHAPE,1,3d
CM,_Y,VOLU
VSEL, , , , 3
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
LPLOT
/VIEW,1,,,1
/ANG,1
/REP,FAST
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/VIEW,1,,-1
/ANG,1
/REP,FAST
FLST,5,7,5,ORDE,5
FITEM,5,4
FITEM,5,7
FITEM,5,-8
FITEM,5,10
FITEM,5,-13
CM,_Y,AREA
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
CMDELE,_Y
!*
!*
!*
DA,_Y1,VX,0,1
DA,_Y1,VY,0,1
DA,_Y1,VZ,0,1
!*
CMDELE,_Y1
!*
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/USER, 1
/FOC, 1, 50.4658713937 , 22.5249998485 , 52.0091287578
/REPLO
/VIEW, 1, 0.272059086240 , 0.560548965517 , 0.782156449089
/ANG, 1, -11.7882548209
/REPLO
/VIEW, 1, 0.917685046702E-01, 0.572618848499 , 0.814669378272
/ANG, 1, -19.0720259239
/REPLO
/VIEW, 1, 0.175838114042 , 0.697713895301 , 0.694461142149
/ANG, 1, -14.0525771092
/REPLO
/VIEW, 1, 0.244095991698 , 0.720649948758 , 0.648907387993
/ANG, 1, -9.53757772271
/REPLO
/VIEW, 1, 0.321258472013 , 0.783258629592 , 0.532258314477
/ANG, 1, -2.92818525411
/REPLO
FLST,5,5,5,ORDE,5
FITEM,5,1
FITEM,5,-2
FITEM,5,4
FITEM,5,-5
FITEM,5,13
CM,_Y,AREA
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
CMDELE,_Y
!*
!*
!*
DA,_Y1,VX,35,1
DA,_Y1,VY,0,1
DA,_Y1,VZ,0,1
!*
CMDELE,_Y1
!*
FLST,5,1,5,ORDE,1
FITEM,5,6
CM,_Y,AREA
ASEL,R, , ,P51X
CM,_Y1,AREA
CMSEL,S,_Y
CMDELE,_Y
!*
/GO
!*
DA,_Y1,PRES,0,1
!*
CMDELE,_Y1
!*
FINISH
/SOL
/COM,,Steady State Analysis,0
FLDATA2,ITER,EXEC,20,
FLDATA2,ITER,OVER,0,
FLDATA2,ITER,APPE,0,
FLDATA3,TERM,VX,0.01,
FLDATA3,TERM,VY,0.01,
FLDATA3,TERM,VZ,0.01,
FLDATA3,TERM,PRES,1e-008,
FLDATA3,TERM,TEMP,1e-008,
FLDATA3,TERM,ENKE,0.01,
FLDATA3,TERM,ENDS,0.01,
FLDATA5,OUTP,SUMF,10,
!*
FLDATA5,OUTP,PTOT,1
FLDATA5,OUTP,TTOT,0
FLDATA5,OUTP,HFLU,0
FLDATA5,OUTP,HFLM,0
FLDATA5,OUTP,STRM,1
FLDATA5,OUTP,PCOE,1
FLDATA5,OUTP,MACH,0
FLDATA5,OUTP,YPLU,0
FLDATA5,OUTP,TAUW,0
FLDATA5,OUTP,RDFL,0
!*
SOLVE
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
wpstyle,10,10,0,100,0.001,0,1,,5
WPSTYLE,,,,,,,,1
wpof,,,-10.000000
wpof,,,10.000000
wpof,,,10.000000
wpof,,,10.000000
wpof,,,10.000000
wpof,,,10.000000
wpof,,,10.000000
WPSTYLE,,,,,,,,0
FINISH
/POST1
SET,LAST
!*
/EFACET,1
PLNSOL, PCOE,, 0
/GRAPHICS,POWER
!*
/TYPE,1,8
/CPLANE,1
/SHADE,1,1
/HBC,1,0
/REPLOT