open TELEMAC-MASCARET The mathematically superior suite of solvers

Hi
The boundary conditions are managed in bord.f subroutine which call tidal_model_t2d.f for tide.
In this subroutine, you could add some print to check the computed values...

Regards

Thanks!

To confirm: the bord.f subroutine is in the TELEMAC-MASCARET folder ...sources\telemac2d

I modify this subroutine and call it in the steering file?

So, in modifying the bord.f

I should modify this section
!

---

!
! AUTOMATIC TIDAL BOUNDARY CONDITIONS
!
IF(TIDALTYPE.GE.1) CALL TIDAL_MODEL_T2D()
!
!

---

By changing it to something like:
!

---

!
! AUTOMATIC TIDAL BOUNDARY CONDITIONS
!
IF(TIDALTYPE.GE.1) CALL TIDAL_MODEL_T2D()
PRINT *, 'V is',V
PRINT *, 'h is',h
!
!

---

I just don't know how to do this for the every node in the boundary layer.

I'm guessing I would use a do loop:

DO XY=1, NUMBEROFNODES
PRINT *, 'V is',XY(V)
PRINT *, 'h is',XY(h)
ENDDO


Where it counts through the nodes and then prints out the values for each. I just don't know how to do that with FORTRAN in a TELEMAC file.