Problem on the coupling of telemac3d and tomawac in wind-induced wave

I’m trying to calculate the wind-induced wave using telemac3d coupling with tomawac,I hope to set up wind farm in telemac3d and transmit it to tomawac through anaven.F.But I don’t understand how to modify the anaven.F file.I hope someone can teach me how to modify anaven.F.I would appreciate it if anyone could help me. :beers:

anaven.f (3.32 KB)
TH1TOM.cas (4.5 KB)
TH1.cas (2.22 KB)

Hello

You can not write

  TYPE (BIEF_OBJ), INTENT(INOUT)    [IP removed] wind

because wind is not an argument of anaven.f but if you put

  use declarations_telemac3d wind

it should work as wind is a variable of telemac3d. then you do not have to declare it as it has been declared in declarations_telemac3d.

Hope it helps

[name removed]

1 Like

I meant

use declarations_telemac3d, ONLY : wind

sorry

1 Like

I modified the anaven.F as you suggested. Now the program runs well,thank you very much!