diff --git a/dotscape b/dotscape index cd914ff..ee69401 100755 Binary files a/dotscape and b/dotscape differ diff --git a/fonts/upper-case-n.dsc b/fonts/upper-case-n.dsc new file mode 100644 index 0000000..3fe3954 --- /dev/null +++ b/fonts/upper-case-n.dsc @@ -0,0 +1,10 @@ +x 0.454545408487 y 0.636363625526 x 0.272727310658 y ~0.818181753159 x 0.454545408487 y ~0.818181753159 +x 0.272727310658 y ~0.818181753159 x 0.272727310658 y 0.636363625526 x 0.454545408487 y 0.636363625526 +x 0.272727310658 y ~0.636363506317 x 0.272727310658 y ~0.272727310658 x 0.0909090563655 y ~0.272727310658 +x 0.0909090563655 y ~0.272727310658 x 0.0909090563655 y ~0.636363506317 x 0.272727310658 y ~0.636363506317 +x 0.0909090563655 y ~0.272727310658 x ~0.0909091234207 y 0.0909091234207 x 0.0909090563655 y 0.0909091234207 +x ~0.0909091234207 y 0.0909091234207 x ~0.0909091234207 y ~0.272727310658 x 0.0909090563655 y ~0.272727310658 +x ~0.0909091234207 y 0.0909091234207 x ~0.272727310658 y 0.0909091234207 x ~0.272727310658 y 0.454545468092 +x ~0.272727310658 y 0.454545468092 x ~0.0909091234207 y 0.454545468092 x ~0.0909091234207 y 0.0909091234207 +x ~0.454545468092 y 0.636363625526 x ~0.454545468092 y ~0.818181753159 x ~0.272727310658 y 0.636363625526 +x ~0.454545468092 y ~0.818181753159 x ~0.272727310658 y ~0.818181753159 x ~0.272727310658 y 0.636363625526 diff --git a/fonts/upper-case-o.dsc b/fonts/upper-case-o.dsc new file mode 100644 index 0000000..9ca2b93 --- /dev/null +++ b/fonts/upper-case-o.dsc @@ -0,0 +1,8 @@ +x ~0.272727310658 y 0.636363625526 x 0.272727310658 y 0.636363625526 x 0.272727310658 y 0.454545468092 +x 0.272727310658 y 0.454545468092 x ~0.272727310658 y 0.454545468092 x ~0.272727310658 y 0.636363625526 +x 0.454545408487 y 0.454545468092 x 0.272727310658 y ~0.636363506317 x 0.272727310658 y 0.454545468092 +x 0.272727310658 y ~0.636363506317 x 0.454545408487 y ~0.636363506317 x 0.454545408487 y 0.454545468092 +x ~0.272727310658 y ~0.818181753159 x ~0.272727310658 y ~0.636363506317 x 0.272727310658 y ~0.818181753159 +x ~0.272727310658 y ~0.636363506317 x 0.272727310658 y ~0.636363506317 x 0.272727310658 y ~0.818181753159 +x ~0.272727310658 y 0.454545468092 x ~0.272727310658 y ~0.636363506317 x ~0.454545468092 y ~0.636363506317 +x ~0.454545468092 y ~0.636363506317 x ~0.454545468092 y 0.454545468092 x ~0.272727310658 y 0.454545468092 diff --git a/fonts/upper-case-p.dsc b/fonts/upper-case-p.dsc new file mode 100644 index 0000000..97dfc09 --- /dev/null +++ b/fonts/upper-case-p.dsc @@ -0,0 +1,8 @@ +x 0.272727310658 y 0.454545468092 x 0.272727310658 y ~0.0909090563655 x 0.454545408487 y 0.454545468092 +x 0.272727310658 y ~0.0909090563655 x 0.454545408487 y ~0.0909090563655 x 0.454545408487 y 0.454545468092 +x 0.272727310658 y ~0.272727310658 x ~0.272727310658 y ~0.272727310658 x ~0.272727310658 y ~0.0909090563655 +x ~0.272727310658 y ~0.0909090563655 x 0.272727310658 y ~0.0909090563655 x 0.272727310658 y ~0.272727310658 +x 0.272727310658 y 0.454545468092 x ~0.272727310658 y 0.454545468092 x ~0.272727310658 y 0.636363625526 +x ~0.272727310658 y 0.636363625526 x 0.272727310658 y 0.636363625526 x 0.272727310658 y 0.454545468092 +x ~0.454545468092 y 0.636363625526 x ~0.454545468092 y ~0.818181753159 x ~0.272727310658 y 0.636363625526 +x ~0.454545468092 y ~0.818181753159 x ~0.272727310658 y ~0.818181753159 x ~0.272727310658 y 0.636363625526 diff --git a/fonts/upper-case-q.dsc b/fonts/upper-case-q.dsc new file mode 100644 index 0000000..4edaddb --- /dev/null +++ b/fonts/upper-case-q.dsc @@ -0,0 +1,12 @@ +x 0.454545408487 y ~1 x 0.272727310658 y ~0.636363506317 x 0.454545408487 y ~0.636363506317 +x 0.272727310658 y ~0.636363506317 x 0.272727310658 y ~1 x 0.454545408487 y ~1 +x ~0.272727310658 y ~0.818181753159 x 0.0909090563655 y ~0.818181753159 x 0.0909090563655 y ~0.636363506317 +x 0.0909090563655 y ~0.636363506317 x ~0.272727310658 y ~0.636363506317 x ~0.272727310658 y ~0.818181753159 +x 0.0909090563655 y ~0.636363506317 x 0.0909090563655 y ~0.454545408487 x 0.272727310658 y ~0.636363506317 +x 0.272727310658 y ~0.636363506317 x 0.272727310658 y ~0.454545408487 x 0.0909090563655 y ~0.454545408487 +x 0.454545408487 y ~0.454545408487 x 0.454545408487 y 0.636363625526 x 0.272727310658 y 0.636363625526 +x 0.272727310658 y 0.636363625526 x 0.272727310658 y ~0.454545408487 x 0.454545408487 y ~0.454545408487 +x ~0.454545468092 y ~0.636363506317 x ~0.454545468092 y 0.636363625526 x ~0.272727310658 y 0.636363625526 +x ~0.272727310658 y 0.636363625526 x ~0.272727310658 y ~0.636363506317 x ~0.454545468092 y ~0.636363506317 +x 0.272727310658 y 0.636363625526 x ~0.272727310658 y 0.636363625526 x ~0.272727310658 y 0.818181812763 +x ~0.272727310658 y 0.818181812763 x 0.272727310658 y 0.818181812763 x 0.272727310658 y 0.636363625526 diff --git a/imperative-shell/file-thread.sml b/imperative-shell/file-thread.sml index 097e9ab..cd6d3e8 100644 --- a/imperative-shell/file-thread.sml +++ b/imperative-shell/file-thread.sml @@ -11,7 +11,7 @@ struct datatype parse_result = OK of AppType.triangle list | PARSE_ERROR val structureName = "UpperCaseG" - val filename = "fonts/upper-case-l.dsc" + val filename = "fonts/upper-case-q.dsc" val exportFilename = "fonts/upper-case-h.sml" fun ndcToLerpX num =