Module SMat_Module
USE Numeric_Kinds_Module
Implicit None
Save

COMPLEX(dp),ALLOCATABLE :: smat_store(:,:)

End Module SMat_Module