use Quantum::Superpositions BINARY => ["CORE::index"];
	
	print index(any("opts","tops","spot"),"o"), "\n";
	print index("stop",any("p","s")), "\n"; 
