nagat01

open System

type Html =
  | Tag of string * Html list
  | Attribute of string * string
  | Content of string
  override __.ToString() = 
    match __ with
    | Tag (tag,htmls) ->
      let mutable attributes = ""