SUBROUTINE DMXTyF(NRA,NCA,A,LDA,NRB,NCB,B,LDB,
     +NRC,NCC,C,LDC)
      IMPLICIT double precision (A-H,O-Z)
      DIMENSION A(LDA,NCA),B(LDB,NCB), C(LDc,NCC)
      DO 20 I=1,Nca
      DO 20 J=1,Ncb
      AA=0.0D0
      DO 10 L=1,nra
   10 AA=AA+A(L,I)*b(L,J)
   20 c(i,j)=AA
      RETURN
      END