open TELEMAC-MASCARET The mathematically superior suite of solvers

Hi

I am trying to include the anaven.f file in my run but I cannot get it to compile. In the steering file I have:

FORTRAN FILE = 'anaven.f'
WIND VELOCITY ALONG X = 10
WIND VELOCITY ALONG Y = 10

I have not modified the anaven.f file hence I am using the example code which should create a constant wind over the whole domain. However when I try and run it I get the following error message:

Starting execution: tomawac.bat
________________________________________________________
- FORTRAN FILE : anaven.f
______________________________________________________________________________
*** COMPILATION ***

ifort -c -O2 -convert big_endian -I /home/jb16/telemac_v61/tomawac/toma_v6p1/intel64 -I /home/jb16/telemac_v61/bief/bief_v6p1/intel64 -I /home/jb16/telemac_v61/damocles/damo_v6p1/intel64 -I /home/jb16/telemac_v61/paravoid/paravoid_v6p1/intel64 -I /home/jb16/telemac_v61/special/special_v6p1/intel64 wacfort.f
: error #5149: Illegal character in statement label field

: error #5149: Illegal character in statement label field

: error #5149: Illegal character in statement label field

: error #5149: Illegal character in statement label field [R]

: error #5149: Illegal character in statement label field [O]

: error #5118: First statement in file must not be continued

wacfort.f(2): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( % . = =>
SUBROUTINE ANAVEN(UV,VV,X,Y,NPOIN2,AT,DDC,VX_CTE,VY_CTE)

---

^
wacfort.f(52): error #6353: A RETURN statement is invalid in the main program.
RETURN

---

^
wacfort.f(40): error #6591: An automatic object is invalid in a main program. [UV]
DOUBLE PRECISION UV(NPOIN2), VV(NPOIN2)

---

^
wacfort.f(40): error #6591: An automatic object is invalid in a main program. [VV]
DOUBLE PRECISION UV(NPOIN2), VV(NPOIN2)

---

^
wacfort.f(39): error #6591: An automatic object is invalid in a main program. [X]
DOUBLE PRECISION X(NPOIN2), Y(NPOIN2)

---

^
wacfort.f(39): error #6591: An automatic object is invalid in a main program. [Y]
DOUBLE PRECISION X(NPOIN2), Y(NPOIN2)

---

^
wacfort.f(37): error #6219: A specification expression object must be a dummy argument, a COMMON block object, or an object accessible through host or use association [NPOIN2]
INTEGER NPOIN2

---

^
compilation aborted for wacfort.f (code 1)
ERROR : COMPILATION

________________________________________________________
Execution finished: tomawac.bat
________________________________________________________
Compilation/linking/file errors detected.
Please see messages in: stdout above, stderr,
and/or file /home/fl01/projects/sizewell/sz_c_widemesh2.MAT/waves/waves1.casw18780_error.log
No execution errors detected.

Working directory: /home/fl01/projects/sizewell/sz_c_widemesh2.MAT/waves/waves1.casw18780_tmp
can be manually deleted with: /home/fl01/projects/sizewell/sz_c_widemesh2.MAT/waves/delete_waves1.casw18780

Returning exit status 1

=========================================================
Telemac System 5.6 to 6.1 - Perl scripts version 6.1
=========================================================
...stopping.

can anyone tell me what is wrong?

Thanks in advance

Fay

Hello Fay,

I cannot see what could be wrong -- I have doubled-checked all relevant source (standard) codes. Would it be possible to share with us your CAS, CONLIM, and GEO files (and other inputs you may use) ?

Thank you.

Sébastien.

Hello,

It looks like the FORTRAN FILE itself is not correct and not only has the subroutine anaven.f but maybe also trailing lines that makes the compiler believe that we are in a main program when the line SUBROUTINE ANAVEN occurs ?

JMH

Thank you, your correct Jean-Michel, not sure what I did but I must have accidentally changed the fortran code inside the anaven subroutine. I just copied the original file again and it runs.

Cheers

Fay