TELEMAC-MASCARET Forum: Problem coupling tomawac and telemac3d (1/1)

Welcome, Guest

TOPIC: Problem coupling tomawac and telemac3d

Problem coupling tomawac and telemac3d 10 years 1 month ago #14512

caiodalaqua

Greetings,

I was trying to couple Tomawac and Telemac3d in parallel mode and got an error that I was not able to figure out any solution. In fact, I am not sure from where this error is comming from.

This is what I got:

       CALCUL DU CHAMP CONVECTEUR ET REMONTEE DES
           CARACTERISTIQUES
 USING STREAMLINE VERSION 6.3 FOR CHARACTERISTICS
 NUMBER OF SUB-ITERATIONS :         223
 NUMBER OF SUB-ITERATIONS :         203
 NUMBER OF SUB-ITERATIONS :         185
 NUMBER OF SUB-ITERATIONS :         168
 NUMBER OF SUB-ITERATIONS :         152
 NUMBER OF SUB-ITERATIONS :         139
 NUMBER OF SUB-ITERATIONS :         126
 NUMBER OF SUB-ITERATIONS :         114
 NUMBER OF SUB-ITERATIONS :         104
 NUMBER OF SUB-ITERATIONS :          94
 NUMBER OF SUB-ITERATIONS :          86
 NUMBER OF SUB-ITERATIONS :          78
 NUMBER OF SUB-ITERATIONS :          71
 NUMBER OF SUB-ITERATIONS :          64
 NUMBER OF SUB-ITERATIONS :          58
 NUMBER OF SUB-ITERATIONS :          53
 NUMBER OF SUB-ITERATIONS :          48
 NUMBER OF SUB-ITERATIONS :          44
 NUMBER OF SUB-ITERATIONS :          40
 NUMBER OF SUB-ITERATIONS :          36
 NUMBER OF SUB-ITERATIONS :          33
 NUMBER OF SUB-ITERATIONS :          30
 NUMBER OF SUB-ITERATIONS :          27
 NUMBER OF SUB-ITERATIONS :          25
 NUMBER OF SUB-ITERATIONS :          22
 NUMBER OF SUB-ITERATIONS :          20
 VECTOR SDZX
 HAS A FIRST DIMENSION OF:            1
 IT CANNOT BE USED IN VECTOR
 FOR A SIZE OF        10114

 PLANTE: PROGRAM STOPPED AFTER AN ERROR

My Telemac3d fortran file was severely modified, but in Tomawac I only changed the Anaven subroutine in order to read telemac3d winds.

Any hints ?

Thank you very much

Caio

Attachments:

TOMAWAC_20...17-2.cas (3KB)
tmwc_wind_v6p3r2.f (3KB)

The administrator has disabled public write access.

Problem coupling tomawac and telemac3d 10 years 1 month ago #14518

jmhervouet

Hello,

You apparently found a combination of parameters in Tomawac where array DZX in the structure SDZX is used and not allocated.
I would hint that you have a parameter INFINITE DEPTH set to YES whereas this is probably not very logical in coupling with Telemac-3D (however I admit that the program should check it).

You can provisionnally bypass the problem by taking subroutine point_tomawac.f in your Fortran file and change :

IF (.NOT.PROINF) THEN
CALL BIEF_ALLVEC(1,SDZX ,'SDZX ',IELM2 , 1 , 2 ,MESH)
CALL BIEF_ALLVEC(1,SDZY ,'SDZY ',IELM2 , 1 , 2 ,MESH)
ELSE
CALL BIEF_ALLVEC(1,SDZX ,'SDZX ', 1, 1, 0 ,MESH)
CALL BIEF_ALLVEC(1,SDZY ,'SDZY ', 1, 1, 0 ,MESH)
ENDIF

into just:

CALL BIEF_ALLVEC(1,SDZX ,'SDZX ',IELM2 , 1 , 2 ,MESH)
CALL BIEF_ALLVEC(1,SDZY ,'SDZY ',IELM2 , 1 , 2 ,MESH)

With best regards,

Jean-Michel Hervouet

The administrator has disabled public write access.