Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer, | intent(in) | :: | value |
pure function integer2string(value)
! Convert an integer value to a 2-digit string with leading zero if required.
integer, intent(in) :: value
character(len=2) integer2string
write (integer2string,'(I2.2)') value
end function integer2string