<commit_before>(ns babel.test.it
  (:refer-clojure :exclude [get-in])
  (:require
   [babel.directory :refer [models]]
   [babel.generate :as generate]
   [babel.italiano :as italiano :refer [analyze fo-ps generate medium morph
                                        np-grammar parse preprocess small]]
   [babel.italiano.grammar :as grammar :refer [model]]
   [babel.italiano.morphology :as morph :refer [analyze-regular]]
   [babel.italiano.morphology.nouns :as nouns]
   [babel.italiano.morphology.verbs :as verbs]
   #?(:cljs [babel.logjs :as log])
   [babel.over :as over]
   #?(:clj [clojure.test :refer [deftest is]])
   #?(:cljs [cljs.test :refer-macros [deftest is]])
   #?(:clj [clojure.tools.logging :as log])
   #?(:clj [clojure.repl :refer [doc]])
   [clojure.string :as string]
   [clojure.set :as set]
   [dag_unify.core :refer [copy fail? get-in strip-refs unify]]))

(deftest analyze-1
  (let [singular (analyze "compito")
        plural  (analyze "compiti")]
    (is (not (empty? singular)))
    (is (not (empty? plural)))))

(deftest analyze-2
  (let [singular (analyze "difficile")
        plural  (analyze "difficili")]
    (is (not (empty? singular)))
    (is (not (empty? plural)))))

(deftest analyze-3
  (is (not (empty? (analyze "svegliata")))))

(deftest present-irregular
  (let [result (generate {:synsem {:subcat []
                                   :cat :verb
                                   :sem {:pred :be
                                         :subj {:pred :I}
                                         :aspect :simple<commit_msg>use medium grammar only<commit_after>(ns babel.test.it
  (:refer-clojure :exclude [get-in])
  (:require
   [babel.directory :refer [models]]
   [babel.generate :as generate]
   [babel.italiano :as italiano :refer [analyze fo-ps generate medium morph
                                        np-grammar parse preprocess]]
   [babel.italiano.grammar :as grammar :refer [model]]
   [babel.italiano.morphology :as morph :refer [analyze-regular]]
   [babel.italiano.morphology.nouns :as nouns]
   [babel.italiano.morphology.verbs :as verbs]
   #?(:cljs [babel.logjs :as log])
   [babel.over :as over]
   #?(:clj [clojure.test :refer [deftest is]])
   #?(:cljs [cljs.test :refer-macros [deftest is]])
   #?(:clj [clojure.tools.logging :as log])
   #?(:clj [clojure.repl :refer [doc]])
   [clojure.string :as string]
   [clojure.set :as set]
   [dag_unify.core :refer [copy fail? get-in strip-refs unify]]))

(defn small []
  (medium))

(deftest analyze-1
  (let [singular (analyze "compito")
        plural  (analyze "compiti")]
    (is (not (empty? singular)))
    (is (not (empty? plural)))))

(deftest analyze-2
  (let [singular (analyze "difficile")
        plural  (analyze "difficili")]
    (is (not (empty? singular)))
    (is (not (empty? plural)))))

(deftest analyze-3
  (is (not (empty? (analyze "svegliata")))))

(deftest present-irregular
  (let [result (generate {:synsem {:subcat []
                                   :cat :verb
                                   :sem {:pred :be
                                         :subj {:pred :I}
                                         :aspect :simple
{'fraction_non_alphanumeric': 0.15069356872635561, 'fraction_numerical': 0.0018915510718789407, 'mean_word_length': 2.38272921108742, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 14, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '83227', 'n_tokens_mistral': 1104, 'n_tokens_neox': 1084, 'n_words': 278}