INTERFACE
SUBROUTINE IFSODBDDR2F(KCMDDR2 ,KNSCLETH,KNSCLOTH,KNSMICTH)
USE PARKIND1 ,ONLY : JPIM ,JPRB
USE YOMCMA , ONLY : NMXDCL
INTEGER(KIND=JPIM),INTENT(INOUT) :: KCMDDR2(NMXDCL)
INTEGER(KIND=JPIM),INTENT(IN) :: KNSCLETH
INTEGER(KIND=JPIM),INTENT(IN) :: KNSCLOTH
INTEGER(KIND=JPIM),INTENT(IN) :: KNSMICTH
END SUBROUTINE IFSODBDDR2F
END INTERFACE
