open TELEMAC-MASCARET The mathematically superior suite of solvers

Hi

please, how can I add a new variable for graphic printouts, I find in the user Manuel, it should add a new variable in SUBROUTINE NOMVAR and use also subroutine PREDES subroutine, I d‘ like to add two variable (as TOBsup in surface layer and TOBinf in other layer instead to use TOB), the structure of these variable, it should be used in PREDES subroutine but it’isn't very clear I see it should use (PRIVE%ADR(n)%P%R(X)

Any guidance and assistance will be greatly appreciated.

Regards,

Hello,

PRIVE%ADR(1)%P%R(I) will be your first new variable at point I

PRIVE%ADR(2)%P%R(I) will be your second new variable at point I

These new variables will have the name PRIVE 1 and PRIVE 2 but you can change it in NOMVAR_SISYPHE, and you will get them in the result file by adding A and G in the VARIABLES FOR GRAPHIC PRINTOUT in your parameter file.

Regards,

JMH

HI
thank you so much for your response.

I do all the steps but when I compile I find the following error:

*** COMPILATION ***
df/trace /check=overflow /warn:declaration /warn:argument_checking /warn:unused
/compile_only /optimize:4 /fast /iface:cref /iface:nomixed_str_len_arg /nologo
/warn:nofileopt /convert:big_endian /extend_source:132 /include:C:\TELEMAC\V6
P1\telemac2d\tel2d_v6p1\win /include:C:\TELEMAC\V6P1\sisyphe\sisyphe_v6p1\win /i
nclude:C:\TELEMAC\V6P1\tomawac\toma_v6p1\win /include:C:\TELEMAC\V6P1\bief\bief_
v6p1\win /include:C:\TELEMAC\V6P1\special\special_v6p1\win /include:C:\TELEMAC\V
6P1\damocles\damo_v6p1\win /include:C:\TELEMAC\V6P1\paravoid\paravoid_v6p1\win t
2dfort.f
t2dfort.f(1786) : Error: This local name made accessible by a USE stmt appears in a specification stmt that respecifies the attributes. [CHESTR]
TYPE(BIEF_OBJ), INTENT(IN) :: CHESTR

---

^
t2dfort.f(1801) : Error: This local name made accessible by a USE stmt appears in a specification stmt that respecifies the attributes. [DV]
DOUBLE PRECISION, PARAMETER :: DV = 4.D0/1000.D0

---

^
ERREUR A LA COMPILATIONt2dfort.f
__________________________________________________
Execution terminee: telemac2d.bat

I did not understand the problem and must what be modified ?

thank you in advance

Hi

Did you add a use statement in your program?
is so, this create a problem between the use declarations... and the arguments.
So you should limit the use declarations... to the variables you need in your subroutine with ONLY specification

Hope my explanation is enough clear and helps

thank you very much C.Coulet, that's help me and i resolved the problem but when I tried to run,there are no calculations and here's resulats!!!!:


LISTING DE SISYPHE AVEC COUPLAGE

---

---

SSSS I SSSS Y Y PPPP H H EEEEE
S I S Y Y P P H H E
SSS I SSS Y PPPP HHHHH EEEE
S I S Y P H H E
SSSS I SSSS Y P H H EEEEE

VERSION 6.1
COUPLED WITH TELEMAC-2D INTERNALLY

forrtl: severe (29): file not found, unit 2, file C:\Users\KOUKA\Desktop\travail
2\travail3\telemac2coupetnfc2\cas22.txt3332_tmp\SISDICO
Image PC Routine Line Source
out3332_win.exe 00465E99 Unknown Unknown Unknown

Duree du calcul : 3 secondes ( 0:0:3 ) (systeme=0.031 sec)
______________________________________________________________________________
*** RESTITUTION DES FICHIERS ***

- FICHIER DES RESULTATS : resultatcd3

- resultatcd3

________________________________________________________
Execution terminee: telemac2d.bat


thank you in advance

regards

Hello,

It says that the dictionary is not in the temporary folder, the unit 2 is correct, strange that you can get this just by changing something in Fortran. You can check if it is really there or not in the folder (file SISDICO).

Regards,

JMH

HI JMH

thank you so much JMH and C.Coulet,the problem is solved and the new variable appears but unfortunately I see that the model does not calculate this varaible as the value found is only zero is not varaible

regards