; EBCDIC-IS-FRISS UCS-2 encoding rule
; source:  ftp://dkuug.dk/i18n/charmaps/EBCDIC-IS-FRISS
any [
#{40} (insert tail result #{0020}) | 
#{45} (insert tail result #{00E1}) | 
#{4A} (insert tail result #{003C}) | 
#{4B} (insert tail result #{002E}) | 
#{4C} (insert tail result #{00C1}) | 
#{4D} (insert tail result #{0028}) | 
#{4E} (insert tail result #{002B}) | 
#{4F} (insert tail result #{0021}) | 
#{50} (insert tail result #{00D0}) | 
#{51} (insert tail result #{00E9}) | 
#{55} (insert tail result #{00ED}) | 
#{59} (insert tail result #{0024}) | 
#{5A} (insert tail result #{0025}) | 
#{5B} (insert tail result #{00C9}) | 
#{5C} (insert tail result #{002A}) | 
#{5D} (insert tail result #{0029}) | 
#{5E} (insert tail result #{003B}) | 
#{5F} (insert tail result #{0026}) | 
#{60} (insert tail result #{002D}) | 
#{61} (insert tail result #{002F}) | 
#{69} (insert tail result #{0023}) | 
#{6A} (insert tail result #{2018}) | 
#{6B} (insert tail result #{002C}) | 
#{6C} (insert tail result #{00DE}) | 
#{6D} (insert tail result #{005F}) | 
#{6E} (insert tail result #{003E}) | 
#{6F} (insert tail result #{003F}) | 
#{75} (insert tail result #{00CD}) | 
#{78} (insert tail result #{007C}) | 
#{79} (insert tail result #{00F0}) | 
#{7A} (insert tail result #{003A}) | 
#{7B} (insert tail result #{00C6}) | 
#{7C} (insert tail result #{00D6}) | 
#{7D} (insert tail result #{0027}) | 
#{7E} (insert tail result #{003D}) | 
#{7F} (insert tail result #{0022}) | 
#{81} (insert tail result #{0061}) | 
#{82} (insert tail result #{0062}) | 
#{83} (insert tail result #{0063}) | 
#{84} (insert tail result #{0064}) | 
#{85} (insert tail result #{0065}) | 
#{86} (insert tail result #{0066}) | 
#{87} (insert tail result #{0067}) | 
#{88} (insert tail result #{0068}) | 
#{89} (insert tail result #{0069}) | 
#{8D} (insert tail result #{00DD}) | 
#{91} (insert tail result #{006A}) | 
#{92} (insert tail result #{006B}) | 
#{93} (insert tail result #{006C}) | 
#{94} (insert tail result #{006D}) | 
#{95} (insert tail result #{006E}) | 
#{96} (insert tail result #{006F}) | 
#{97} (insert tail result #{0070}) | 
#{98} (insert tail result #{0071}) | 
#{99} (insert tail result #{0072}) | 
#{A0} (insert tail result #{00B0}) | 
#{A1} (insert tail result #{00F6}) | 
#{A2} (insert tail result #{0073}) | 
#{A3} (insert tail result #{0074}) | 
#{A4} (insert tail result #{0075}) | 
#{A5} (insert tail result #{0076}) | 
#{A6} (insert tail result #{0077}) | 
#{A7} (insert tail result #{0078}) | 
#{A8} (insert tail result #{0079}) | 
#{A9} (insert tail result #{007A}) | 
#{AC} (insert tail result #{005B}) | 
#{AD} (insert tail result #{00FD}) | 
#{BC} (insert tail result #{005D}) | 
#{BD} (insert tail result #{00A8}) | 
#{C0} (insert tail result #{00FE}) | 
#{C1} (insert tail result #{0041}) | 
#{C2} (insert tail result #{0042}) | 
#{C3} (insert tail result #{0043}) | 
#{C4} (insert tail result #{0044}) | 
#{C5} (insert tail result #{0045}) | 
#{C6} (insert tail result #{0046}) | 
#{C7} (insert tail result #{0047}) | 
#{C8} (insert tail result #{0048}) | 
#{C9} (insert tail result #{0049}) | 
#{CE} (insert tail result #{00F3}) | 
#{D0} (insert tail result #{00E6}) | 
#{D1} (insert tail result #{004A}) | 
#{D2} (insert tail result #{004B}) | 
#{D3} (insert tail result #{004C}) | 
#{D4} (insert tail result #{004D}) | 
#{D5} (insert tail result #{004E}) | 
#{D6} (insert tail result #{004F}) | 
#{D7} (insert tail result #{0050}) | 
#{D8} (insert tail result #{0051}) | 
#{D9} (insert tail result #{0052}) | 
#{DE} (insert tail result #{00FA}) | 
#{E0} (insert tail result #{00B4}) | 
#{E2} (insert tail result #{0053}) | 
#{E3} (insert tail result #{0054}) | 
#{E4} (insert tail result #{0055}) | 
#{E5} (insert tail result #{0056}) | 
#{E6} (insert tail result #{0057}) | 
#{E7} (insert tail result #{0058}) | 
#{E8} (insert tail result #{0059}) | 
#{E9} (insert tail result #{005A}) | 
#{EE} (insert tail result #{00D3}) | 
#{F0} (insert tail result #{0030}) | 
#{F1} (insert tail result #{0031}) | 
#{F2} (insert tail result #{0032}) | 
#{F3} (insert tail result #{0033}) | 
#{F4} (insert tail result #{0034}) | 
#{F5} (insert tail result #{0035}) | 
#{F6} (insert tail result #{0036}) | 
#{F7} (insert tail result #{0037}) | 
#{F8} (insert tail result #{0038}) | 
#{F9} (insert tail result #{0039}) | 
#{FE} (insert tail result #{00DA}) | 
#{FF} (insert tail result #{007F}) | 
#{FF} (insert tail result #{007F}) | 
#{40} (insert tail result #{0020}) | 
#{4F} (insert tail result #{0021}) | 
#{7F} (insert tail result #{0022}) | 
#{69} (insert tail result #{0023}) | 
#{59} (insert tail result #{0024}) | 
#{5A} (insert tail result #{0025}) | 
#{5F} (insert tail result #{0026}) | 
#{7D} (insert tail result #{0027}) | 
#{4D} (insert tail result #{0028}) | 
#{5D} (insert tail result #{0029}) | 
#{5C} (insert tail result #{002A}) | 
#{4E} (insert tail result #{002B}) | 
#{6B} (insert tail result #{002C}) | 
#{60} (insert tail result #{002D}) | 
#{60} (insert tail result #{002D}) | 
#{4B} (insert tail result #{002E}) | 
#{4B} (insert tail result #{002E}) | 
#{61} (insert tail result #{002F}) | 
#{61} (insert tail result #{002F}) | 
#{F0} (insert tail result #{0030}) | 
#{F1} (insert tail result #{0031}) | 
#{F2} (insert tail result #{0032}) | 
#{F3} (insert tail result #{0033}) | 
#{F4} (insert tail result #{0034}) | 
#{F5} (insert tail result #{0035}) | 
#{F6} (insert tail result #{0036}) | 
#{F7} (insert tail result #{0037}) | 
#{F8} (insert tail result #{0038}) | 
#{F9} (insert tail result #{0039}) | 
#{7A} (insert tail result #{003A}) | 
#{5E} (insert tail result #{003B}) | 
#{4A} (insert tail result #{003C}) | 
#{7E} (insert tail result #{003D}) | 
#{6E} (insert tail result #{003E}) | 
#{6F} (insert tail result #{003F}) | 
#{AC} (insert tail result #{005B}) | 
#{BC} (insert tail result #{005D}) | 
#{6D} (insert tail result #{005F}) | 
#{6D} (insert tail result #{005F}) | 
#{78} (insert tail result #{007C}) | 
copy c 1 skip (insert tail result join #{00} c)
]