Hi,
Finally I think I found the reason why if I set "COHESIVE SEDIMENTS" to YES then it didn't give the result. I looked at the code in the 'telemac2d.f' and I found this code block:
!=======================================================================
!
! COUPLING WITH SISYPHE
!
IF(INCLUS(COUPLING,'SISYPHE')) THEN
!
CALL CONFIG_CODE(2)
WRITE(LU,*) 'I AM HERE AT LINE 2135',SUSP1,CHARR,PERCOU,LT
!
!RK IF(SUSP1.OR.(CHARR.AND.(PERCOU*((LT-1)/PERCOU).EQ.LT-1))) THEN
IF(SUSP1.OR.(CHARR.AND.(PERCOU*(LT/PERCOU).EQ.LT))) THEN
!
IF(DEBUG.GT.0) WRITE(LU,*) 'APPEL DE SISYPHE, CHARRIAGE'
CALL SISYPHE(1,LT,LEOPRD_CHARR,LISPRD,NIT,U,V,H,HN,ZF,
& CF,CF,CHESTR,CONSTFLOW_SIS,NSIS_CFD,SISYPHE_CFD,
& CODE1,PERCOU,U,V,AT,VISC,DT*PERCOU,CHARR,SUSP1,
& FLBOR,SOLSYS,DM1,USIS,VSIS,ZCONV)
IF(DEBUG.GT.0) WRITE(LU,*) 'FIN APPEL SISYPHE, CHARRIAGE'
!
ENDIF
!
IF(SUSP.AND.PERCOU.NE.1) THEN
!
IF(DEBUG.GT.0) WRITE(LU,*) 'APPEL DE SISYPHE, SUSPENSION'
CALL SISYPHE(1,LT,LEOPRD,LISPRD,NIT,U,V,H,HN,ZF,
& CF,CF,CHESTR,CONSTFLOW_SIS,NSIS_CFD,SISYPHE_CFD,
& CODE1,1,U,V,AT,VISC,DT,CHARR_TEL,SUSP,
& FLBOR,SOLSYS,DM1,USIS,VSIS,ZCONV)
IF(DEBUG.GT.0) WRITE(LU,*) 'FIN APPEL DE SISYPHE, SUSPENSION'
!
ENDIF
!
CALL CONFIG_CODE(1)
!
ENDIF
!
!=======================================================================
Take my steering file (attached in the above post) for example.
For the Non-cohesive case, SUSP1=FALSE, so CHARR has to be TRUE which means the BED LOAD=YES, and (PERCOU*(LT/PERCOU).EQ.LT) will always remain TRUE. Then TELEMAC2D will 'APPEL DE SISYPHE, CHARRIAGE'.
For the Cohesive case, keyword 'BED LOAD' has been set to NO automatically, so SUSP1=FALSE, CHARR=FALSE, SUSP=TRUE, but since I chose PERCOU=1 (Coupling Period = 1), the condition (SUSP.AND.PERCOU.NE.1) was not satisfied. SISYPHE will not be called in either way.
So no matter COHESIVE SEDIMENTS was set to YES or NO, SISYPHE will only be called when BED LOAD = YES.
My question is that
1. What's the difference between SUSP1 and SUSP? Why SUSP1 always remains FALSE?
2. In the Cohesive case, why the coupling period (PERCOU) can't be 1?
Thanks in advance!