$inter->{THR} = shared_clone( threads->create(sub{$thread->(\$inter->{INT1})}) );