(*
* This file defines our counter, which we use in the Count command.
*)
(*
* Our counter is simply a reference called "counter" to an integer.
*
* Summary.ref behaves like ref, but also registers a summary to Coq.
*)
let counter = Summary.ref ~name:"counter" 0
(*
* We can increment our counter:
*)
let increment () =
counter := succ !counter
(*
* We can also read the value of our counter:
*)
let value () =
!counter
| Messung V0.5 in Prozent |
|---|
| | | |
¤ Dauer der Verarbeitung: 0.13 Sekunden
(vorverarbeitet am 2026-09-29)
¤
*© Formatika GbR, Deutschland
