2016 Update

This commit is contained in:
Tina Müller 2016-12-05 22:15:40 +01:00
parent 948b86eafa
commit dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions

View file

@ -1,31 +1,38 @@
function array-mult($A, $B) {
$C = @()
if($n -gt 0) {
$C = 0..($n-1)| foreach{@(0)}
0..($n-1)| foreach{
$i = $_
$C[$i] = 0..($n-1)| foreach{
$j = $_
$((0..($n-1) | foreach{
$k = $_
$A[$i][$k]*$B[$k][$j]
} | measure -Sum).Sum)
function multarrays($a, $b) {
$c = @()
if($a -and $b) {
$n = $a.count - 1
$m = $b[0].count - 1
$c = @(0)*($n+1)
foreach ($i in 0..$n) {
$c[$i] = foreach ($j in 0..$m) {
$sum = 0
foreach ($k in 0..$n){$sum += $a[$i][$k]*$b[$k][$j]}
$sum
}
}
}
$C
$c
}
function show($a) {
if($a.Count -gt 0) {
$n = $a.Count - 1
0..$n | foreach{ "$($a[$_][0..$n])" }
if($a) {
0..($a.count - 1) | foreach{ if($a[$_]){"$($a[$_])"}else{""} }
}
}
$A = @(@(1,2),@(3,4))
$B = @(@(5,6),@(7,8))
$I = @(@(1,0),@(0,1))
$C = array-mult $A $B
$D = array-mult $A $I
show $C
$a = @(@(1,2),@(3,4))
$b = @(@(5,6),@(7,8))
$c = @(5,6)
"`$a ="
show $a
""
"`$b ="
show $b
""
"`$c ="
$c
""
"`$a * `$b ="
show (multarrays $a $b)
" "
show $D
"`$a * `$c ="
show (multarrays $a $c)