="+1">Purpose</FONT></B>
<PRE>
  To compute the matrix product

            C = alpha*op( T )*B + beta*C,

  where alpha and beta are scalars and T is a block Toeplitz matrix
  specified by its first block column TC and first block row TR;
  B and C are general matrices of appropriate dimensions.

</PRE>
<A name="Specification"><B><FONT SIZE="+1">Specification</FONT></B></A>
<PRE>
      SUBROUTINE MB02KD( LDBLK, TRANS, K, L, M, N, R, ALPHA, BETA,
     $                   TC, LDTC, TR, LDTR, B, LDB, C, LDC, 