Initial commit
This commit is contained in:
commit
73512ccd77
5
.gitignore
vendored
Normal file
5
.gitignore
vendored
Normal file
|
@ -0,0 +1,5 @@
|
||||||
|
*.ibc
|
||||||
|
*.o
|
||||||
|
|
||||||
|
build/
|
||||||
|
*.*~
|
18
Main.idr
Normal file
18
Main.idr
Normal file
|
@ -0,0 +1,18 @@
|
||||||
|
module Main
|
||||||
|
|
||||||
|
import Data.NumIdr
|
||||||
|
|
||||||
|
|
||||||
|
||| A type for angles in radians.
|
||||||
|
public export
|
||||||
|
Angle : Type
|
||||||
|
Angle = Double
|
||||||
|
|
||||||
|
data Joint : Nat -> Type where
|
||||||
|
Revolute : Angle -> Angle -> Joint n
|
||||||
|
|
||||||
|
Robot : (n : Nat) -> Type
|
||||||
|
Robot n = List (Either (Joint n) (Vector n Double))
|
||||||
|
|
||||||
|
main : IO ()
|
||||||
|
main = putStrLn "Hello World!"
|
9
robotlib.ipkg
Normal file
9
robotlib.ipkg
Normal file
|
@ -0,0 +1,9 @@
|
||||||
|
package robotlib
|
||||||
|
version = 0.0
|
||||||
|
|
||||||
|
authors = "Kiana Sheibani"
|
||||||
|
license = "MIT"
|
||||||
|
|
||||||
|
langversion >= 0.5.1
|
||||||
|
|
||||||
|
depends = numidr >= 0.2.1
|
Loading…
Reference in a new issue