fact: Fixpoint generic_h_iter (n : nat) : AQ := match n with | 0 => 0%C | 1 => 0%C | 2 => cast 1445%coqZ %/ cast 73%coqZ | m.+1 => let mz := cast m in let res_m := generic_h_iter m in generic_h mz res_m end.
imports: BinInt mathcomp(all_ssreflect all_algebra) CoqEAL(hrel param refinements) CoqEAL(pos binnat rational) tactics rat_of_Z