swh:1:snp:f92f30fa3090eae65efe8d40c3d27dad22819990
Tip revision: 3a2ef0e579ea8676231cce0387a17e59ea41e0b7 authored by Pierre-Yves Strub on 11 January 2021, 14:04:57 UTC
Add debug mark
Add debug mark
Tip revision: 3a2ef0e
ecField.mli
(* --------------------------------------------------------------------
* Copyright (c) - 2012--2016 - IMDEA Software Institute
* Copyright (c) - 2012--2018 - Inria
* Copyright (c) - 2012--2018 - Ecole Polytechnique
*
* Distributed under the terms of the CeCILL-C-V1 license
* -------------------------------------------------------------------- *)
(* -------------------------------------------------------------------- *)
open EcRing
open EcBigInt
(* -------------------------------------------------------------------- *)
type fexpr =
| FEc of c
| FEX of int
| FEadd of fexpr * fexpr
| FEsub of fexpr * fexpr
| FEmul of fexpr * fexpr
| FEopp of fexpr
| FEinv of fexpr
| FEdiv of fexpr * fexpr
| FEpow of fexpr * zint
type linear = (pexpr * pexpr * (pexpr list))
(* -------------------------------------------------------------------- *)
val fnorm : fexpr -> linear