st/pass_strategy_synthesis
1
0
Fork 0
mirror of https://codeberg.org/ProgramSnail/pass_strategy_synthesis.git synced 2025-12-16 00:48:43 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

start with template code https://github.com/Kakadu/OCanren-basic-template

Browse source
This commit is contained in:
ProgramSnail 2025-11-30 00:42:04 +03:00
parent f1433eb62d
commit 19b9d3aa56
9 changed files with 199 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

17
lib/lib.ml Normal file
View file

@ -0,0 +1,17 @@
open OCanren
module Lam = struct
[%%distrib
type nonrec ('varname, 'self) t =
| V of 'varname
| App of 'self * 'self
| Abs of 'varname * 'self
[@@deriving gt ~options:{ show; fmt; gmap }]
type ground = (GT.string, ground) t]
let varX = !!"x"
let varY = !!"y"
let varF = !!"f"
end