remove_trailing_zeros Subroutine

public subroutine remove_trailing_zeros(str)

Remove trailing zeros from decimal representation

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	str