mirror of
https://github.com/Noratrieb/idris-learning.git
synced 2026-01-15 21:45:01 +01:00
more
This commit is contained in:
parent
b9c358c622
commit
5a58f22743
2 changed files with 34 additions and 0 deletions
11
projects/Brainfuck.idr
Normal file
11
projects/Brainfuck.idr
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
module Brainfuck
|
||||
|
||||
import Data.Vect
|
||||
|
||||
data Memory = End
|
||||
| Value Memory Int Memory
|
||||
|
||||
|
||||
emptyMemory : Nat -> Memory
|
||||
emptyMemory Z = End
|
||||
emptyMemory S(k) = Value 0 (emptyMemory k)
|
||||
Loading…
Add table
Add a link
Reference in a new issue