MFX output of simulation time

Richard

Hello, I have no solution for the following problem. May be someone can help me.

I perform a FSI-analysis (MFX) with Ansys and CFX. I want to write some information into a file. To identify these information I want to append the simulation time. In my opinion the only possibility is, to write these information with a fortran junction box routine, which is called at the end of every timestep. But performing a FSI, this routine is called several times at the same timestep, up to the simulation at this timestep is converged. Furthermore the output of the simulation time seems to be impossible during a multi field analysis. Anyway the fortran routine according to the CFX help doesn't work: ======================================= #include "cfx5ext.h" dllexport(zeitabfrage)

SUBROUTINE ZEITABFRAGE( CZ,DZ,IZ,LZ,RZ ) C #include "MMS.h" #include "stack_point.h" #include "cfd_constants.h" C

INTEGER IZ(*)

CHARACTER CZ(*)*(1)

DOUBLE PRECISION DZ(*)

LOGICAL LZ(*)

REAL RZ(*) C

CHARACTER*(4) CRESLT

REAL TIME

CHARACTER CFROMR*15 C

CALL PEEKR('/FLOW/SOLUTION/LATEST/ZN1/TIME',

& 1,TIME,'STOP',CRESLT,RZ)

IF (CRESLT.NE. 'GOOD') STOP C

CALL MESAGE( 'WRITE','t= '//CFROMR(TIME)) C

END =======================================

So because of the repeatedly call of the routine, the working output of the timestep "DT" for calculating the simulation time makes no sense. Using the Ansys Input file for defining the output with "*CFOPEN" and "*CFCLOS" seems impossible for me because that code ist called only one time for implementing the model.

I hope my characterisation and my english are understandable. May be anybody knows the way to solve this problem. So I would be glad for an answer. Sincere regards, Richard