import JaxLean.Stdlib import examples.tensor_puzzles.generated.PuzzlesRepeatset_option maxRecDepth 4096set_option maxHeartbeats 2000000namespace JaxLean.Puzzles.Repeattheorem matches_loop (a : Tensor ℝ [3]) : Array.repeat a = Loop.repeat a := bya:Tensor ℝ [3]⊢ Array.repeat a = Loop.repeat a funext ⟨i, j, u⟩a:Tensor ℝ [3]i:Fin 2j:Fin 3u:Index []⊢ Array.repeat a (i, j, u) = Loop.repeat a (i, j, u) cases uunita:Tensor ℝ [3]i:Fin 2j:Fin 3⊢ Array.repeat a (i, j, PUnit.unit) = Loop.repeat a (i, j, PUnit.unit) fin_cases iunit.«0»a:Tensor ℝ [3]j:Fin 3⊢ Array.repeat a ((fun i => i) ⟨0, ⋯⟩, j, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨0, ⋯⟩, j, PUnit.unit)unit.«1»a:Tensor ℝ [3]j:Fin 3⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, j, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, j, PUnit.unit) <;>unit.«0»a:Tensor ℝ [3]j:Fin 3⊢ Array.repeat a ((fun i => i) ⟨0, ⋯⟩, j, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨0, ⋯⟩, j, PUnit.unit)unit.«1»a:Tensor ℝ [3]j:Fin 3⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, j, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, j, PUnit.unit) fin_cases junit.«1».«0»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit)unit.«1».«1»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit)unit.«1».«2»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit) <;>unit.«0».«0»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit)unit.«0».«1»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit)unit.«0».«2»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨0, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit)unit.«1».«0»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨0, ⋯⟩, PUnit.unit)unit.«1».«1»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨1, ⋯⟩, PUnit.unit)unit.«1».«2»a:Tensor ℝ [3]⊢ Array.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit) = Loop.repeat a ((fun i => i) ⟨1, ⋯⟩, (fun i => i) ⟨2, ⋯⟩, PUnit.unit) rflAll goals completed! 🐙 theorem certificate (a : Tensor ℝ [3]) : Jaxpr.Program.eval (.cons a .nil) Array.repeat_ir = Jaxpr.Program.eval (.cons a .nil) Loop.repeat_ir := bya:Tensor ℝ [3]⊢ Jaxpr.Program.eval (Jaxpr.Env.cons a Jaxpr.Env.nil) Array.repeat_ir = Jaxpr.Program.eval (Jaxpr.Env.cons a Jaxpr.Env.nil) Loop.repeat_ir rw [Array.repeat_translation_correct,a:Tensor ℝ [3]⊢ Array.repeat a = Jaxpr.Program.eval (Jaxpr.Env.cons a Jaxpr.Env.nil) Loop.repeat_ira:Tensor ℝ [3]⊢ Array.repeat a = Loop.repeat a Loop.repeat_translation_correcta:Tensor ℝ [3]⊢ Array.repeat a = Loop.repeat aa:Tensor ℝ [3]⊢ Array.repeat a = Loop.repeat a]a:Tensor ℝ [3]⊢ Array.repeat a = Loop.repeat a exact matches_loop aAll goals completed! 🐙end JaxLean.Puzzles.Repeat