open TELEMAC-MASCARET The mathematically superior suite of solvers

Hello everyone,

I ran the validation case 004_source (svn.opentelemac.org/svn/opentelemac/vali...l3d_v6p2/004_source/) for Telemac3d and everything was OK. But when I tried it with parallel mode I get a problem. When I run it under 2 or 3 processors it's OK but when I put it under 4 processors, the program displays "MAX D'ITERATIONS ATTEINT......" and it ends up displaying "FIN NORMALE DU PROGRAMME"

Thank you in advance.

Hello,

You are right, I had a crash even with 2 processors. Actually in subroutine trisou.f (library telemac-3D), in the last loop :

DO I=1,NREJEU

......

ENDDO

we must add :

DO I=1,NREJEU
IF(ISCE(I).GT.0) THEN

......

ENDIF
ENDDO

otherwise wrong addresses in CV1 will be reached. Only sources of a given sub-domain must be treated by this sub-domain. A source is in the sub-domain when ISCE(I).GT.0

This will be corrected in the next version.

Thanks for pointing out this, and best regards,

Jean-Michel Hervouet

Hello,

I added the condition (IF...ENDIF) but the problem is still there.
The program crashes with 2 processors for me too.

Regards.

Hello,

Strange, actually this is a case without FORTRAN FILE, either you put the corrected subroutine in a FORTRAN FILE of the case (and add FORTRAN FILE : nameofthefile in your steering file), or if corrected in the library you have to recompile, so that the default executable is done.

Regards,

JMH

It runs...
Thank you Jean-Michel Hervouet.

Best regards.