pr52608.f90 484 Bytes