t (url,_)) = concat (map plain text ++ [" <", url, ">"])
plain (Image a
plain (Link text (url,_)) = concat (map plain text ++ [" <", url, ">"])
plain (Link text (url,_)) = concat (map plain text ++ [" <", url, ">"])