Lines Matching defs:fMtxBlkDyeax
648 subroutine fMtxBlkDyeax( x, y, c, m, n ) subroutine
653 integer m, n local
654 real*8 x(n,m), y(n), c(m)
656 real*8 tmp1, tmp2, tmp3, tmp4
657 real*8 tmp5, tmp6, tmp7, tmp8
658 integer i, j, m1
668 1000 continue
676 2000 continue
685 3000 continue
696 4000 continue
708 5000 continue
722 6000 continue
737 7000 continue
754 8000 continue
762 8001 continue