SHA-256: Difference between revisions

→‎Pure Raku: shortening a bit
m (BaCon and BBC BASIC moved to the BASIC section.)
(→‎Pure Raku: shortening a bit)
Line 3,087:
my uint32 ($T1, $T2) =
$h[7] + Σ1($h[4]) + Ch(|$h[4..6])
+ (constant @ =BEGIN init(* **(1/3))[^64])[$j] +
(
(state buf32 $w .= new)[$j] = $j < 16 ?? $block[$j] !!
Line 3,093:
),
Σ0($h[0]) + Maj(|$h[0..2]);
blob32.new: $T1 + $T2, |$h[0], $h[1], $h[..2], $h[3] + $T1, |$h[4], $h[5], $h[..6];
}, $H, |^64;
},
(constant @ =BEGIN init(&sqrt)[^8]),
|blob32.new(
blob8.new(
1,934

edits