INTERFACE
SUBROUTINE SUECRADL
!USE MPL_MODULE
END SUBROUTINE SUECRADL
END INTERFACE