intrinsic_trim.f90 448 Bytes