pic_print_banner Subroutine

   subroutine pic_print_banner
    !! my cool banner, work in progress

      print *, "========================================"
      print *, "         _____  _____  _____ "
      print *, "        |  __ \\|_   _|/ ____|"
      print *, "        | |__) | | | | |     "
      print *, "        |  ___/  | | | |     "
      print *, "        | |     _| |_| |____ "
      print *, "        |_|    |_____|\\_____|"
      print *, "                                        "
      print *, "               PIC LIBRARY"
      print *, "========================================"
      !print '(4a)', &
      !   '   PIC compiled with ', &
      !   compiler_version()
      !print '(4a)', ' using the options ',        &
      !  compiler_options()

   end subroutine pic_print_banner