import Init.Lean
open Lean

def tst : IO Unit :=
do env ← importModules [{module := `Init.Data.Array}];
   match env.find `Array.foldl with
   | some info => do
     IO.println (info.instantiateTypeLevelParams [levelZero, levelZero]);
     IO.println (info.instantiateValueLevelParams [levelZero, levelZero]);
     pure ()
   | none      => IO.println ("Array.foldl not found");
   pure ()

#eval tst
