Converts an integer to a string according to the format provided in the logger.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=int_k), | intent(in) | :: | val | |||
type(tem_logging_type), | intent(in), | optional | :: | logger |
function tem_i2str( val, logger ) result(str) ! --------------------------------------------------------------------------- !> integer(kind=int_k), intent(in) :: val !> type(tem_logging_type), optional, intent(in) :: logger !> character(len=SolSpecLen) :: str ! --------------------------------------------------------------------------- character(len=form_len) :: form ! --------------------------------------------------------------------------- if (present(logger)) then form = logger%int_form else form = primary%int_form end if write(str, '(' // trim(form) // ')') val end function tem_i2str