Walsh matrix: Difference between revisions
→{{header|jq}}
Line 845:
| .k = 1
| until (.k >= $n;
| .walsh[$i+$k][$j] = $wij
| .walsh[$i][$j+$k] = $wij
| .walsh[$i+$k][$j+$k] = -$wij ))
| .k += .k )
| .walsh ;
|