      MODULE lodcslmpi_I
      INTERFACE
!...Translated by Pacific-Sierra Research 77to90  4.3E  14:04:58   1/ 3/07
!...Modified by Charlotte Froese Fischer
!                     Gediminas Gaigalas  10/05/17
      SUBROUTINE lodcslmpi (nfile, ncore, jblock)
      INTEGER :: nfile, ncore, jblock
      END SUBROUTINE
      END INTERFACE
      END MODULE
