lappend auto_path .
package require tclurtp
package require tcluno_scalc

set desktop [tcluno_soffice::initDesktop]

set ::structArray(::tclUrtpBridge::sequence_5) [$desktop tcluno::createUnoSequence Any]
set obj1 [$desktop loadComponentFromURL private:factory/scalc _blank 0 $::structArray(::tclUrtpBridge::sequence_5)]

#	need this for flushing
after 10
