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