##---------------------------------------------------------------------------##
##  File:
##      @(#) S4.pm 1.1 97/09/11 17:41:12 @(#)
##  Author:
##      Earl Hood       ehood@medusa.acs.uci.edu
##  Description:
##      Mappings for ISO-8859-4.
##---------------------------------------------------------------------------##
##    Copyright (C) 1997        Earl Hood, ehood@medusa.acs.uci.edu
##
##    This program is free software; you can redistribute it and/or modify
##    it under the terms of the GNU General Public License as published by
##    the Free Software Foundation; either version 2 of the License, or
##    (at your option) any later version.
##
##    This program is distributed in the hope that it will be useful,
##    but WITHOUT ANY WARRANTY; without even the implied warranty of
##    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
##    GNU General Public License for more details.
##
##    You should have received a copy of the GNU General Public License
##    along with this program; if not, write to the Free Software
##    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
##    02111-1307, USA
##---------------------------------------------------------------------------##

###############################################################################
##	Mapping arrays for characters to entity references
###############################################################################

package SGML::ISO8859::S4;

##---------------------------------------------------------------------------
##	ISO-8859-4: Latin-4
##---------------------------------------------------------------------------

%Char2Ent = (
  #--------------------------------------------------------------------------
  # Hex Code	Entity Ref	# ISO external entity and description
  #--------------------------------------------------------------------------
    0xA1,	"Aogon",	# ISOlat2: LATIN CAPITAL LETTER A WITH OGONEK
    0xA2,	"kgreen",	# ISOlat2: LATIN SMALL LETTER KRA (Greenlandic)
    0xA3,	"Rcedil",	# ISOlat2: LATIN CAPITAL LETTER R WITH CEDILLA
    0xA4,	"curren",	# ISOnum : CURRENCY SIGN
    0xA5,	"Itilde",     	# ISOlat2: LATIN CAPITAL LETTER I WITH TILDE
    0xA6,	"Lcedil",	# ISOlat2: LATIN CAPITAL LETTER L WITH CEDILLA
    0xA7,	"sect", 	# ISOnum : SECTION SIGN
    0xA8,	"die",  	# ISOdia : DIAERESIS
    0xA9,	"Scaron",	# ISOlat2: LATIN CAPITAL LETTER S WITH CARON
    0xAA,	"Emacr",	# ISOlat2: LATIN CAPITAL LETTER E WITH MACRON
    0xAB,	"Gcedil",	# ISOlat2: LATIN CAPITAL LETTER G WITH CEDILLA
    0xAC,	"Tstrok",	# ISOlat2: LATIN CAPITAL LETTER T WITH STROKE
    0xAD,	"shy",  	# ISOnum : SOFT HYPHEN
    0xAE,	"Zcaron",     	# ISOlat2: LATIN CAPITAL LETTER Z WITH CARON
    0xAF,	"macr", 	# ISOdia : MACRON
    0xB0,	"deg",  	# ISOnum : DEGREE SIGN
    0xB1,	"aogon",	# ISOlat2: LATIN SMALL LETTER A WITH OGONEK
    0xB2,	"ogon", 	# ISOdia : OGONEK
    0xB3,	"rcedil",	# ISOlat2: LATIN SMALL LETTER R WITH CEDILLA
    0xB4,	"acute",	# ISOdia : ACUTE ACCENT
    0xB5,	"itilde",	# ISOlat2: LATIN SMALL LETTER I WITH TILDE
    0xB6,	"lcedil",	# ISOlat2: LATIN SMALL LETTER L WITH CEDILLA
    0xB7,	"caron",	# ISOdia : CARON
    0xB8,	"cedil",	# ISOdia : CEDILLA
    0xB9,	"scaron",	# ISOlat2: LATIN SMALL LETTER S WITH CARON
    0xBA,	"emacr",	# ISOlat2: LATIN SMALL LETTER E WITH MACRON
    0xBB,	"gcedil",	# ISOlat2: LATIN SMALL LETTER G WITH CEDILLA
    0xBC,	"tstrok",	# ISOlat2: LATIN SMALL LETTER J WITH STROKE
    0xBD,	"ENG",  	# ISOlat2: LATIN CAPITAL LETTER ENG (Lappish)
    0xBE,	"zcaron",    	# ISOlat2: LATIN SMALL LETTER Z WITH CARON
    0xBF,	"eng",  	# ISOlat2: LATIN SMALL LETTER ENG (Lappish)
    0xC0,	"Amacr",	# ISOlat1: LATIN CAPITAL LETTER A WITH MACRON
    0xC1,	"Aacute",	# ISOlat1: LATIN CAPITAL LETTER A WITH ACUTE
    0xC2,	"Acirc",	# ISOlat1: LATIN CAPITAL LETTER A WITH
				#	   CIRCUMFLEX
    0xC3,	"Atilde",     	# ISOlat1: LATIN CAPITAL LETTER A WITH TILDE
    0xC4,	"Auml", 	# ISOlat1: LATIN CAPITAL LETTER A WITH
				#	   DIAERESIS
    0xC5,	"Aring",	# ISOlat1: LATIN CAPITAL LETTER A WITH RING
				#	   ABOVE
    0xC6,	"AElig",	# ISOlat1: LATIN CAPITAL LETTER AE
    0xC7,	"Iogon",	# ISOlat2: LATIN CAPITAL LETTER I WITH OGONEK
    0xC8,	"Ccaron",	# ISOlat2: LATIN CAPITAL LETTER C WITH CARON
    0xC9,	"Eacute",	# ISOlat1: LATIN CAPITAL LETTER E WITH ACUTE
    0xCA,	"Eogon",	# ISOlat2: LATIN CAPITAL LETTER E WITH OGONEK
    0xCB,	"Euml", 	# ISOlat1: LATIN CAPITAL LETTER E WITH
				#	   DIAERESIS
    0xCC,	"Edot", 	# ISOlat1: LATIN CAPITAL LETTER E WITH DOT
				#	   ABOVE
    0xCD,	"Iacute",	# ISOlat1: LATIN CAPITAL LETTER I WITH ACUTE
    0xCE,	"Icirc",	# ISOlat1: LATIN CAPITAL LETTER I WITH
				#	   CIRCUMFLEX
    0xCF,	"Imacr",	# ISOlat2: LATIN CAPITAL LETTER I WITH MACRON
    0xD0,	"Dstrok",     	# ISOlat2: LATIN CAPITAL LETTER D WITH STROKE
    0xD1,	"Ncedil",	# ISOlat2: LATIN CAPITAL LETTER N WITH CEDILLA
    0xD2,	"Omacr",	# ISOlat2: LATIN CAPITAL LETTER O WITH MACRON
    0xD3,	"Kcedil",	# ISOlat2: LATIN CAPITAL LETTER K WITH CEDILLA
    0xD4,	"Ocirc",	# ISOlat1: LATIN CAPITAL LETTER O WITH
				#	   CIRCUMFLEX
    0xD5,	"Otilde",	# ISOlat1: LATIN CAPITAL LETTER O WITH TILDE
    0xD6,	"Ouml", 	# ISOlat1: LATIN CAPITAL LETTER O WITH
				#	   DIAERESIS
    0xD7,	"times",	# ISOnum : MULTIPLICATION SIGN
    0xD8,	"Oslash",	# ISOlat1: LATIN CAPITAL LETTER O WITH STROKE
    0xD9,	"Uogon",	# ISOlat2: LATIN CAPITAL LETTER U WITH OGONEK
    0xDA,	"Uacute",	# ISOlat1: LATIN CAPITAL LETTER U WITH ACUTE
    0xDB,	"Ucirc",	# ISOlat1: LATIN CAPITAL LETTER U WITH
				#	   CIRCUMFLEX
    0xDC,	"Uuml", 	# ISOlat1: LATIN CAPITAL LETTER U WITH
				#	   DIAERESIS
    0xDD,	"Utilde",	# ISOlat2: LATIN CAPITAL LETTER U WITH TILDE
    0xDE,	"Umacr",	# ISOlat2: LATIN CAPITAL LETTER U WITH MACRON
    0xDF,	"szlig",	# ISOlat1: LATIN SMALL LETTER SHARP S (German)
    0xE0,	"amacr",	# ISOlat1: LATIN SMALL LETTER A WITH MACRON
    0xE1,	"aacute",	# ISOlat1: LATIN SMALL LETTER A WITH ACUTE
    0xE2,	"acirc",	# ISOlat1: LATIN SMALL LETTER A WITH CIRCUMFLEX
    0xE3,	"atilde",     	# ISOlat1: LATIN SMALL LETTER A WITH TILDE
    0xE4,	"auml", 	# ISOlat1: LATIN SMALL LETTER A WITH DIAERESIS
    0xE5,	"aring",	# ISOlat1: LATIN SMALL LETTER A WITH RING ABOVE
    0xE6,	"aelig",	# ISOlat1: LATIN SMALL LETTER AE
    0xE7,	"iogon",	# ISOlat2: LATIN SMALL LETTER I WITH OGONEK
    0xE8,	"ccaron",	# ISOlat2: LATIN SMALL LETTER C WITH CARON
    0xE9,	"eacute",	# ISOlat2: LATIN SMALL LETTER E WITH ACUTE
    0xEA,	"eogon",	# ISOlat2: LATIN SMALL LETTER E WITH OGONEK
    0xEB,	"euml", 	# ISOlat1: LATIN SMALL LETTER E WITH DIAERESIS
    0xEC,	"edot", 	# ISOlat2: LATIN SMALL LETTER E WITH DOT ABOVE
    0xED,	"iacute",	# ISOlat1: LATIN SMALL LETTER I WITH ACUTE
    0xEE,	"icirc",	# ISOlat1: LATIN SMALL LETTER I WITH CIRCUMFLEX
    0xEF,	"imacr",	# ISOlat2: LATIN SMALL LETTER I WITH MACRON
    0xF0,	"dstrok",    	# ISOlat2: LATIN SMALL LETTER D WITH STROKE
    0xF1,	"ncedil",	# ISOlat2: LATIN SMALL LETTER N WITH CEDILLA
    0xF2,	"omacr",	# ISOlat2: LATIN SMALL LETTER O WITH MACRON
    0xF3,	"kcedil",	# ISOlat2: LATIN SMALL LETTER K WITH CEDILLA
    0xF4,	"ocirc",	# ISOlat1: LATIN SMALL LETTER O WITH CIRCUMFLEX
    0xF5,	"otilde",	# ISOlat1: LATIN SMALL LETTER O WITH TILDE
    0xF6,	"ouml", 	# ISOlat1: LATIN SMALL LETTER O WITH DIAERESIS
    0xF7,	"divide",	# ISOnum : DIVISION SIGN
    0xF8,	"oslash",	# ISOlat1: LATIN SMALL LETTER O WITH STROKE
    0xF9,	"uogon",	# ISOlat2: LATIN SMALL LETTER U WITH OGONEK
    0xFA,	"uacute",	# ISOlat1: LATIN SMALL LETTER U WITH ACUTE
    0xFB,	"ucirc",	# ISOlat1: LATIN SMALL LETTER U WITH
				#	   CIRCUMFLEX
    0xFC,	"uuml", 	# ISOlat1: LATIN SMALL LETTER U WITH DIAERESIS
    0xFD,	"utilde",	# ISOlat2: LATIN SMALL LETTER U WITH TILDE
    0xFE,	"umacr",	# ISOlat2: LATIN SMALL LETTER U WITH MACRON
    0xFF,	"dot",  	# ISOdia : DOT ABOVE
);

%Ent2Char = reverse %Char2Ent;

1;