root = Card([header, revenueToday, comparison])
header = CardHeader("Morning Check-in", "Shop overview")
revenueToday = Card([revHeading, revKpi], "sunk")
revHeading = Heading("Revenue so far today", "h3")
revKpi = Table([metricCol, valueCol])
metricCol = Col("Metric", ["Revenue", "Orders", "Avg order"])
valueCol = Col("Value", ["$1,240", "86", "$14.42"])
comparison = Card([compHeading, compChart, compNote], "sunk")
compHeading = Heading("vs. same time yesterday", "h3")
compChart = BarChart(["Today", "Yesterday"], [revSeries], "grouped", "Day", "Revenue")
revSeries = Series("Revenue", [1240, 1080])
compNote = Callout("success", "Up 14.8%", "Revenue is ahead of yesterday's pace at this time.")