CompositeQ[840]