TELEMAC-MASCARET Forum: gretel does not transfer date and time from parallel serafin files (1/2)

Welcome, Guest

Page:
1
2

TOPIC: gretel does not transfer date and time from parallel serafin files

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21046

j_floyd

Need to add a call to get_mesh_date() after first call to open_mesh around line 101 in gretel_autop.f.

! JMF - date is not read any where - do it here
CALL GET_MESH_DATE(RESFORMAT,NRESPAR,TDATE,IERR)
DATE=TDATE(1:3)
TIME=TDATE(4:6)

and add to variable declaration area

INTEGER TDATE(6)

Dont think that the IPARAM 3 & 4 X,Y Coordinate Origins are handled in gretel either. Havent followed this up yet.

Cheers
John

The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21047

yugi OFFLINE openTELEMAC Guru Posts: 851 Thank you received: 244	Hi, Thanks for the info i'll add it for the next release. As for the coordinate origins they are not used anymore. Cheers, Yoann
	There are 10 types of people in the world: those who understand binary, and those who don't. The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21052

c.coulet OFFLINE Moderator Posts: 3722 Thank you received: 1031	Hi Yoann Please let the coordinates of origins as I've seen recently that they are used by few users!!! Cheers
	Christophe The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21093

j_floyd	Comment If using eastings northings coords only then the user has to be careful if using float32 as the precision depends on the values needed to be given. For example where I model, the northing to the metre requires 7 digits. There would be no problem if coords were all in float64 (double). I thought that this was why the xy origin was defined here.
	The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21085

Serrer OFFLINE Moderator Posts: 720 Thank you received: 304	Hi Yoann, Blue Kenue has used and respected the origin coordinates since the beginning. Cheers... Martin
	The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21086

c.coulet OFFLINE Moderator Posts: 3722 Thank you received: 1031	Hi Martin Hope you're well! Could you tell me if Blue Kenue has got the capacity to write a selafin file with this info (origin coordinates)? Regards
	Christophe The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21092

Serrer OFFLINE Moderator Posts: 720 Thank you received: 304	Hi Christophe, I thought it did but it turns out that we just implemented support for reading the origin Sigh... It would take very small changes to add this capability as all the infrastructure is there. I'll mention it to Alan Barton. All is well here. Hope the same for you and your family. Cheers... Martin
	The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 6 months ago #21095

yugi OFFLINE openTELEMAC Guru Posts: 851 Thank you received: 244	The reason we removed the origin was because using Serafin in double precision solved the problem and that this functionality was only for Telemac2d but if you tell me it is still needed. I'll add this for the next feature the dev to add this are not long.
	There are 10 types of people in the world: those who understand binary, and those who don't. The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 3 months ago #23512

Lux
OFFLINE
Senior Boarder
Posts: 96
Thank you received: 39

I faced the same problem that John had with the date.

I am running Telemac on CentOS with the version v7p1. With the previous suggestions, I managed to fix with the following steps :

1) Modification of /sources/utils/gretel/gretel_autop.f

Add this declaration (line 73) :

INTEGER TDATE(6)

Add a call to GET_MESH_DATE (the code surrounding by the comment LDN is inserted) :

CALL OPEN_MESH(RESFORMAT,RES,NRES,'READWRITE',IERR)
      CALL CHECK_CALL(IERR,"GRETEL:OPEN_MESH:RES")
!LDN : Correction of date
      CALL GET_MESH_DATE(RESFORMAT,NRES,TDATE,IERR)
      CALL CHECK_CALL(IERR,"GRETEL:GET_MESH_DATE")
      DATE=TDATE(1:3)
      TIME=TDATE(4:6)
!LDN END
!
!     Header information
!
      RESPAR = TRIM(RES) // EXTENS(NPROC-1,0)

2) Add the dependance in /sources/utils/gretel/gretel.cmdf with modification of the key hermes :

[hermes]
path: <root>|sources|utils|hermes
files: interface_hermes.f
  utils_med.F
  utils_serafin.F
  set_header.f
  set_mesh.f
  get_data_value.f
  get_data_var_list.f
  get_data_nvar.f
  get_mesh_l2g_numbering.f
  get_data_time.f
  open_mesh.f
  get_mesh_nplan.f
  get_mesh_coord.f
  get_mesh_title.f
  get_mesh_date.f
  close_mesh.f
  get_data_ntimestep.f
  get_mesh_nelem.f
  get_mesh_npoin_per_element.f
  get_bnd_nelem.f
  get_mesh_nptir.f
  get_bnd_npoin.f
  get_mesh_dimension.f
  get_mesh_npoin.f
  add_data.f
  get_mesh_connectivity.f
  get_bnd_ipobo.f

3) Recompilation of the whole configuration

Hope it helps other users.
Is this solved in the next version?

The administrator has disabled public write access.

gretel does not transfer date and time from parallel serafin files 8 years 3 months ago #23513

yugi OFFLINE openTELEMAC Guru Posts: 851 Thank you received: 244	This has been modified and will be in the next released. It is now on the trunk version for those who want.
	There are 10 types of people in the world: those who understand binary, and those who don't. The administrator has disabled public write access. The following user(s) said Thank You: Lux

Flat Threaded

Page:
1
2

Moderators: pham

Forum

System Modules

TELEMAC-3D

gretel does not transfer date and time from parallel serafin files

open TELEMAC-MASCARET The mathematically superior suite of solvers

Nav view search

Navigation

Search