Searched refs:Hbyte (Results 1 – 4 of 4) sorted by relevance
93 my $Hbyte = (8 * $H) / 2;95 $Hbyte = 7.0 if $Hbyte > 7.0;97 $Hbyte = sprintf("%.02f", $Hbyte + 0.005);98 if ($Hbyte < 1.0) {100 print "Config: ONLY $Hbyte BITS PER OUTPUT BYTE!\n";105 $Hbyte = "1.00";107 print "Config: choosing $Hbyte bits per output byte\n";119 s/^(my \$_entropy_per_byte =).*/$1 $Hbyte;/;
19 Hbyte,Lbyte:byte;28 Hbyte := byte(Src^);84 code:= $eeb8 + (157 * (Hbyte-$81)) ;93 code:= $e311 + (157 * (Hbyte-$8e));102 code:= $f672 + (157 * (Hbyte-$c6)) ;111 code:= $e000 + (157 * (Hbyte-$fa)) ;
24 Hbyte,Lbyte:byte;33 Hbyte := byte(Src^);89 code:= $eeb8 + (157 * (Hbyte-$81)) ;98 code:= $e311 + (157 * (Hbyte-$8e));107 code:= $f672 + (157 * (Hbyte-$c6)) ;116 code:= $e000 + (157 * (Hbyte-$fa)) ;