linpacks.f single precision source code for LINPACK