grkuntzmd

Datomic.q(Query(
  s"""[:find ?name
   :in $$
   :where [_ :db/ident ?ident]
          [(namespace ?ident) ?ns]
          [(name ?ident) ?name]
          [(= ?ns "namespace_name")]
  ]"""
), database).foreach {
  case name: String => println(name)

grkuntzmd

[:find ?ns ?name
 :where [_ :db/ident ?ident]
        [(namespace ?ident) ?ns]
        [(name ?ident) ?name]
        [(= ?ns "namespace_name")]
]

grkuntzmd

Datomic.q(Query(
  s"""[:find ?ident
       :in $$
       :where [_ :db/ident ?ident]
              [(namespace ?ident) ?ns]
              [(= ?ns "namespace_name")]
      ]"""
), database).foreach {
  case ident: Keyword => println(ident)
}

grkuntzmd

import Debug.Trace
debug :: Show a => String -> a -> a
debug description value =
  trace (description ++ ": " ++ show value) value