Annwan
2 years ago
6 changed files with 159 additions and 0 deletions
-
2.gitignore
-
30LICENSE
-
37lcalc.cabal
-
14src/LCalc/Term.hs
-
10src/Main.hs
-
66stack.yaml
@ -0,0 +1,2 @@ |
|||||
|
/.stack-work |
||||
|
/stack.yaml.lock |
@ -0,0 +1,30 @@ |
|||||
|
Copyright Annwan (c) 2023 |
||||
|
|
||||
|
All rights reserved. |
||||
|
|
||||
|
Redistribution and use in source and binary forms, with or without |
||||
|
modification, are permitted provided that the following conditions are met: |
||||
|
|
||||
|
* Redistributions of source code must retain the above copyright |
||||
|
notice, this list of conditions and the following disclaimer. |
||||
|
|
||||
|
* Redistributions in binary form must reproduce the above |
||||
|
copyright notice, this list of conditions and the following |
||||
|
disclaimer in the documentation and/or other materials provided |
||||
|
with the distribution. |
||||
|
|
||||
|
* Neither the name of Annwan nor the names of other |
||||
|
contributors may be used to endorse or promote products derived |
||||
|
from this software without specific prior written permission. |
||||
|
|
||||
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
||||
|
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
||||
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR |
||||
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT |
||||
|
OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
||||
|
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
||||
|
LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
||||
|
DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
||||
|
THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
||||
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
||||
|
OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
@ -0,0 +1,37 @@ |
|||||
|
name: lcalc |
||||
|
version: 0.1.0.0 |
||||
|
-- synopsis: |
||||
|
-- description: |
||||
|
homepage: https://git.annnwan.me/annwan/lcal |
||||
|
license: BSD3 |
||||
|
license-file: LICENSE |
||||
|
author: Annwan |
||||
|
maintainer: annwan@annwan.me |
||||
|
copyright: 2023 Annwan |
||||
|
build-type: Simple |
||||
|
cabal-version: >=1.10 |
||||
|
extra-source-files: README.md |
||||
|
|
||||
|
|
||||
|
executable lcalc |
||||
|
hs-source-dirs: src |
||||
|
main-is: Main.hs |
||||
|
default-language: Haskell2010 |
||||
|
build-depends: base >= 4.7 && < 5 |
||||
|
, lcalc |
||||
|
ghc-options: -Wall |
||||
|
-Wcompat |
||||
|
-Widentities |
||||
|
-Wincomplete-record-updates |
||||
|
-Wincomplete-uni-patterns |
||||
|
-Wmissing-export-lists |
||||
|
-Wmissing-home-modules |
||||
|
-Wpartial-fields |
||||
|
-Wredundant-constraints |
||||
|
|
||||
|
library |
||||
|
hs-source-dirs: src |
||||
|
exposed-modules: LCalc.Term |
||||
|
build-depends: base >= 4.7 && < 5 |
||||
|
, text |
||||
|
default-language: Haskell2010 |
@ -0,0 +1,14 @@ |
|||||
|
{-# LANGUAGE OverloadedStrings #-} |
||||
|
|
||||
|
module LCalc.Term where |
||||
|
|
||||
|
data Term = Variable String |
||||
|
| Abstraction String Term |
||||
|
| Application Term Term |
||||
|
|
||||
|
instance Show Term where |
||||
|
show (Variable name) = name |
||||
|
show (Abstraction var term) = "(λ" ++ var ++ "." ++ show term ++ ")" |
||||
|
show (Application t1 t2) = "(" ++ show t1 ++ " " ++ show t2 ++ ")" |
||||
|
|
||||
|
|
@ -0,0 +1,10 @@ |
|||||
|
module Main (main) where |
||||
|
|
||||
|
import LCalc.Term |
||||
|
|
||||
|
t :: Term |
||||
|
t = Abstraction "x" (Application (Variable "x") (Variable "x")) |
||||
|
|
||||
|
main :: IO () |
||||
|
main = putStrLn $ show t |
||||
|
|
@ -0,0 +1,66 @@ |
|||||
|
# This file was automatically generated by 'stack init' |
||||
|
# |
||||
|
# Some commonly used options have been documented as comments in this file. |
||||
|
# For advanced use and comprehensive documentation of the format, please see: |
||||
|
# https://docs.haskellstack.org/en/stable/yaml_configuration/ |
||||
|
|
||||
|
# Resolver to choose a 'specific' stackage snapshot or a compiler version. |
||||
|
# A snapshot resolver dictates the compiler version and the set of packages |
||||
|
# to be used for project dependencies. For example: |
||||
|
# |
||||
|
# resolver: lts-3.5 |
||||
|
# resolver: nightly-2015-09-21 |
||||
|
# resolver: ghc-7.10.2 |
||||
|
# |
||||
|
# The location of a snapshot can be provided as a file or url. Stack assumes |
||||
|
# a snapshot provided as a file might change, whereas a url resource does not. |
||||
|
# |
||||
|
# resolver: ./custom-snapshot.yaml |
||||
|
# resolver: https://example.com/snapshots/2018-01-01.yaml |
||||
|
resolver: lts-20.8 |
||||
|
|
||||
|
# User packages to be built. |
||||
|
# Various formats can be used as shown in the example below. |
||||
|
# |
||||
|
# packages: |
||||
|
# - some-directory |
||||
|
# - https://example.com/foo/bar/baz-0.0.2.tar.gz |
||||
|
# subdirs: |
||||
|
# - auto-update |
||||
|
# - wai |
||||
|
packages: |
||||
|
- . |
||||
|
# Dependency packages to be pulled from upstream that are not in the resolver. |
||||
|
# These entries can reference officially published versions as well as |
||||
|
# forks / in-progress versions pinned to a git hash. For example: |
||||
|
# |
||||
|
# extra-deps: |
||||
|
# - acme-missiles-0.3 |
||||
|
# - git: https://github.com/commercialhaskell/stack.git |
||||
|
# commit: e7b331f14bcffb8367cd58fbfc8b40ec7642100a |
||||
|
# |
||||
|
# extra-deps: [] |
||||
|
|
||||
|
# Override default flag values for local packages and extra-deps |
||||
|
# flags: {} |
||||
|
|
||||
|
# Extra package databases containing global packages |
||||
|
# extra-package-dbs: [] |
||||
|
|
||||
|
# Control whether we use the GHC we find on the path |
||||
|
# system-ghc: true |
||||
|
# |
||||
|
# Require a specific version of stack, using version ranges |
||||
|
# require-stack-version: -any # Default |
||||
|
# require-stack-version: ">=2.9" |
||||
|
# |
||||
|
# Override the architecture used by stack, especially useful on Windows |
||||
|
# arch: i386 |
||||
|
# arch: x86_64 |
||||
|
# |
||||
|
# Extra directories used by stack for building |
||||
|
# extra-include-dirs: [/path/to/dir] |
||||
|
# extra-lib-dirs: [/path/to/dir] |
||||
|
# |
||||
|
# Allow a newer minor version of GHC than the snapshot specifies |
||||
|
# compiler-check: newer-minor |
Write
Preview
Loading…
Cancel
Save
Reference in new issue