src/HOL/Real_Asymp/real_asymp_diag.ML
changeset 68828 7030922e91a1
parent 68630 c55f6f0b3854
child 69597 ff784d5a5bfb
     1.1 --- a/src/HOL/Real_Asymp/real_asymp_diag.ML	Tue Aug 28 11:22:04 2018 +0200
     1.2 +++ b/src/HOL/Real_Asymp/real_asymp_diag.ML	Tue Aug 28 11:28:38 2018 +0200
     1.3 @@ -187,7 +187,7 @@
     1.4    end
     1.5  
     1.6  fun print_basis_elem ctxt t =
     1.7 -  Syntax.pretty_term (Config.put Syntax_Trans.eta_contract_raw (Config.Bool false) ctxt)
     1.8 +  Syntax.pretty_term (Config.put Syntax_Trans.eta_contract false ctxt)
     1.9      (Envir.eta_long [] t)
    1.10  
    1.11  val expansion_cmd =