ad_sisyphe_initialisation_begin.f

Go to the documentation of this file.

      SUBROUTINE ad_sisyphe_initialisation_begin

        USE declarations_special
        IMPLICIT NONE

!       DEBUG IS NOT AVAILABLE HERE YET
!        IF(DEBUG.GT.0)
!     $      WRITE(LU,*) 'AD_SISYPHE_INITIALISATION_BEGIN [lib]'

      END SUBROUTINE ad_sisyphe_initialisation_begin