Type | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|
type(string) | :: | astring |
program volatile_doctest
use stringifor_string_t
type(string) :: astring
astring = 'Hello World! '
print "(L1)", astring%len_trim()==len_trim('Hello World! ')
endprogram volatile_doctest