let textfilter  
    ?(at:(('c->string) option)=None)
    ?(script=false)
     (cmd:command) 
    ?(opt="")
    ?(args:('c option)=None) (x:string list)

    = make 
       ~at ~script
       ~it:(Some String.Text.to_string) 
       ~ot:String.Text.of_string cmd 
       ~opt ~args ~input:(Some x) ()