@@ 958-965 (lines=8) @@ | ||
955 | for ($k = 0; $k < $this->n; ++$k) { |
|
956 | $Bcolj[$k] = $B->A[$k][$j]; |
|
957 | } |
|
958 | for ($i = 0; $i < $this->m; ++$i) { |
|
959 | $Arowi = $this->A[$i]; |
|
960 | $s = 0; |
|
961 | for ($k = 0; $k < $this->n; ++$k) { |
|
962 | $s += $Arowi[$k] * $Bcolj[$k]; |
|
963 | } |
|
964 | $C->A[$i][$j] = $s; |
|
965 | } |
|
966 | } |
|
967 | ||
968 | return $C; |
|
@@ 976-982 (lines=7) @@ | ||
973 | if ($this->n == $B->m) { |
|
974 | $C = new self($this->m, $B->n); |
|
975 | for ($i = 0; $i < $C->m; ++$i) { |
|
976 | for ($j = 0; $j < $C->n; ++$j) { |
|
977 | $s = '0'; |
|
978 | for ($k = 0; $k < $C->n; ++$k) { |
|
979 | $s += $this->A[$i][$k] * $B->A[$k][$j]; |
|
980 | } |
|
981 | $C->A[$i][$j] = $s; |
|
982 | } |
|
983 | } |
|
984 | ||
985 | return $C; |