Hello,
Thank you for your answer!
The restarted computation is now starting properly in hydrostatic with following modifications in source.f:
DO I=1,NPOIN3
IF(MESH3D%Y%R(I).GT.5550.D0.AND.MESH3D%X%R(I).GT.850.D0) THEN
! NORM=SQRT(UN3%R(I)**2+VN3%R(I)**2+WN3%R(I)**2)
NORM=SQRT(UN3%R(I)**2+VN3%R(I)**2)
S1U%R(I)=0.01D0*NORM
S1V%R(I)=0.01D0*NORM
! S1W%R(I)=0.01D0*NORM
ENDIF
ENDDO
The initial computation runs fine with my original version of source.f, including S1W%R(I)=0.01D0*NORM. But if I understand you right it should not be the case...
BUT, it now fails in CVDF3D for tracers after 5 iterations:
APPEL DE CVDF3D POUR TRACEUR 1
MURD3D: ITERATION NO. REACHED 100 , STOP.
ALFA = 1.0000000000000000
GUILTY POINT = 1
PLANTE: PROGRAM STOPPED AFTER AN ERROR
I already had this problem in the initial run and it was "fixed" by changing advection scheme for tracers to 14 or 5. I now have 5 in my cas file, 14 giving a poor mass balance. Any more tips?
Thank you in advance!
Best regards
PL