open TELEMAC-MASCARET The mathematically superior suite of solvers

Dear Users,

I have some problem with wind simulation. I am trying to use the wind file. I got updated Meteo subroutine from below poster. I am trying to simulate wind constant in space but various in time. Before I use real wind data, I wanted to check the simplest case, say wind is on for 5 hours (15m/s)and then off for 5 hours and so on. But I got the error message: ERROR IN THE WIND FILE. The file is just simple txt format. I inserted two comment lines as it per meteo script. The first column is time steps, then U velocity and V. Maybe my wind file is in wrong format, or I need to amend some lines in meteo script. Could you please point me into right direction. I have attached the fortran file with Meteo subroutine starting at line 1432, sorry for a long file, and wind txt file. Thanks a mil.

www.opentelemac.org/index.php/kunena/16-...lemac2d?limitstart=0

Kind Regards!

Violeta

Hi Violeta,

You can test to remove the tabulation (and replaced by a space) in your wind file.
Not sure !
You can check by putting "WRITE(LU,*) AT2,FUAIR2,FVAIR2" at the line after the READ

Regards,
Olivier

Hi Olivier,

Thanks for your prompt reply. Unfortunately both suggestions have not fixed the problem. I have changed tab to space in wind file and inserted WRITE ... in Meteo after READ, but I am still getting same result: ERROR in Wind File.
Please let me know if you have any suggestions, I will be happy to try, you never know what might help I will see if other users might have some ideas as well. Thanks a mil.

Kind Regards!

Violeta

Hi Violeta,

I can't find anything wrong with your meteo or your wind file.

I have saved your wind file in the same way I do mine and work in case it is the format of the file (unlikely).





I also attach my version of meteo that reads wind speed and direction instead of wind constituents. Maybe it will be useful:



Regards,
Costas

Thank you very much Costas for your advice and files. Little progress there. I did not get same error message, but now I am getting errors on nodes. Just a quick question: are you running simulation in parallel mode? As I think my errors are due to parallelism. But I will look into your meteo more carefully as if it runs for you then I just need to amend it somewhere to make it working for my case too. Thanks a mil for your help.

Kind Regards!

Violeta

Hi Violeta

Your file and program sounds good!
Maybe could you check which call to READ is wrong
Add some write(LU,*) 'xxx' before and after each read.
This will show us in the listing file where exactly the file is wrong.

Hope this helps

Thanks you Christophe, I will do so. I will keep you posted.

Kind Regards!

Violeta

Thanks again Christophe, there is some little light in the tunnel . The WRITE option pointed on error in first READ

IF(MY_OPTION.EQ.2) THEN
! JUMPING TWO LINES OF COMMENTS
READ(UL,*,ERR=100,END=200)
READ(UL,*,ERR=100,END=200)
! READING THE FIRST TWO LINES OF DATA
READ(UL,*,ERR=100,END=200) AT1,FUAIR1,FVAIR1
READ(UL,*,ERR=100,END=200) AT2,FUAIR2,FVAIR2

In my wind file I inserted two lines for comments as I saw it in the script, unless I made some mistakes there. Please advise. Thanks a mil.

Kind Regards!

Violeta

OK
Please now check the value of UL

Do you mean script below:

UL=T2D_FILES(T2DFO1)%LU

Kind Regards!

Violeta