Welcome, Guest
Username: Password: Remember me

TOPIC: v7p0r0 - postel3d not working

v7p0r0 - postel3d not working 9 years 11 months ago #15259

  • konsonaut
  • konsonaut's Avatar
  • OFFLINE
  • openTELEMAC Guru
  • Posts: 413
  • Thank you received: 144
Hello,

as in release v6p3r2 also in v7p0r0 under Windows and gfortran POSTEL3D doesn't work. Enclosed the error message when launching postel3d.
postel3d_error.png

During the compilation no apparent error appears...

Practical workaround is to use postel3d from version v6p2 which works well under windows and gfortran.

Best regards,
Clemens
The administrator has disabled public write access.

v7p0r0 - postel3d not working 9 years 11 months ago #15268

  • yugi
  • yugi's Avatar
  • OFFLINE
  • openTELEMAC Guru
  • Posts: 851
  • Thank you received: 244
Hi,

Yes there seems to still be an error in the source code here is a solution you could try:

Adding just one line of code in the file sources/postel3d/lecdon_postel3d.f

Around the line 200
The lines to add are the line 201 and 202.
Hopefully that should solve the problem.
196       IF (I(6).EQ.1) THEN
197       VARSUB=.TRUE.
198       ELSE
199       VARSUB=.FALSE.
200       ENDIF
201       ! Skipping date if present
202       IF (I(10).ne.0) READ(POS_FILES(POSPRE)%LU)

If this still does not solve your problem could you send me your file so that i can test that.

Hope it helps.
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.
Moderators: borisb

The open TELEMAC-MASCARET template for Joomla!2.5, the HTML 4 version.