test/Tools/isac/Minisubpbl/200-start-method.sml
changeset 59562 d50fe358f04a
parent 59559 f25ce1922b60
child 59571 57ebc51625f2
     1.1 --- a/test/Tools/isac/Minisubpbl/200-start-method.sml	Tue Jun 25 16:21:18 2019 +0200
     1.2 +++ b/test/Tools/isac/Minisubpbl/200-start-method.sml	Wed Jul 03 15:09:16 2019 +0200
     1.3 @@ -126,7 +126,7 @@
     1.4  case tacis of [] => ();
     1.5  case pIopt of SONE => ();
     1.6  member op = [Ctree.Pbl, Ctree.Met] p_ andalso is_none (Ctree.get_obj Ctree.g_env pt (fst p)) (* = false*);
     1.7 -"~~~~~ fun nxt_solve_, args:"; val (ptp as (pt, pos as (p, p_))) = (pt,ip);
     1.8 +"~~~~~ fun do_solve_step, args:"; val (ptp as (pt, pos as (p, p_))) = (pt,ip);
     1.9  Celem.e_metID = get_obj g_metID pt (par_pblobj pt p) (* = false*);
    1.10          val thy' = get_obj g_domID pt (par_pblobj pt p);
    1.11  	      val (srls, is, sc) = Lucin.from_pblobj_or_detail' thy' (p,p_) pt;