fact: Definition BreedCacheSpec (or : UnConstrQueryStructure MySchema) (cache : Rep CacheSpec) := forall breed pop, cache (breed, pop) -> refine (Count (For (UnConstrQuery_In or ``("Dog") (fun d => Where (d!"Breed" = breed) Return ())))) (ret pop).
imports: Fiat.QueryStructure.Specification.Representation.QueryStructureNotations Fiat.QueryStructure.Implementation.ListImplementation ComputationalADT AddCache ADTCache CacheADT