Sml 是否有针对';结构';,类似于';包括';对于';sig';?
这个问题涉及到如何在Isabelle/jEdit中与Isabelle/ML一起使用Section和Sidekick 考虑两个Isar命令,Sml 是否有针对';结构';,类似于';包括';对于';sig';?,sml,ml,isabelle,Sml,Ml,Isabelle,这个问题涉及到如何在Isabelle/jEdit中与Isabelle/ML一起使用Section和Sidekick 考虑两个Isar命令,section和ML。这些命令在jEdit Sidekick插件的树中充当分段命令 一个结果是,我可以在THY文件中使用多个ML{*..*}语句来记录、组织和讨论ML代码,而不是使用ML_file命令导入ML。有理由不这样做,但它可能是有用的 不过,有一个问题。我不知道如何打破一个结构中多个函数的定义 下面,我展示了你的三个文件,展示了我尝试过的不同东西。我在
section
和ML
。这些命令在jEdit Sidekick插件的树中充当分段命令
一个结果是,我可以在THY文件中使用多个ML{*..*}
语句来记录、组织和讨论ML代码,而不是使用ML_file
命令导入ML。有理由不这样做,但它可能是有用的
不过,有一个问题。我不知道如何打破一个结构中多个函数的定义
下面,我展示了你的三个文件,展示了我尝试过的不同东西。我在这里问我的问题:“有没有办法分解一个结构,最终得到一个结构,这样我就有一个名称空间来表示一组函数?”
我首先想要一个名字空间,福
以下是我希望最终结果的样子:
ML{*
Foo.val1;
Foo.val2
*}
撕毁我的签名不是问题。我可以用include
轻松做到这一点,但我不知道有任何include
类似于结构的语句。所以,如果我的签名Foo
中有50个函数,我就会有一个大的长ML{*..*}
命令
theory i150312ba__sig_with_2_sig_includes___one_struct
imports Complex_Main
begin
section{* FOO_1, FOO_2, FOO *}
ML{*signature FOO_1 =
sig
val val1 : string
end*}
ML{*signature FOO_2 =
sig
val val2 : string
end*}
ML{*signature FOO =
sig
include FOO_1
include FOO_2
end*}
section{* Foo *}
ML{*structure Foo : FOO =
struct
val val1 = "val1"
val val2 = "val2"
end*}
section{* One namespace, but had to define 'Foo' all at once *}
ML{*
Foo.val1;
Foo.val2
*}
end
有两个结构的sig,但我有两个名称空间
我明白了:
ML{*
Sig.S1.val1;
Sig.S2.val2
*}
所以下面的例子也不好:
theory i150312bb__sig_with_two_structures
imports Complex_Main
begin
section{* FOO_1, Foo_1 *}
ML{*signature FOO_1
=sig
val val1 : string
end*}
ML{*structure Foo_1 : FOO_1
=struct
val val1 = "val1"
end*}
section{* FOO_2, Foo_2 *}
ML{*signature FOO_2
=sig
val val2 : string
end*}
ML{*structure Foo_2 : FOO_2
=struct
val val2 = "val2"
end*}
section{* FOO_, Foo_ *}
ML{*signature FOO_
=sig
structure S1 : FOO_1
structure S2 : FOO_2
end*}
ML{*structure Foo : FOO_
=struct
structure S1 = Foo_1
structure S2 = Foo_2
end*}
section{* Nested namespaces; no good *}
ML{*
Foo.S1.val1;
Foo.S2.val2
*}
两个外部结构命名不同,内部结构命名相同
我有结构Foo_1_2
和Foo_2_2
。两者都包含不同的结构,但名称相同Foo
。我尝试同时打开它们,但是最后一次使用打开时会优先,所以这不起作用:
ML{*
Foo.val2;
Foo.val1 (*Not visible.*)
*}
理论:
theory i150312bc__outside_name_different__inside_name_the_name
imports Complex_Main
begin
section{* FOO_1, Foo_1, FOO_1_2, Foo_1_2 *}
ML{*signature FOO_1 =
sig
val val1 : string
end
structure Foo_1 : FOO_1 =
struct
val val1 = "val1"
end
signature FOO_1_2 = sig
structure Foo : FOO_1
end
structure Foo_1_2 : FOO_1_2 = struct
structure Foo = Foo_1
end
open Foo_1_2;
*}
section{* FOO_2, Foo_2, FOO_2_2, Foo_2_2 *}
ML{*signature FOO_2 =
sig
val val2 : string
end
structure Foo_2 : FOO_2 =
struct
val val2 = "val2"
end
signature FOO_2_2 = sig
structure Foo : FOO_2
end
structure Foo_2_2 : FOO_2_2 =
struct
structure Foo = Foo_2
end
open Foo_2_2;
*}
section{* The last 'open' takes priority *}
ML{*
Foo.val2;
Foo.val1 (*Not visible.*)
*}
相当于include
的结构级别为open
:
structure Foo1 =
struct
val val1 = "val1"
end
structure Foo2 =
struct
val val2 = "foo2"
end
structure Foo =
struct
open Foo1
open Foo2
end
安德烈亚斯,非常感谢你。现在有可能获得组织名称空间涅盘。