# script to make unicode "ghmi" font from various TeX pfb's

type1pref="/usr/share/texmf-tetex/fonts/type1/"

inf = type1pref + "bluesky/cm/cmr10.pfb"
outf = "ghr10.sfd"

Open(inf)
Select(33, 122)
Copy()
New()
Reencode("unicode")
Select(33)
Paste()
Save(outf)

# greek uppercase
Open(inf); Select(0); Copy(); Open(outf); Select(0u0393); Paste(); Save(outf)
Open(inf); Select(1); Copy(); Open(outf); Select(0u0394); Paste(); Save(outf)
Open(inf); Select(2); Copy(); Open(outf); Select(0u0398); Paste(); Save(outf)
Open(inf); Select(3); Copy(); Open(outf); Select(0u039b); Paste(); Save(outf)
Open(inf); Select(4); Copy(); Open(outf); Select(0u039e); Paste(); Save(outf)
Open(inf); Select(5); Copy(); Open(outf); Select(0u03a0); Paste(); Save(outf)
Open(inf); Select(6); Copy(); Open(outf); Select(0u03a3); Paste(); Save(outf)
Open(inf); Select(7); Copy(); Open(outf); Select(0u03a5); Paste(); Save(outf)
Open(inf); Select(8); Copy(); Open(outf); Select(0u03a6); Paste(); Save(outf)
Open(inf); Select(9); Copy(); Open(outf); Select(0u03a8); Paste(); Save(outf)
Open(inf); Select(10); Copy(); Open(outf); Select(0u03a9); Paste(); Save(outf)

Open(inf); Select(16); Copy(); Open(outf); Select(0u0131); Paste(); Save(outf)
Open(inf); Select(17); Copy(); Open(outf); Select(0u0237); Paste(); Save(outf)
Open(inf); Select(18); Copy(); Open(outf); Select(0u0060); Paste(); Save(outf)
Open(inf); Select(19); Copy(); Open(outf); Select(0u00b4); Paste(); Save(outf)
Open(inf); Select(20); Copy(); Open(outf); Select(0u02c7); Paste(); Save(outf)
Open(inf); Select(21); Copy(); Open(outf); Select(0u02d8); Paste(); Save(outf)
Open(inf); Select(22); Copy(); Open(outf); Select(0u00af); Paste(); Save(outf)
Open(inf); Select(23); Copy(); Open(outf); Select(0u02da); Paste(); Save(outf)
Open(inf); Select(24); Copy(); Open(outf); Select(0u00b8); Paste(); Save(outf)
Open(inf); Select(25); Copy(); Open(outf); Select(0u00df); Paste(); Save(outf)
Open(inf); Select(26); Copy(); Open(outf); Select(0u00e6); Paste(); Save(outf)
Open(inf); Select(27); Copy(); Open(outf); Select(0u0153); Paste(); Save(outf)
Open(inf); Select(28); Copy(); Open(outf); Select(0u00f8); Paste(); Save(outf)
Open(inf); Select(29); Copy(); Open(outf); Select(0u00c6); Paste(); Save(outf)
Open(inf); Select(30); Copy(); Open(outf); Select(0u0152); Paste(); Save(outf)
Open(inf); Select(31); Copy(); Open(outf); Select(0u00d8); Paste(); Save(outf)

Open(inf); Select(60); Copy(); Open(outf); Select(0u00a1); Paste(); Save(outf)
Open(inf); Select(62); Copy(); Open(outf); Select(0u00bf); Paste(); Save(outf)

Open(inf); Select(92); Copy(); Open(outf); Select(0u201c); Paste(); Save(outf)
Open(inf); Select(96); Copy(); Open(outf); Select(0u2018); Paste(); Save(outf)
Open(inf); Select(123); Copy(); Open(outf); Select(0u2013); Paste(); Save(outf)
Open(inf); Select(124); Copy(); Open(outf); Select(0u2014); Paste(); Save(outf)
Open(inf); Select(125); Copy(); Open(outf); Select(0u02dd); Paste(); Save(outf)
Open(inf); Select(126); Copy(); Open(outf); Select(0u007e); Paste(); Save(outf)
Open(inf); Select(127); Copy(); Open(outf); Select(0u00a8); Paste(); Save(outf)

inf = type1pref + "bluesky/cm/cmsy10.pfb"
Open(inf); Select(0); Copy(); Open(outf); Select(0u2212); Paste(); Save(outf)
Open(inf); Select(1); Copy(); Open(outf); Select(0u00b7); Paste(); Save(outf)
Open(inf); Select(2); Copy(); Open(outf); Select(0u00d7); Paste(); Save(outf)
Open(inf); Select(3); Copy(); Open(outf); Select(0u2217); Paste(); Save(outf)
Open(inf); Select(4); Copy(); Open(outf); Select(0u00f7); Paste(); Save(outf)
Open(inf); Select(5); Copy(); Open(outf); Select(0u22c4); Paste(); Save(outf)
Open(inf); Select(6); Copy(); Open(outf); Select(0u00b1); Paste(); Save(outf)
Open(inf); Select(7); Copy(); Open(outf); Select(0u2213); Paste(); Save(outf)
Open(inf); Select(8); Copy(); Open(outf); Select(0u2295); Paste(); Save(outf)
Open(inf); Select(9); Copy(); Open(outf); Select(0u2296); Paste(); Save(outf)
Open(inf); Select(10); Copy(); Open(outf); Select(0u2297); Paste(); Save(outf)
Open(inf); Select(11); Copy(); Open(outf); Select(0u2298); Paste(); Save(outf)
Open(inf); Select(12); Copy(); Open(outf); Select(0u2299); Paste(); Save(outf)
Open(inf); Select(13); Copy(); Open(outf); Select(0u25ef); Paste(); Save(outf)
Open(inf); Select(14); Copy(); Open(outf); Select(0u25e6); Paste(); Save(outf)
Open(inf); Select(15); Copy(); Open(outf); Select(0u2022); Paste(); Save(outf)
Open(inf); Select(16); Copy(); Open(outf); Select(0u224d); Paste(); Save(outf)
Open(inf); Select(17); Copy(); Open(outf); Select(0u2261); Paste(); Save(outf)
Open(inf); Select(18); Copy(); Open(outf); Select(0u2286); Paste(); Save(outf)
Open(inf); Select(19); Copy(); Open(outf); Select(0u2287); Paste(); Save(outf)
Open(inf); Select(20); Copy(); Open(outf); Select(0u2264); Paste(); Save(outf)
Open(inf); Select(21); Copy(); Open(outf); Select(0u2265); Paste(); Save(outf)
Open(inf); Select(22); Copy(); Open(outf); Select(0u227c); Paste(); Save(outf)
Open(inf); Select(23); Copy(); Open(outf); Select(0u227d); Paste(); Save(outf)
Open(inf); Select(24); Copy(); Open(outf); Select(0u223c); Paste(); Save(outf)
Open(inf); Select(25); Copy(); Open(outf); Select(0u2248); Paste(); Save(outf)
Open(inf); Select(26); Copy(); Open(outf); Select(0u2282); Paste(); Save(outf)
Open(inf); Select(27); Copy(); Open(outf); Select(0u2283); Paste(); Save(outf)
Open(inf); Select(28); Copy(); Open(outf); Select(0u226a); Paste(); Save(outf)
Open(inf); Select(29); Copy(); Open(outf); Select(0u226b); Paste(); Save(outf)
Open(inf); Select(30); Copy(); Open(outf); Select(0u227a); Paste(); Save(outf)
Open(inf); Select(31); Copy(); Open(outf); Select(0u227b); Paste(); Save(outf)
Open(inf); Select(32); Copy(); Open(outf); Select(0u2190); Paste(); Save(outf)
Open(inf); Select(33); Copy(); Open(outf); Select(0u2192); Paste(); Save(outf)
Open(inf); Select(34); Copy(); Open(outf); Select(0u2191); Paste(); Save(outf)
Open(inf); Select(35); Copy(); Open(outf); Select(0u2193); Paste(); Save(outf)
Open(inf); Select(36); Copy(); Open(outf); Select(0u2194); Paste(); Save(outf)
Open(inf); Select(37); Copy(); Open(outf); Select(0u2197); Paste(); Save(outf)
Open(inf); Select(38); Copy(); Open(outf); Select(0u2198); Paste(); Save(outf)
Open(inf); Select(39); Copy(); Open(outf); Select(0u2243); Paste(); Save(outf)
Open(inf); Select(40); Copy(); Open(outf); Select(0u21d0); Paste(); Save(outf)
Open(inf); Select(41); Copy(); Open(outf); Select(0u21d2); Paste(); Save(outf)
Open(inf); Select(42); Copy(); Open(outf); Select(0u21d1); Paste(); Save(outf)
Open(inf); Select(43); Copy(); Open(outf); Select(0u21d3); Paste(); Save(outf)
Open(inf); Select(44); Copy(); Open(outf); Select(0u21d4); Paste(); Save(outf)
Open(inf); Select(45); Copy(); Open(outf); Select(0u2196); Paste(); Save(outf)
Open(inf); Select(46); Copy(); Open(outf); Select(0u2199); Paste(); Save(outf)
Open(inf); Select(47); Copy(); Open(outf); Select(0u221d); Paste(); Save(outf)
Open(inf); Select(48); Copy(); Open(outf); Select(0u2032); Paste(); Save(outf)
Open(inf); Select(49); Copy(); Open(outf); Select(0u221e); Paste(); Save(outf)
Open(inf); Select(50); Copy(); Open(outf); Select(0u2208); Paste(); Save(outf)
Open(inf); Select(51); Copy(); Open(outf); Select(0u220b); Paste(); Save(outf)
Open(inf); Select(52); Copy(); Open(outf); Select(0u25b3); Paste(); Save(outf)
Open(inf); Select(53); Copy(); Open(outf); Select(0u25bd); Paste(); Save(outf)
Open(inf); Select(54); Copy(); Open(outf); Select(0u0338); Paste(); Save(outf)
Open(inf); Select(55); Copy(); Open(outf); Select(0u22a6); Paste(); Save(outf)
Open(inf); Select(56); Copy(); Open(outf); Select(0u2200); Paste(); Save(outf)
Open(inf); Select(57); Copy(); Open(outf); Select(0u2203); Paste(); Save(outf)
Open(inf); Select(58); Copy(); Open(outf); Select(0u00ac); Paste(); Save(outf)
Open(inf); Select(59); Copy(); Open(outf); Select(0u2205); Paste(); Save(outf)
Open(inf); Select(60); Copy(); Open(outf); Select(0u211c); Paste(); Save(outf)
Open(inf); Select(61); Copy(); Open(outf); Select(0u2111); Paste(); Save(outf)
Open(inf); Select(62); Copy(); Open(outf); Select(0u22a4); Paste(); Save(outf)
Open(inf); Select(63); Copy(); Open(outf); Select(0u22a5); Paste(); Save(outf)
Open(inf); Select(64); Copy(); Open(outf); Select(0u2135); Paste(); Save(outf)

# Script caps as letterlike forms; an argument can be made for typo script
Open(inf); Select(66); Copy(); Open(outf); Select(0u212c); Paste(); Save(outf)
Open(inf); Select(69); Copy(); Open(outf); Select(0u2130); Paste(); Save(outf)
Open(inf); Select(72); Copy(); Open(outf); Select(0u210b); Paste(); Save(outf)
Open(inf); Select(76); Copy(); Open(outf); Select(0u2112); Paste(); Save(outf)
Open(inf); Select(77); Copy(); Open(outf); Select(0u2133); Paste(); Save(outf)
Open(inf); Select(78); Copy(); Open(outf); Select(0u2131); Paste(); Save(outf)
Open(inf); Select(82); Copy(); Open(outf); Select(0u211b); Paste(); Save(outf)

Open(inf); Select(91); Copy(); Open(outf); Select(0u222a); Paste(); Save(outf)
Open(inf); Select(92); Copy(); Open(outf); Select(0u2229); Paste(); Save(outf)
Open(inf); Select(93); Copy(); Open(outf); Select(0u228e); Paste(); Save(outf)
Open(inf); Select(94); Copy(); Open(outf); Select(0u2227); Paste(); Save(outf)
Open(inf); Select(95); Copy(); Open(outf); Select(0u2228); Paste(); Save(outf)
Open(inf); Select(96); Copy(); Open(outf); Select(0u22a2); Paste(); Save(outf)
Open(inf); Select(97); Copy(); Open(outf); Select(0u22a3); Paste(); Save(outf)
Open(inf); Select(98); Copy(); Open(outf); Select(0u230a); Paste(); Save(outf)
Open(inf); Select(99); Copy(); Open(outf); Select(0u230b); Paste(); Save(outf)
Open(inf); Select(100); Copy(); Open(outf); Select(0u2308); Paste(); Save(outf)
Open(inf); Select(101); Copy(); Open(outf); Select(0u2309); Paste(); Save(outf)
Open(inf); Select(102); Copy(); Open(outf); Select(0u007b); Paste(); Save(outf)
Open(inf); Select(103); Copy(); Open(outf); Select(0u007d); Paste(); Save(outf)
Open(inf); Select(104); Copy(); Open(outf); Select(0u2329); Paste(); Save(outf)
Open(inf); Select(105); Copy(); Open(outf); Select(0u232a); Paste(); Save(outf)
Open(inf); Select(106); Copy(); Open(outf); Select(0u007c); Paste(); Save(outf)
Open(inf); Select(107); Copy(); Open(outf); Select(0u2225); Paste(); Save(outf)
Open(inf); Select(108); Copy(); Open(outf); Select(0u2195); Paste(); Save(outf)
Open(inf); Select(109); Copy(); Open(outf); Select(0u21d5); Paste(); Save(outf)
Open(inf); Select(110); Copy(); Open(outf); Select(0u005c); Paste(); Save(outf)
Open(inf); Select(111); Copy(); Open(outf); Select(0u2240); Paste(); Save(outf)
Open(inf); Select(112); Copy(); Open(outf); Select(0u221a); Paste(); Save(outf)
Open(inf); Select(113); Copy(); Open(outf); Select(0u2210); Paste(); Save(outf)
Open(inf); Select(114); Copy(); Open(outf); Select(0u2207); Paste(); Save(outf)
Open(inf); Select(115); Copy(); Open(outf); Select(0u222b); Paste(); Save(outf)
Open(inf); Select(116); Copy(); Open(outf); Select(0u2294); Paste(); Save(outf)
Open(inf); Select(117); Copy(); Open(outf); Select(0u2293); Paste(); Save(outf)
Open(inf); Select(118); Copy(); Open(outf); Select(0u2291); Paste(); Save(outf)
Open(inf); Select(119); Copy(); Open(outf); Select(0u2292); Paste(); Save(outf)
Open(inf); Select(120); Copy(); Open(outf); Select(0u00a7); Paste(); Save(outf)
Open(inf); Select(121); Copy(); Open(outf); Select(0u2020); Paste(); Save(outf)
Open(inf); Select(122); Copy(); Open(outf); Select(0u2021); Paste(); Save(outf)
Open(inf); Select(123); Copy(); Open(outf); Select(0u00b6); Paste(); Save(outf)
Open(inf); Select(124); Copy(); Open(outf); Select(0u2663); Paste(); Save(outf)
Open(inf); Select(125); Copy(); Open(outf); Select(0u2662); Paste(); Save(outf)
Open(inf); Select(126); Copy(); Open(outf); Select(0u2661); Paste(); Save(outf)
Open(inf); Select(127); Copy(); Open(outf); Select(0u2660); Paste(); Save(outf)

inf = type1pref + "bluesky/cm/cmmi10.pfb"

Open(inf); Select(40); Copy(); Open(outf); Select(0u21bc); Paste(); Save(outf)
Open(inf); Select(41); Copy(); Open(outf); Select(0u21bd); Paste(); Save(outf)
Open(inf); Select(42); Copy(); Open(outf); Select(0u21c0); Paste(); Save(outf)
Open(inf); Select(43); Copy(); Open(outf); Select(0u21c1); Paste(); Save(outf)
Open(inf); Select(44); Copy(); Open(outf); Select(0u02d3); Paste(); Save(outf)
Open(inf); Select(45); Copy(); Open(outf); Select(0u02d2); Paste(); Save(outf)
Open(inf); Select(46); Copy(); Open(outf); Select(0u25b7); Paste(); Save(outf)
Open(inf); Select(47); Copy(); Open(outf); Select(0u25c1); Paste(); Save(outf)
Open(inf); Select(60); Copy(); Open(outf); Select(0u003c); Paste(); Save(outf)
Open(inf); Select(62); Copy(); Open(outf); Select(0u003e); Paste(); Save(outf)
Open(inf); Select(63); Copy(); Open(outf); Select(0u22c6); Paste(); Save(outf)
Open(inf); Select(64); Copy(); Open(outf); Select(0u2202); Paste(); Save(outf)
Open(inf); Select(91); Copy(); Open(outf); Select(0u266d); Paste(); Save(outf)
Open(inf); Select(92); Copy(); Open(outf); Select(0u266e); Paste(); Save(outf)
Open(inf); Select(93); Copy(); Open(outf); Select(0u266f); Paste(); Save(outf)
# various smile and frown glyphs are questionable
Open(inf); Select(94); Copy(); Open(outf); Select(0u203f); Paste(); Save(outf)
Open(inf); Select(95); Copy(); Open(outf); Select(0u2040); Paste(); Save(outf)
Open(inf); Select(96); Copy(); Open(outf); Select(0u2113); Paste(); Save(outf)
Open(inf); Select(125); Copy(); Open(outf); Select(0u2118); Paste(); Save(outf)
# coded as combining modifier; glyph is spacing
Open(inf); Select(127); Copy(); Open(outf); Select(0u0311); Paste(); Save(outf)

inf = type1pref + "bluesky/symbols/msam10.pfb"

Open(inf); Select(0); Copy(); Open(outf); Select(0u22a1); Paste(); Save(outf)
Open(inf); Select(1); Copy(); Open(outf); Select(0u229e); Paste(); Save(outf)
Open(inf); Select(2); Copy(); Open(outf); Select(0u22a0); Paste(); Save(outf)
Open(inf); Select(3); Copy(); Open(outf); Select(0u25a1); Paste(); Save(outf)
Open(inf); Select(4); Copy(); Open(outf); Select(0u25a0); Paste(); Save(outf)
Open(inf); Select(5); Copy(); Open(outf); Select(0u25aa); Paste(); Save(outf)
Open(inf); Select(6); Copy(); Open(outf); Select(0u25c7); Paste(); Save(outf)
Open(inf); Select(7); Copy(); Open(outf); Select(0u25c6); Paste(); Save(outf)
Open(inf); Select(8); Copy(); Open(outf); Select(0u21bb); Paste(); Save(outf)
Open(inf); Select(9); Copy(); Open(outf); Select(0u21ba); Paste(); Save(outf)
Open(inf); Select(10); Copy(); Open(outf); Select(0u21cb); Paste(); Save(outf)
Open(inf); Select(11); Copy(); Open(outf); Select(0u21cc); Paste(); Save(outf)
Open(inf); Select(12); Copy(); Open(outf); Select(0u229f); Paste(); Save(outf)
Open(inf); Select(13); Copy(); Open(outf); Select(0u22a9); Paste(); Save(outf)
Open(inf); Select(14); Copy(); Open(outf); Select(0u22aa); Paste(); Save(outf)
Open(inf); Select(15); Copy(); Open(outf); Select(0u22a8); Paste(); Save(outf)
Open(inf); Select(16); Copy(); Open(outf); Select(0u21a0); Paste(); Save(outf)
Open(inf); Select(17); Copy(); Open(outf); Select(0u219e); Paste(); Save(outf)
Open(inf); Select(18); Copy(); Open(outf); Select(0u21c7); Paste(); Save(outf)
Open(inf); Select(19); Copy(); Open(outf); Select(0u21c9); Paste(); Save(outf)
Open(inf); Select(20); Copy(); Open(outf); Select(0u21c8); Paste(); Save(outf)
Open(inf); Select(21); Copy(); Open(outf); Select(0u21ca); Paste(); Save(outf)
Open(inf); Select(22); Copy(); Open(outf); Select(0u21be); Paste(); Save(outf)
Open(inf); Select(23); Copy(); Open(outf); Select(0u21c2); Paste(); Save(outf)
Open(inf); Select(24); Copy(); Open(outf); Select(0u21bf); Paste(); Save(outf)
Open(inf); Select(25); Copy(); Open(outf); Select(0u21c3); Paste(); Save(outf)
Open(inf); Select(26); Copy(); Open(outf); Select(0u21a3); Paste(); Save(outf)
Open(inf); Select(27); Copy(); Open(outf); Select(0u21a2); Paste(); Save(outf)
Open(inf); Select(28); Copy(); Open(outf); Select(0u21c6); Paste(); Save(outf)
Open(inf); Select(29); Copy(); Open(outf); Select(0u21c4); Paste(); Save(outf)
Open(inf); Select(30); Copy(); Open(outf); Select(0u21b0); Paste(); Save(outf)
Open(inf); Select(31); Copy(); Open(outf); Select(0u21b1); Paste(); Save(outf)
Open(inf); Select(32); Copy(); Open(outf); Select(0u21dd); Paste(); Save(outf)
Open(inf); Select(33); Copy(); Open(outf); Select(0u21ad); Paste(); Save(outf)
Open(inf); Select(34); Copy(); Open(outf); Select(0u21ab); Paste(); Save(outf)
Open(inf); Select(35); Copy(); Open(outf); Select(0u21ac); Paste(); Save(outf)
Open(inf); Select(36); Copy(); Open(outf); Select(0u2257); Paste(); Save(outf)
Open(inf); Select(37); Copy(); Open(outf); Select(0u227f); Paste(); Save(outf)
Open(inf); Select(38); Copy(); Open(outf); Select(0u2273); Paste(); Save(outf)
Open(inf); Select(39); Copy(); Open(outf); Select(0u2a86); Paste(); Save(outf)
Open(inf); Select(40); Copy(); Open(outf); Select(0u22b8); Paste(); Save(outf)
Open(inf); Select(41); Copy(); Open(outf); Select(0u2234); Paste(); Save(outf)
Open(inf); Select(42); Copy(); Open(outf); Select(0u2235); Paste(); Save(outf)
Open(inf); Select(43); Copy(); Open(outf); Select(0u2251); Paste(); Save(outf)
Open(inf); Select(44); Copy(); Open(outf); Select(0u225c); Paste(); Save(outf)
Open(inf); Select(45); Copy(); Open(outf); Select(0u227e); Paste(); Save(outf)
Open(inf); Select(46); Copy(); Open(outf); Select(0u2272); Paste(); Save(outf)
Open(inf); Select(47); Copy(); Open(outf); Select(0u2a85); Paste(); Save(outf)
Open(inf); Select(48); Copy(); Open(outf); Select(0u2a95); Paste(); Save(outf)
Open(inf); Select(49); Copy(); Open(outf); Select(0u2a96); Paste(); Save(outf)
Open(inf); Select(50); Copy(); Open(outf); Select(0u22de); Paste(); Save(outf)
Open(inf); Select(51); Copy(); Open(outf); Select(0u22df); Paste(); Save(outf)
Open(inf); Select(52); Copy(); Open(outf); Select(0u227c); Paste(); Save(outf)
Open(inf); Select(53); Copy(); Open(outf); Select(0u2266); Paste(); Save(outf)
Open(inf); Select(54); Copy(); Open(outf); Select(0u2264); Paste(); Save(outf)
Open(inf); Select(55); Copy(); Open(outf); Select(0u2276); Paste(); Save(outf)
Open(inf); Select(56); Copy(); Open(outf); Select(0u2035); Paste(); Save(outf)
# For f0xx block, see http://www.unibw-muenchen.de/campus/ET8/et81/Download/swp40/TCITeX/fonts/encoding/synonyms
Open(inf); Select(57); Copy(); Open(outf); Select(0uf032); Paste(); Save(outf)
Open(inf); Select(58); Copy(); Open(outf); Select(0u2253); Paste(); Save(outf)
Open(inf); Select(59); Copy(); Open(outf); Select(0u2252); Paste(); Save(outf)
Open(inf); Select(60); Copy(); Open(outf); Select(0u227d); Paste(); Save(outf)
Open(inf); Select(61); Copy(); Open(outf); Select(0u2267); Paste(); Save(outf)
Open(inf); Select(62); Copy(); Open(outf); Select(0u2265); Paste(); Save(outf)
Open(inf); Select(63); Copy(); Open(outf); Select(0u2277); Paste(); Save(outf)
Open(inf); Select(64); Copy(); Open(outf); Select(0u228f); Paste(); Save(outf)
Open(inf); Select(65); Copy(); Open(outf); Select(0u2290); Paste(); Save(outf)
Open(inf); Select(66); Copy(); Open(outf); Select(0u22b3); Paste(); Save(outf)
Open(inf); Select(67); Copy(); Open(outf); Select(0u22b2); Paste(); Save(outf)
Open(inf); Select(68); Copy(); Open(outf); Select(0u22b5); Paste(); Save(outf)
Open(inf); Select(69); Copy(); Open(outf); Select(0u22b4); Paste(); Save(outf)
Open(inf); Select(70); Copy(); Open(outf); Select(0u2605); Paste(); Save(outf)
Open(inf); Select(71); Copy(); Open(outf); Select(0u226c); Paste(); Save(outf)
Open(inf); Select(72); Copy(); Open(outf); Select(0u25bc); Paste(); Save(outf)
Open(inf); Select(73); Copy(); Open(outf); Select(0u25b6); Paste(); Save(outf)
Open(inf); Select(74); Copy(); Open(outf); Select(0u25c0); Paste(); Save(outf)
#Open(inf); Select(75); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(76); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(77); Copy(); Open(outf); Select(0u25b3); Paste(); Save(outf)
Open(inf); Select(78); Copy(); Open(outf); Select(0u25b2); Paste(); Save(outf)
Open(inf); Select(79); Copy(); Open(outf); Select(0u25bd); Paste(); Save(outf)
Open(inf); Select(80); Copy(); Open(outf); Select(0u2256); Paste(); Save(outf)
Open(inf); Select(81); Copy(); Open(outf); Select(0u22da); Paste(); Save(outf)
Open(inf); Select(82); Copy(); Open(outf); Select(0u22db); Paste(); Save(outf)
Open(inf); Select(83); Copy(); Open(outf); Select(0u2a8b); Paste(); Save(outf)
Open(inf); Select(84); Copy(); Open(outf); Select(0u2a8c); Paste(); Save(outf)
Open(inf); Select(85); Copy(); Open(outf); Select(0u00a5); Paste(); Save(outf)
Open(inf); Select(86); Copy(); Open(outf); Select(0u21db); Paste(); Save(outf)
Open(inf); Select(87); Copy(); Open(outf); Select(0u21da); Paste(); Save(outf)
Open(inf); Select(88); Copy(); Open(outf); Select(0u2713); Paste(); Save(outf)
Open(inf); Select(89); Copy(); Open(outf); Select(0u22bb); Paste(); Save(outf)
Open(inf); Select(90); Copy(); Open(outf); Select(0u22bc); Paste(); Save(outf)
Open(inf); Select(91); Copy(); Open(outf); Select(0uf035); Paste(); Save(outf)
Open(inf); Select(92); Copy(); Open(outf); Select(0u2220); Paste(); Save(outf)
Open(inf); Select(93); Copy(); Open(outf); Select(0u2221); Paste(); Save(outf)
Open(inf); Select(94); Copy(); Open(outf); Select(0u2222); Paste(); Save(outf)

# Alternate font choice; we go with cmsy 47
#Open(inf); Select(95); Copy(); Open(outf); Select(0u221d); Paste(); Save(outf)
Open(inf); Select(96); Copy(); Open(outf); Select(0u2323); Paste(); Save(outf)
Open(inf); Select(97); Copy(); Open(outf); Select(0u2322); Paste(); Save(outf)
Open(inf); Select(98); Copy(); Open(outf); Select(0u22d0); Paste(); Save(outf)
Open(inf); Select(99); Copy(); Open(outf); Select(0u22d1); Paste(); Save(outf)
Open(inf); Select(100); Copy(); Open(outf); Select(0u22d2); Paste(); Save(outf)
Open(inf); Select(101); Copy(); Open(outf); Select(0u22d3); Paste(); Save(outf)
Open(inf); Select(102); Copy(); Open(outf); Select(0u22cf); Paste(); Save(outf)
Open(inf); Select(103); Copy(); Open(outf); Select(0u22ce); Paste(); Save(outf)
Open(inf); Select(104); Copy(); Open(outf); Select(0u22cb); Paste(); Save(outf)
Open(inf); Select(105); Copy(); Open(outf); Select(0u22cc); Paste(); Save(outf)
Open(inf); Select(106); Copy(); Open(outf); Select(0u2ac5); Paste(); Save(outf)
Open(inf); Select(107); Copy(); Open(outf); Select(0u2ac6); Paste(); Save(outf)
Open(inf); Select(108); Copy(); Open(outf); Select(0u224f); Paste(); Save(outf)
Open(inf); Select(109); Copy(); Open(outf); Select(0u224e); Paste(); Save(outf)
Open(inf); Select(110); Copy(); Open(outf); Select(0u22d8); Paste(); Save(outf)
Open(inf); Select(111); Copy(); Open(outf); Select(0u22d9); Paste(); Save(outf)
Open(inf); Select(112); Copy(); Open(outf); Select(0u231c); Paste(); Save(outf)
Open(inf); Select(113); Copy(); Open(outf); Select(0u231d); Paste(); Save(outf)
Open(inf); Select(114); Copy(); Open(outf); Select(0u24c7); Paste(); Save(outf)
Open(inf); Select(115); Copy(); Open(outf); Select(0u24c8); Paste(); Save(outf)
Open(inf); Select(116); Copy(); Open(outf); Select(0u22d4); Paste(); Save(outf)
Open(inf); Select(117); Copy(); Open(outf); Select(0u2214); Paste(); Save(outf)
Open(inf); Select(118); Copy(); Open(outf); Select(0u223d); Paste(); Save(outf)
Open(inf); Select(119); Copy(); Open(outf); Select(0u22cd); Paste(); Save(outf)
Open(inf); Select(120); Copy(); Open(outf); Select(0u231e); Paste(); Save(outf)
Open(inf); Select(121); Copy(); Open(outf); Select(0u231f); Paste(); Save(outf)
Open(inf); Select(122); Copy(); Open(outf); Select(0u2720); Paste(); Save(outf)
Open(inf); Select(123); Copy(); Open(outf); Select(0u2201); Paste(); Save(outf)
Open(inf); Select(124); Copy(); Open(outf); Select(0u22ba); Paste(); Save(outf)
Open(inf); Select(125); Copy(); Open(outf); Select(0u229a); Paste(); Save(outf)
Open(inf); Select(126); Copy(); Open(outf); Select(0u229b); Paste(); Save(outf)
Open(inf); Select(127); Copy(); Open(outf); Select(0u229d); Paste(); Save(outf)

inf = type1pref + "bluesky/symbols/msbm10.pfb"

#Open(inf); Select(0); Copy(); Open(outf); Select(0u2268); Paste(); Save(outf)
#Open(inf); Select(1); Copy(); Open(outf); Select(0u2269); Paste(); Save(outf)
Open(inf); Select(2); Copy(); Open(outf); Select(0u2270); Paste(); Save(outf)
Open(inf); Select(3); Copy(); Open(outf); Select(0u2271); Paste(); Save(outf)
Open(inf); Select(4); Copy(); Open(outf); Select(0u226e); Paste(); Save(outf)
Open(inf); Select(5); Copy(); Open(outf); Select(0u226f); Paste(); Save(outf)
Open(inf); Select(6); Copy(); Open(outf); Select(0u2280); Paste(); Save(outf)
Open(inf); Select(7); Copy(); Open(outf); Select(0u2281); Paste(); Save(outf)
Open(inf); Select(8); Copy(); Open(outf); Select(0u2268); Paste(); Save(outf)
Open(inf); Select(9); Copy(); Open(outf); Select(0u2269); Paste(); Save(outf)
#Open(inf); Select(10); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(11); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(12); Copy(); Open(outf); Select(0u2a87); Paste(); Save(outf)
Open(inf); Select(13); Copy(); Open(outf); Select(0u2a88); Paste(); Save(outf)
# the font has not precedes or straight line, unicode has a curly line
Open(inf); Select(14); Copy(); Open(outf); Select(0u22e0); Paste(); Save(outf)
Open(inf); Select(15); Copy(); Open(outf); Select(0u22e1); Paste(); Save(outf)

#Open(inf); Select(16); Copy(); Open(outf); Select(0u22e8); Paste(); Save(outf)
#Open(inf); Select(17); Copy(); Open(outf); Select(0u22e9); Paste(); Save(outf)
#Open(inf); Select(18); Copy(); Open(outf); Select(0u22e6); Paste(); Save(outf)
#Open(inf); Select(19); Copy(); Open(outf); Select(0u22e7); Paste(); Save(outf)
#Open(inf); Select(20); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(21); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(22); Copy(); Open(outf); Select(0u2ab5); Paste(); Save(outf)
Open(inf); Select(23); Copy(); Open(outf); Select(0u2ab6); Paste(); Save(outf)
Open(inf); Select(24); Copy(); Open(outf); Select(0u2ab9); Paste(); Save(outf)
Open(inf); Select(25); Copy(); Open(outf); Select(0u2aba); Paste(); Save(outf)
Open(inf); Select(26); Copy(); Open(outf); Select(0u2a89); Paste(); Save(outf)
Open(inf); Select(27); Copy(); Open(outf); Select(0u2a8a); Paste(); Save(outf)
Open(inf); Select(28); Copy(); Open(outf); Select(0u2241); Paste(); Save(outf)
Open(inf); Select(29); Copy(); Open(outf); Select(0u2247); Paste(); Save(outf)

# assignment is big solidus, questionable
Open(inf); Select(30); Copy(); Open(outf); Select(0u29f8); Paste(); Save(outf)
Open(inf); Select(31); Copy(); Open(outf); Select(0u29f9); Paste(); Save(outf)
#Open(inf); Select(32); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(33); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(34); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(35); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(36); Copy(); Open(outf); Select(0u2acb); Paste(); Save(outf)
Open(inf); Select(37); Copy(); Open(outf); Select(0u2acc); Paste(); Save(outf)
#Open(inf); Select(38); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(39); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(40); Copy(); Open(outf); Select(0u228a); Paste(); Save(outf)
Open(inf); Select(41); Copy(); Open(outf); Select(0u228b); Paste(); Save(outf)
Open(inf); Select(42); Copy(); Open(outf); Select(0u2288); Paste(); Save(outf)
Open(inf); Select(43); Copy(); Open(outf); Select(0u2289); Paste(); Save(outf)
Open(inf); Select(44); Copy(); Open(outf); Select(0u2226); Paste(); Save(outf)
Open(inf); Select(45); Copy(); Open(outf); Select(0u2224); Paste(); Save(outf)
#Open(inf); Select(46); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
#Open(inf); Select(47); Copy(); Open(outf); Select(0u????); Paste(); Save(outf)
Open(inf); Select(48); Copy(); Open(outf); Select(0u22ac); Paste(); Save(outf)
Open(inf); Select(49); Copy(); Open(outf); Select(0u22ae); Paste(); Save(outf)
Open(inf); Select(50); Copy(); Open(outf); Select(0u22ad); Paste(); Save(outf)
Open(inf); Select(51); Copy(); Open(outf); Select(0u22af); Paste(); Save(outf)
Open(inf); Select(52); Copy(); Open(outf); Select(0u22ed); Paste(); Save(outf)
Open(inf); Select(53); Copy(); Open(outf); Select(0u22ec); Paste(); Save(outf)
Open(inf); Select(54); Copy(); Open(outf); Select(0u22ea); Paste(); Save(outf)
Open(inf); Select(55); Copy(); Open(outf); Select(0u22eb); Paste(); Save(outf)
Open(inf); Select(56); Copy(); Open(outf); Select(0u219a); Paste(); Save(outf)
Open(inf); Select(57); Copy(); Open(outf); Select(0u219b); Paste(); Save(outf)
Open(inf); Select(58); Copy(); Open(outf); Select(0u21cd); Paste(); Save(outf)
Open(inf); Select(59); Copy(); Open(outf); Select(0u21cf); Paste(); Save(outf)
Open(inf); Select(60); Copy(); Open(outf); Select(0u21ce); Paste(); Save(outf)
Open(inf); Select(61); Copy(); Open(outf); Select(0u21ae); Paste(); Save(outf)
Open(inf); Select(62); Copy(); Open(outf); Select(0u22c7); Paste(); Save(outf)

# alternate font choice; we go with cmsy 59
#Open(inf); Select(63); Copy(); Open(outf); Select(0u2205); Paste(); Save(outf)
Open(inf); Select(64); Copy(); Open(outf); Select(0u2204); Paste(); Save(outf)

# open capital letters as letterlike forms
Open(inf); Select(67); Copy(); Open(outf); Select(0u2102); Paste(); Save(outf)
Open(inf); Select(72); Copy(); Open(outf); Select(0u210d); Paste(); Save(outf)
Open(inf); Select(78); Copy(); Open(outf); Select(0u2115); Paste(); Save(outf)
Open(inf); Select(80); Copy(); Open(outf); Select(0u2119); Paste(); Save(outf)
Open(inf); Select(81); Copy(); Open(outf); Select(0u211a); Paste(); Save(outf)
Open(inf); Select(82); Copy(); Open(outf); Select(0u211d); Paste(); Save(outf)
Open(inf); Select(90); Copy(); Open(outf); Select(0u2124); Paste(); Save(outf)

Open(inf); Select(102); Copy(); Open(outf); Select(0u2127); Paste(); Save(outf)

# it's unclear whether this is meant to be eth or a crossed mirror 6
Open(inf); Select(103); Copy(); Open(outf); Select(0u00f0); Paste(); Save(outf)
Open(inf); Select(104); Copy(); Open(outf); Select(0u2242); Paste(); Save(outf)
Open(inf); Select(105); Copy(); Open(outf); Select(0u2136); Paste(); Save(outf)
Open(inf); Select(106); Copy(); Open(outf); Select(0u2137); Paste(); Save(outf)
Open(inf); Select(107); Copy(); Open(outf); Select(0u2138); Paste(); Save(outf)
Open(inf); Select(108); Copy(); Open(outf); Select(0u22d6); Paste(); Save(outf)
Open(inf); Select(109); Copy(); Open(outf); Select(0u22d7); Paste(); Save(outf)
Open(inf); Select(110); Copy(); Open(outf); Select(0u22c9); Paste(); Save(outf)
Open(inf); Select(111); Copy(); Open(outf); Select(0u22ca); Paste(); Save(outf)
#Open(inf); Select(112); Copy(); Open(outf); Select(0u???); Paste(); Save(outf)
#Open(inf); Select(113); Copy(); Open(outf); Select(0u???); Paste(); Save(outf)
#Open(inf); Select(114); Copy(); Open(outf); Select(0u???); Paste(); Save(outf)
Open(inf); Select(115); Copy(); Open(outf); Select(0u223c); Paste(); Save(outf)
Open(inf); Select(116); Copy(); Open(outf); Select(0u2248); Paste(); Save(outf)
Open(inf); Select(117); Copy(); Open(outf); Select(0u224a); Paste(); Save(outf)
Open(inf); Select(118); Copy(); Open(outf); Select(0u2ab8); Paste(); Save(outf)
Open(inf); Select(119); Copy(); Open(outf); Select(0u2ab7); Paste(); Save(outf)
Open(inf); Select(120); Copy(); Open(outf); Select(0u21b6); Paste(); Save(outf)
Open(inf); Select(121); Copy(); Open(outf); Select(0u21b7); Paste(); Save(outf)

# encoded as Digamma; seems questionable
Open(inf); Select(122); Copy(); Open(outf); Select(0u03dc); Paste(); Save(outf)

Open(inf); Select(125); Copy(); Open(outf); Select(0u210f); Paste(); Save(outf)
Open(inf); Select(126); Copy(); Open(outf); Select(0u0127); Paste(); Save(outf)

# synthesize composite characters

Select(0u003d); Copy(); Select(0u2260); Paste();
Select(0u0338); Copy(); Select(0u2260); PasteInto(); RemoveOverlap();

Select(0u2013); CopyReference(); Select(0u005f); Paste();
Transform(100, 0, 0, 100, 0, -40000)

Select(32)
SetWidth(260)

SelectAll()
ClearHints()
ChangePrivateEntry("BlueValues", "[]")
ChangePrivateEntry("OtherBlues", "[]")
DontAutoHint()

Generate("ghr10.otf")