roam/render examples

• 
  (defn show-refs [component n x]
  [:div  
   (doall (for [y (take @n (:block/_refs @x))]
    [component y]))]
    )
  
  (defn my-item [data]
      [:div.bp3-card (:block/string data)]
    )
  
  (defn my-random-generator [{:keys [:block/uid] :as this-block} n v]     
    (let [my-local-string (r/atom v)
            my-local-number (r/atom (js/parseInt n))]
        (fn [this-block n v]
              [:div.bp3-card 
               "I am a div"
  
               ""
               (pr-str v)
               [counter my-local-number]
               [controlled-input my-local-string]
              
               [show-refs my-item 
                my-local-number 
                (*pull-refs [:node/title @my-local-string])]
               ])))