(
defn pos
[
ls elem
]
(
cond
(
empty? ls
)
-
1
(
=
(
first ls
)
elem
)
0
:
else
(
+
1
(
pos
(
rest ls
)
elem
)
)
)
)