Lines Matching defs:fMtxBlkDmaxpy

791        subroutine fMtxBlkDmaxpy( x, y, c, m, n )  subroutine
796         integer m,      n  local
797         real*8  x(n,m), y(n),   c(m)
799         real*8  tmp1,   tmp2,   tmp3,   tmp4
800         real*8  tmp5,   tmp6,   tmp7,   tmp8
801         integer i,      j,      m1
811 1000    continue
819 2000    continue
828 3000    continue
839 4000    continue
851 5000    continue
865 6000    continue
880 7000    continue
899 8000    continue