data PhysicistsQueue : Type -> Type
PQ : List a -> Int -> Lazy (List a) -> Int -> List a -> PhysicistsQueue a
Queue PhysicistsQueue