(17 . 7)(17 . 6)
858 ------------------------------------------------------------------------------
859 ------------------------------------------------------------------------------
860
861 with Words; use Words;
862 with FZ_Type; use FZ_Type;
863
864
(26 . 7)(25 . 7)
866 pragma Pure;
867
868 -- Find the index of eldest nonzero bit ( 0 if none, or 1 .. FZBitness )
869 function FZ_Measure(N : in FZ) return Word;
870 function FZ_Measure(N : in FZ) return FZBit_Index;
871 pragma Inline_Always(FZ_Measure);
872
873 end FZ_Measr;