anchor.diff:              in
               let env = FStar.TypeChecker.Tc.load_checked_module tcenv tcmod in
               if (not (Options.lax())) then begin
  -              ignore (FStar.SMTEncoding.Encode.encode_modul env tcmod);
  +              FStar.SMTEncoding.Encode.encode_modul_from_cache env tcmod.name smt_decls;
                 FStar.SMTEncoding.Z3.refresh ()
               end;
               (), env
  
positive.code: type tc_result = {
    checked_module: Syntax.modul; //persisted
    mii:module_inclusion_info; //persisted
  
    tc_time:int;
    extraction_time:int
  
negative.code: open FStar.Syntax.DsEnv
  open FStar.TypeChecker
  
  (* Module abbreviations for the universal type-checker  *)
  module DsEnv   = FStar.Syntax.DsEnv
  module TcEnv   = FStar.TypeChecker.Env
  