 (ns hydrofoil.evolution
-  (:require [hydrofoil.utils :refer :all]))
+  (:require [hydrofoil.utils :refer :all]
+            [hydrofoil.Model.Thin_Aerofoil_Theory :as TAT]
+            [hydrofoil.Model.Lifting_Line_Theory :as LLT]))
 
 
 (defn upper-bound-check

                 (rand-double (p-min t-value) 9)
                 t-value)))






  (let [exploration-factor 30 ;;; Doesn't do anything yet. hopefully will change m, p, and t, exp-factors.
        ;;; how far you can go from the parent value
        m-exp-factor 10
        p-exp-factor 10
        t-exp-factor 10
        ;;; the numerical values of the upper limits
        m-upper-bound (upper-bound-check (+ m-exp-factor (parent :max-camber)) 9.5)
