add_trailing Module Subroutine

public pure module subroutine add_trailing(chr, trail)

Add a trailing character trail to the character chr if it is not already the last character

Arguments

Type	Intent	Optional	Attributes		Name
character(len=:),	intent(inout),		allocatable	::	chr
character(len=*),	intent(in)			::	trail