card = Card "Sample title" "Sample description" (toSqlKey 1) (toSqlKey 1)
card = Card "Sample title" "Sample description" (toSqlKey 1) (toSqlKey 1)
card = Card "Sample title" "Sample description" (toSqlKey 1) (toSqlKey 1)