ad_sisyphe_main_init.f

Go to the documentation of this file.

      SUBROUTINE ad_sisyphe_main_init

        USE declarations_special
        IMPLICIT NONE

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

      END SUBROUTINE ad_sisyphe_main_init