satiate the linter (why am i doing this?)

Author: sbryngelson

src/post_process/m_lapack_example.f90

@@ -59,10 +59,10 @@ impure subroutine s_lapack_example_solve_linear_system()
         ! Call appropriate LAPACK routine based on precision
 #ifdef MFC_SINGLE_PRECISION
         call sgesv(n, nrhs, A, n, ipiv, x, n, info)
-        print *, "Using single precision LAPACK (SGESV)"
+        print *, "Using sing. prec. LAPACK (SGESV)"
 #else
         call dgesv(n, nrhs, A, n, ipiv, x, n, info)
-        print *, "Using double precision LAPACK (DGESV)"
+        print *, "Using doub. prec. LAPACK (DGESV)"
 #endif
 
         ! Check for success