open Arg
open Scanf
open Printf
open Unix

let argnum = Array.length Sys.argv

let _ = 
    if argnum >= 2 then 
        let _ = rmdir Sys.argv.(1)  in ()
    else
        Printf.printf "ERR only one argument\n"