package electrod
 sectionYPositions = computeSectionYPositions($el), 10)"
  x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
  >
  
  
  Formal analysis for the Electrod formal pivot language
Install
    
    dune-project
 Dependency
Authors
Maintainers
Sources
  
    
      electrod-0.8.0.tbz
    
    
        
    
  
  
  
    
  
  
    
  
        sha256=dd47a6d755dc80a9a75fa21bda7a6507316ca2a33f7201d25ee9ba01d902a6a2
    
    
  sha512=abc8bb1194df32bfe3c00f499dd989868c9ad208c8c7401085b9c18e87890eae1c087dbbb9bf128f95f4e759de27e1d7a6d6b2f7a5e6a9b000b469d72c77b87a
    
    
  doc/electrod.libelectrod/Libelectrod/Gen_goal/index.html
Module Libelectrod.Gen_goalSource
Implements the type for concrete (Raw) and abstract (Ast) syntax trees, before inference of De Bruijn indices and simplification into Elo trees.
Source
and ('v, 'i) prim_fml = private - | True
- | False
- | Qual of rqualify * ('v, 'i) exp
- | RComp of ('v, 'i) exp * comp_op * ('v, 'i) exp
- | IComp of ('v, 'i) iexp * icomp_op * ('v, 'i) iexp
- | LUn of lunop * ('v, 'i) fml
- | LBin of ('v, 'i) fml * lbinop * ('v, 'i) fml
- | Quant of quant * ('v, 'i) sim_binding list * ('v, 'i) block
- | Let of ('v, 'i) binding list * ('v, 'i) block
- | FIte of ('v, 'i) fml * ('v, 'i) fml * ('v, 'i) fml
- | Block of ('v, 'i) block
Source
val pp : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  Format.formatter ->
  ('a, 'b) t ->
  unitSource
val pp_prim_fml : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  Format.formatter ->
  ('a, 'b) prim_fml ->
  unitSource
val pp_sim_binding : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  ('a, 'b) sim_binding Fmtc.tSource
val pp_prim_exp : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  Format.formatter ->
  ('a, 'b) prim_exp ->
  unitSource
val pp_iexp : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  Format.formatter ->
  ('a, 'b) iexp ->
  unitSource
val pp_prim_iexp : 
  'a Fmtc.t ->
  (Format.formatter -> 'b -> unit) ->
  Format.formatter ->
  ('a, 'b) prim_iexp ->
  unit sectionYPositions = computeSectionYPositions($el), 10)"
  x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
  >