Searched refs:lentrim1 (Results 1 – 2 of 2) sorted by relevance
169 integer :: lentrim1 = len_trim("xxyybc ",KIND=4) variable217 result(16) = lentrim1
396 integer :: lentrim1 = len_trim("xxyybc ") variable684 result(151) = lentrim1