!@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
!     SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS 
!     SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS
!     SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS - SUBROTINAS
!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
      SUBROUTINE LOGO
!
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'            ,,,,,,                                                 '
      WRITE(*,*)'        o#"9MMHb":´-,o,                                            '
      WRITE(*,*)'     .oH":HH$´ "´ " -*R&o,        _____   _  _   _    _   ___      '       
      WRITE(*,*)'    dMMM*""´´      .oM"HM?.      |_   _| | || | | \\  / | | _ )    '
      WRITE(*,*)'  ,MMM´          "HLbd< ?&H].      | |   | __ | | |\\/| | | _ \\   '
      WRITE(*,*)' .:MH ."`          ` MM  MM&b.     |_|   |_||_| |_|  |_| |___/     '
      WRITE(*,*)'. "*H    -        &MMMMMMMMMH:                                     '
      WRITE(*,*)'.    dboo        MMMMMMMMMMMM.                /\\                  '
      WRITE(*,*)'.   dMMMMMMb      *MMMMMMMMMP.               /||\\                 '
      WRITE(*,*)'.    MMMMMMMP        *MMMMMP .                ||                   '
      WRITE(*,*)'    `#MMMMM           MM6P  ,                \\||/                 '
      WRITE(*,*)' "    `MMMP"           HM*`,                  \\/                  '
      WRITE(*,*)'  "    :MM             .- ,                                        '
      WRITE(*,*)'   ".   `#?..  .       ..´         ___    ___   ___    __  __      '
      WRITE(*,*)'      -.   .         .-           | _ )  | __| / __|  |  \\/  |    '
      WRITE(*,*)'        "-.oo,oo.-""              | _ \\  |__|  \\__ \\  | |\\/| | '
      WRITE(*,*)'                                  |___/  |___| |___/  |_|  |_|     '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'   Brazilian Earth System Model Development Team                   '
      WRITE(*,*)'   inpe.br/besm                                                    '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'   Create: 20200818 02:09:00                                       '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'                                                                   ' 
!
!----------------------------------------------------------------------------------
! WELCOME TO THMB - Terretrial Hydrology Model with Biochemistry
!----------------------------------------------------------------------------------
!
      WRITE(*,*)'-------------------------------------------------------------------'
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'   WELCOME TO THMB - Terretrial Hydrology Model with Biochemistry  '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'                  ---   START RUN  ---                             '
      WRITE(*,*)'                                                                   '
      WRITE(*,*)'-------------------------------------------------------------------'
!
      CALL SLEEP(2)
      RETURN
      END SUBROUTINE LOGO
!%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%