 (defn full-graph [size]
   (apply simple-bigraph (for [x (range size) y (range size) :when (< x y)] [x y])))
 
+(defn rand-graph [size]
+  (apply simple-bigraph (for [x (range size) y (range size) :when (< x y) :when (> 0.4 (rand))] [x y])))
+
 
 (defn read-all
   ([] (read-all *in*))

     (take-while #(not= % eof) (repeatedly #(read input false eof))))))


(defn read-pairs [] (read-all *in*))
(defn read-simple [] (map vec (partition 2 (read-all *in*))))


(defn compute-print [print-cut? g]

  (:require [clojure.edn :as edn])
  (:gen-class))

(def __gecf-version__ "0.1.0") ;; not sure how to sync with project version

#_ "
basic code structure:
