Hello,
I am trying triple coupling (Telemac2d, Tomawac, Sisyphe) to account for wave induced bed shear stress.
The calculation takes a
considerable time, due to the tomawac run as what it seems. I am trying to take into account the effect of waves on both hydrodynamics and sediment transport using an already calculated solution with Tomawac.
Using the keyword NOMS DES VARIABLES CLANDESTINES doesn't seem to solve the problem (
www.opentelemac.org/index.php/kunena/17-...nput-in-sisyphe#8025).
I'm trying to make Sisyphe read the wave data to avoid the 'DONNEES DE HOULE MANQUANTES' error message :/ .
I tried to add some subroutines to read wave data from an external file, something like :
SUBROUTINE myReadTW(NPOIN, TW)
!
INTEGER :: i
INTEGER, INTENT(IN) :: NPOIN
DOUBLE PRECISION, INTENT(OUT) :: TW(NPOIN)
!
OPEN(2000, FILE='C:\wave_data\TW.txt')
!
DO i=1, NPOIN
READ(2000, ERR=100) TW(i)
ENDDO
! !
100 CONTINUE
CLOSE(2000)
!
END SUBROUTINE
The simulation is running but with 0 amounts of suspension and bed load transport.
Any clues would be highly appreciated.
Thanks,
FEZAI