Skip to content

Commit

Permalink
unnamed
Browse files Browse the repository at this point in the history
  • Loading branch information
yung-turabian committed Feb 8, 2025
1 parent 23b09a3 commit e62b243
Showing 1 changed file with 0 additions and 17 deletions.
17 changes: 0 additions & 17 deletions prelude.links
Original file line number Diff line number Diff line change
@@ -1,20 +1,3 @@

# Work on natural number type P.O.C.
# I liek this idea though
typename Nat =
[|Succ: Nat
|Zero
|];


# IDK what I'm doing here, simply experimenting with Links undocumented keywords.
# I probably should stick to just implementing in lib.ml for now
infixl 6 `plus`;
sig `plus` : (a::Numeric, a) -> a
op f `plus` g {
f + g
}

fun assert(ok, msg) {
if (not(ok)) debug("assertion failed: " ^^ msg) else ()
}
Expand Down

0 comments on commit e62b243

Please sign in to comment.