 results_table(DATA)
 add_card(add_image, "image", "#logo_image")(DATA)
 add_card(add_youtube, "youtube", "#youtube")(DATA)
-card_images(DATA)
-card_charts(DATA)
+add_card_col(add_image, "image", id)(DATA)
+add_card_col(add_chart, "line", take_data)(DATA)

  sequence(
    (x) -> x.data,
    filter((x) -> x.type is type),
    take_,
    select_tag(tag),
  )


add_card = (addf, type, tag) ->
  ### Constuct a data card

  Args:

    a function to build the card
  ###
  sequence(
    card_bind(type, tag, take_func=take_func),
    with_div,
    build_card(addf)
  )


update_data = (x) ->
