sphpts.f 1.1 KB