module Debug.SimpleReflect.Vars
(
a,b,c,d,e,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z
, f,f',f'',g,h
, (⊗), (⊕), (@@)
) where
import Debug.SimpleReflect.Expr
a,b,c,d,e,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z :: Expr
[Expr
a,Expr
b,Expr
c,Expr
d,Expr
e,Expr
i,Expr
j,Expr
k,Expr
l,Expr
m,Expr
n,Expr
o,Expr
p,Expr
q,Expr
r,Expr
s,Expr
t,Expr
u,Expr
v,Expr
w,Expr
x,Expr
y,Expr
z]
= [String -> Expr
var [Char
letter] | Char
letter <- [Char
'a'..Char
'e']String -> String -> String
forall a. [a] -> [a] -> [a]
++[Char
'i'..Char
'z']]
f,f',f'',g,h :: FromExpr a => a
f :: forall a. FromExpr a => a
f = String -> a
forall a. FromExpr a => String -> a
fun String
"f"
f' :: forall a. FromExpr a => a
f' = String -> a
forall a. FromExpr a => String -> a
fun String
"f'"
f'' :: forall a. FromExpr a => a
f'' = String -> a
forall a. FromExpr a => String -> a
fun String
"f''"
g :: forall a. FromExpr a => a
g = String -> a
forall a. FromExpr a => String -> a
fun String
"g"
h :: forall a. FromExpr a => a
h = String -> a
forall a. FromExpr a => String -> a
fun String
"h"
(@@) :: Expr -> Expr -> Expr
@@ :: Expr -> Expr -> Expr
(@@) = Associativity -> Int -> String -> Expr -> Expr -> Expr
op Associativity
Infix Int
9 String
" @@ "
infix 9 @@
(⊗) :: Expr -> Expr -> Expr
⊗ :: Expr -> Expr -> Expr
(⊗) = Associativity -> Int -> String -> Expr -> Expr -> Expr
op Associativity
Infix Int
7 String
" ⊗ "
infix 7 ⊗
(⊕) :: Expr -> Expr -> Expr
⊕ :: Expr -> Expr -> Expr
(⊕) = Associativity -> Int -> String -> Expr -> Expr -> Expr
op Associativity
Infix Int
6 String
" ⊕ "
infix 6 ⊕