¿Cómo utilizar la función de caracteres de donde el resultado es de longitud desconocida inicialmente?

lostrim() Entiendo que la función muestra que es posible no especificar la longitud de la cadena de retorno.

Por ejemplo:

write (*,*) trim(str)

devolverá solo una parte de la cadena sin espacios finales.

Esta función no tiene idea de la longitud de la cadena de retorno antes de la llamada.

Otrim() la función tiene limitaciones?

En más variante es encontrar el código original detrim() función.

He encontrado (Cadena de caracteres de longitud desconocida en fortran) pero no es la respuesta a mi pregunta.

Para estar seguro, quiero escribir la función, que devuelve la cadena por número entero.

Algo como esto:

function strByInt(myInt)
...
write (strByInt,fmt) myInt; return
end function strByInt

somewhere else:

write (*,*) strByInt(50) ! will write '50'