open TELEMAC-MASCARET The mathematically superior suite of solvers

Hi everybody,

I would like to use original date of time and original hour of time in my Fortran program.
My first idea was to declare the global variable like it :
USE DECLARATIONS_TELEMAC2D,ONLY: variable_name
But I didn't find the variable name associated to the key words original date of time and original hour of time in the subroutine DECLARATIONS_TELEMAC2D.
I know that original date of time is associated to MOTINT(48:50) in the result file and original hour of time is associated to MOTINT(51:53). But how to recover these variables?

Best regards

Nicolas Proust

Hi

You're in the good way.
Date is stored in the array MARDAT(3) and time in the array MARTIM(3)
When you search such variables, have a look into declarations_telemac2d.f and just search date or time.

Hope this helps

Regards

Thank you!

I have searched into declarations_telemac2d.f but only with the key words date and time. I haven't tried dat and tim...

Strange!
If I search date in declarations_telemac2d.f (in v6p1) I have:

!brief ORIGINAL DATE OF TIME
! tableau contenant la date de l'origine des temps
INTEGER MARDAT(3)
!brief ORIGINAL HOUR OF TIME
! tableau contenant l'heure de l'origine des temps
INTEGER MARTIM(3)

regards

I think I have an old folder source.

This is the part of declarations_telemac2d where I found MARDAT :

C NUMBER OF SUB-ITERATIONS FOR NON-LINEARITIES
C
INTEGER NSOUI
C
C NOT USED (OPTION DE PROPAGATION)
C
INTEGER OPTPRO
C
INTEGER IORDRH,IORDRU,NSOUSI,PTINIG,PTINIL,LISRUG
INTEGER NDEBIT,NCOTE,NVITES,NTRACE,NVARCL,LVMAC,OPTBAN
INTEGER NFLOT,FLOPRD,NITFLO,NLAG,LISFON,DISCRE(4),NREJET,NREJEU
INTEGER NREJTR,OPTSUP(4),OPTHYB(4),MARDAT(3),MARTIM(3)
INTEGER IELM0,IELM1,IELMH,IELMU,IELMT,IELMK,IELME,OPTASS
INTEGER PRODUC,NWEIRS,NSIPH,NTYPFR
INTEGER FRTYPE(MAXFRO),SOLSYS,PROVEL(MAXFRO)
INTEGER NFRLIQ,NFRSOL,DEBLIQ(MAXFRO),FINLIQ(MAXFRO)
INTEGER DEBSOL(MAXFRO),FINSOL(MAXFRO)
INTEGER ISCE(MAXSCE),ENTSIP(MAXSCE/2),SORSIP(MAXSCE/2)
INTEGER OPDTRA,OPDVIT,OPTSOU,NPRIV,WAQPRD,OPT_HNEG
C
C CURRENT ITERATION NUMBER
C
INTEGER LT

Your version of declarations_telemac2d is better commented. Is it possible to download the most recent folder source?

Hi
It looks like the previous version 6.0
You could upgrade your telemac system to the 6.1 version which is available in the download section (or use the SVN solution)

Regards