00001 module interface_minv 00002 implicit none 00003 interface 00004 subroutine minv(aa,bb,nn,nnz) 00005 integer :: nn, nnz 00006 real(8) :: aa(nnz,nnz),bb(nnz) 00007 end subroutine minv 00008 end interface 00009 end module interface_minv