    MODULE CUINIT
!--------------------------------------------------------------------------------------------------
! USE MODULES: F77KINDS
!
! DRIVER     : CHKOUT
!              INIT
!              INITS
!              RADTN
!--------------------------------------------------------------------------------------------------
    USE F77KINDS
! 
    IMPLICIT NONE
!
    SAVE
!
    LOGICAL(KIND=L4KIND)                                                                        ::&
    & CURAD
!
    END MODULE CUINIT
