| author | Walther Neuper <walther.neuper@jku.at> |
| Wed, 18 Dec 2019 15:33:27 +0100 | |
| changeset 59747 | 8e5335c63475 |
| child 59748 | f446e732cb00 |
| permissions | -rw-r--r-- |
| walther@59747 | 1 |
(* Title: Specify/step-specify.sml |
| walther@59747 | 2 |
Author: Walther Neuper 2019 |
| walther@59747 | 3 |
(c) due to copyright terms |
| walther@59747 | 4 |
*) |
| walther@59747 | 5 |
|
| walther@59747 | 6 |
signature STEP_SPECIFY = |
| walther@59747 | 7 |
sig |
| walther@59747 | 8 |
|
| walther@59747 | 9 |
end |
| walther@59747 | 10 |
|
| walther@59747 | 11 |
(**) |
| walther@59747 | 12 |
structure Step_Specify(**): STEP_SPECIFY(**) = |
| walther@59747 | 13 |
struct |
| walther@59747 | 14 |
(**) |
| walther@59747 | 15 |
|
| walther@59747 | 16 |
(* datatype step_result = Step of ...*) |
| walther@59747 | 17 |
|
| walther@59747 | 18 |
end |