(* * 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
¤ Dauer der Verarbeitung: 0.12 Sekunden
(vorverarbeitet)
¤
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
