swh:1:snp:960b089228f647a5f611503985d0a438173f35bc
Raw File
Tip revision: c44174dfe2349167774459e3b28424f99a6b8fcb authored by Christian Doczkal on 08 December 2021, 16:20:51 UTC
eager random oracle for unit domain (single random variable)
Tip revision: c44174d
ecPhlDeno.mli
(* --------------------------------------------------------------------
 * Copyright (c) - 2012--2016 - IMDEA Software Institute
 * Copyright (c) - 2012--2021 - Inria
 * Copyright (c) - 2012--2021 - Ecole Polytechnique
 *
 * Distributed under the terms of the CeCILL-C-V1 license
 * -------------------------------------------------------------------- *)

(* -------------------------------------------------------------------- *)
open EcUtils
open EcParsetree
open EcFol
open EcCoreGoal.FApi

(* -------------------------------------------------------------------- *)
val t_phoare_deno : form -> form -> backward
val t_equiv_deno  : form -> form -> backward

(* -------------------------------------------------------------------- *)
type denoff = ((pformula option) tuple2) gppterm * bool * pformula option

val process_deno : [`PHoare | `Equiv] -> denoff -> backward
back to top