Permalink
Browse files

Added vertically centered radicals

  • Loading branch information...
1 parent 6c1050b commit 9e284474cf3e0986bbedb51553b2809c8ef0df1f @ummels committed May 26, 2012
Showing with 20 additions and 4 deletions.
  1. +3 −3 dvips/fdsymbol-f.enc
  2. +17 −1 source/fddelims.mf
View
@@ -43,10 +43,10 @@
/uni2226 /uni2226.big1 /sym0A9 /uni2980 /uni2980.big1 /sym0AA /arrowup.short /arrowdown.short
/sym0AB /arrowdblup.short /arrowdbldown.short /sym0AC /sym0AD /sym0AF /sym0AE /sym0B0
%D0
- /sym0B2 /sym0B3 /sym0B1 /radical /radical.big1 /radical.big2 /radical.big3 /radical.big4
- /radical.big5 /sym0B4 /uni23B7 /sym0B5 /.notdef /.notdef /.notdef /.notdef
+ /sym0B2 /sym0B3 /sym0B1 /radical.tex /radical.tex.big1 /radical.tex.big2 /radical.tex.big3 /radical.tex.big4
+ /radical.tex.big5 /radical.tex.top /uni23B7.tex /radical.ex /radical /radical.big1 /radical.big2 /radical.big3
%E0
- /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
+ /radical.big4 /radical.big5 /radical.top /uni23B7 /.notdef /.notdef /.notdef /.notdef
/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
%F0
/.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef /.notdef
View
@@ -426,7 +426,7 @@ extensible current_char: 0, 0, 0, current_char; % double vertical line
charlist current_char - 5: current_char -4: current_char;
for scale = 1, 1.2:
- beginsymbol(8u# + 3line_thickness# + 2side_bearing#, vcentre(2scale * delim_height#)); "tripe vertical bar";
+ beginsymbol(8u# + 3line_thickness# + 2side_bearing#, vcentre(2scale * delim_height#)); "triple vertical bar";
x0 = x1;
x2 = x3;
x4 = x5;
@@ -583,3 +583,19 @@ endchar;
extensible current_char - 2: current_char - 2, 0, current_char - 1, current_char;
charlist root_char: root_char + 1: root_char + 2: root_char + 3: root_char + 4: root_char + 5: current_char - 2;
+
+% more roots
+
+for scale = 1, 1.2, 1.5, 1.8, 2.4, 3:
+ beginsymbol((4scale + 2) * u# + 5/2line_thickness# + 2side_bearing#, vcentre(2scale * delim_height#)); "root";
+ draw_root(line_thickness);
+ endchar;
+endfor;
+
+beginsymbol(14u# + 5/2line_thickness# + 2side_bearing#, 1.2delim_height#, 0); "root -- top";
+ draw_root_top(line_thickness);
+endchar;
+
+beginsymbol(14u# + 5/2line_thickness# + 2side_bearing#, 2.4delim_height#, 0); "root -- bottom";
+ draw_root_bot(line_thickness);
+endchar;

0 comments on commit 9e28447

Please sign in to comment.