package lambdapi
Proof assistant for the λΠ-calculus modulo rewriting
Install
Dune Dependency
Authors
Maintainers
Sources
lambdapi-2.4.1.tbz
sha256=221dff97ab245c49b7e6480fa2a3a331ab70eb86dd5d521e2c73151029bbb787
sha512=a39961bb7f04f739660a98a52981d4793709619cd21310ca6982ba78af81ef09e01c7517ee3b8b2687b09f7d2614d878c1d69494ca6ab8ef8205d240c216ce8a
doc/src/lambdapi.common/escape.ml.html
Source file escape.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
(** Escaped identifiers ["{|...|}"]. *) (** [is_escaped s] tells if [s] begins with ["{|"] and ends with ["|}"] without overlapping. For efficiency, we just test that it starts with ['{']. *) let is_escaped : string -> bool = fun s -> s <> "" && s.[0] = '{' (** [unescape s] removes ["{|"] and ["|}"] if [s] is an escaped identifier. *) let unescape : string -> string = fun s -> if is_escaped s then String.(sub s 2 (length s - 4)) else s (** [p] is assumed to be a regular identifier. If [n] is a regular identifier too, then [add_prefix p n] is just [p ^ n]. Otherwise, it is ["{|" ^ p ^ unescape n ^ "|}"]. *) let add_prefix : string -> string -> string = fun p n -> if is_escaped n then "{|" ^ p ^ unescape n ^ "|}" else p ^ n (** [s] is assumed to be a regular identifier. If [n] is a regular identifier too, then [add_suffix n s] is just [n ^ s]. Otherwise, it is ["{" ^ unescape n ^ s ^ "|}"]. *) let add_suffix : string -> string -> string = fun n s -> if is_escaped n then "{|" ^ unescape n ^ s ^ "|}" else n ^ s
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>