info Subroutine

public subroutine info(str)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: str

Source Code

   subroutine info (str)
      implicit none
      character(*), intent(in) :: str

      write(stderr, '(a)') "[info]: "//str
   end subroutine info