let drw () =
    let x = "+---+---";
    let y = "|   |   ";
    let a = print_string x^x^"\n";
    let b = print_string y^y^"\n";;
drw () ;;