outputRoutineStatus Subroutine

subroutine outputRoutineStatus(ui, routine, status)

Arguments

Type IntentOptional Attributes Name
integer :: ui
character(len=*) :: routine
character(len=*) :: status