This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (FPCore (a b c) (/ (* c -2.0) (+ b (sqrt (+ (pow b 2.0) (* c (* a -4.0))))))) | |
| +-commutative | |
| [ 2, 2, 1 ] | |
| ltr | |
| ========================= | |
| (FPCore (a b c) (/ (* c -2.0) (+ b (sqrt (+ (* c (* a -4.0)) (pow b 2.0)))))) | |
| *-commutative | |
| [ 1 ] | |
| ltr | |
| ========================= |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| namespace NatList | |
| -- We define the set of NatLists: | |
| -- 1. nil is a NatList | |
| -- 2. If head is a Nat and tail is NatList | |
| -- then head :: tail is a NatList | |
| inductive NatList: Type | |
| | nil: NatList | |
| | cons (head : Nat) (tail : NatList) : NatList |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import unittest | |
| from collections.abc import Sequence | |
| from dataclasses import dataclass | |
| # TODO: path compression | |
| # TODO: reverse lookup | |
| @dataclass | |
| class Term: |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ;;; lean-mode.el --- Minimal Lean 4 mode with eglot and infoview -*- lexical-binding: t; -*- | |
| ;;; Commentary: | |
| ;; Bare minimum Lean 4 support using eglot for LSP and a side window for infoview | |
| ;;; Code: | |
| (require 'eglot) | |
| (require 'jsonrpc) |
OlderNewer