pr42050.f90 779 Bytes