pr42186.f90 442 Bytes