sets various attributes of the given logger
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(dbcsr_logger_type), | POINTER | :: | logger |
the logger you want to change |
||
character(len=*), | intent(in), | optional | :: | local_filename |
the root of the name of the file used for local logging the root of the name of the file used for global logging |
|
character(len=*), | intent(in), | optional | :: | global_filename |
the root of the name of the file used for local logging the root of the name of the file used for global logging |
SUBROUTINE dbcsr_logger_set(logger, local_filename, global_filename)
!! sets various attributes of the given logger
TYPE(dbcsr_logger_type), POINTER :: logger
!! the logger you want to change
CHARACTER(len=*), INTENT(in), OPTIONAL :: local_filename, global_filename
!! the root of the name of the file used for local logging
!! the root of the name of the file used for global logging
CHARACTER(len=*), PARAMETER :: routineN = 'dbcsr_logger_set', &
routineP = moduleN//':'//routineN
IF (.NOT. ASSOCIATED(logger)) &
DBCSR_ABORT(routineP//" unassociated logger")
IF (PRESENT(local_filename)) logger%local_filename = local_filename
IF (PRESENT(global_filename)) logger%global_filename = global_filename
END SUBROUTINE dbcsr_logger_set