str_trimzero Function

public pure function str_trimzero(str) result(res)

Deletes nonsignificant trailing zeroes from number string str. If number string ends in a decimal point, one trailing zero is added.

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: str

Return Value character(len=:), allocatable