Small fixes for "pedantic" compilation

LAXlib/la_helper.f90

@@ -773,6 +773,14 @@ END SUBROUTINE laxlib_multi_init_desc_x
       DEALLOCATE(work_d)
 #endif
 #else
+      IMPLICIT NONE
+      include 'laxlib_kinds.fh'
+      INTEGER  :: m
+      REAL(DP) :: rhos(:,:)
+      REAL(DP) :: rhod(:)
+      REAL(DP) :: s(:,:)
+      INTEGER  :: info
+      !
       CALL lax_error__( ' laxlib diagonalize_serial_gpu ', ' not compiled in this version ', 0 )
 #endif
    END SUBROUTINE

Modules/lmdif.f90

@@ -77,7 +77,7 @@ MODULE lmdif_module
       DOUBLEPRECISION x (n), fvec (m)
       EXTERNAL fcn
       ! internal variables
-      INTEGER ipvt(n), maxfev
+      INTEGER ipvt(n), maxfev, mode
       DOUBLEPRECISION qtf(n), fjac(m,n), diag(n)
       DOUBLEPRECISION wa1 (n), wa2(n), wa3(n), wa4(m)
       INTEGER iwa (n), nprint, nfev

Modules/parser.f90

@@ -17,7 +17,6 @@ MODULE parser
   PRIVATE
   !
   PUBLIC :: parse_unit, field_count, read_line, get_field
-  PUBLIC :: version_parse, version_compare
   !
   INTEGER :: parse_unit = 5 ! normally 5, but can be set otherwise
   !