equal
deleted
inserted
replaced
94 val timingN: string val timing: Timing.timing -> T |
94 val timingN: string val timing: Timing.timing -> T |
95 val subgoalsN: string |
95 val subgoalsN: string |
96 val proof_stateN: string val proof_state: int -> T |
96 val proof_stateN: string val proof_state: int -> T |
97 val stateN: string val state: T |
97 val stateN: string val state: T |
98 val subgoalN: string val subgoal: T |
98 val subgoalN: string val subgoal: T |
|
99 val graphviewN: string |
|
100 val sendbackN: string |
99 val paddingN: string |
101 val paddingN: string |
100 val padding_line: string * string |
102 val padding_line: string * string |
101 val sendbackN: string |
|
102 val dialogN: string val dialog: string -> string -> T |
103 val dialogN: string val dialog: string -> string -> T |
103 val graphviewN: string |
|
104 val intensifyN: string val intensify: T |
104 val intensifyN: string val intensify: T |
105 val taskN: string |
105 val taskN: string |
106 val acceptedN: string val accepted: T |
106 val acceptedN: string val accepted: T |
107 val forkedN: string val forked: T |
107 val forkedN: string val forked: T |
108 val joinedN: string val joined: T |
108 val joinedN: string val joined: T |
339 val (subgoalN, subgoal) = markup_elem "subgoal"; |
339 val (subgoalN, subgoal) = markup_elem "subgoal"; |
340 |
340 |
341 |
341 |
342 (* active areas *) |
342 (* active areas *) |
343 |
343 |
|
344 val graphviewN = "graphview"; |
|
345 |
344 val sendbackN = "sendback"; |
346 val sendbackN = "sendback"; |
|
347 val paddingN = "padding"; |
|
348 val padding_line = (paddingN, lineN); |
345 |
349 |
346 val dialogN = "dialog"; |
350 val dialogN = "dialog"; |
347 fun dialog name result = (dialogN, [(nameN, name), ("result", result)]); |
351 fun dialog name result = (dialogN, [(nameN, name), ("result", result)]); |
348 |
|
349 val graphviewN = "graphview"; |
|
350 |
|
351 val paddingN = "padding"; |
|
352 val padding_line = (paddingN, lineN); |
|
353 |
352 |
354 val (intensifyN, intensify) = markup_elem "intensify"; |
353 val (intensifyN, intensify) = markup_elem "intensify"; |
355 |
354 |
356 |
355 |
357 (* command status *) |
356 (* command status *) |