#package Aquinas;

#use Storable;
#require Exporter;
#our @ISA = qw(Exporter);
#our @EXPORT = qw($indexfile %books);  # symbols to export on request
 
our $indexfile = "./aquinasindex.storable";

# Theese are the Books we're looking for. Each books have a list of alternative spellings
our %books = (
	"Romans" => ["Rom", "Romans", "Roman"],
	"Matthew" => ["Mat", "Matth", "Matthew"],
	"Genesis" => ["Gen", "Genes"],
	"Exodus" => ["Exod" ],
	"Leviticus" => ["Levit"],
	"Numbers" => ["Num", "Numer"],
	"Deuteronomy" => ["Deuter", "Deuteron", "Deut", "Deuteronomii"],
	"Joshua" => ["Josue", "Jos", "Iosue", "Ios"],
	"Judges" => ["Judic", "Judicum", "Iudic", "Iudicum"],
	"Ruth" => ["Ruth"],
	"1 Samuel" => ["1. Reg", "1. Regum",],
	"1 Samuel" => ["2. Reg",  "2. Regum",],
	"1 Kings" => ["3. Reg",  "3. Regum", "3. Regi"],
	"2 Kings" => ["4. Reg", "4. Reg", "4. Regum", "4. Regi"],
	"1 Chronicles" => ["1. Paralip", "1 Paralip"],
	"2 Chronicles" => ["2. Paralip", "Paralip", "2. Paral"],
	"Ezra" => ["1. Esdr", "Esdr. 1."],
	"Nehemiah" => ["Neh"],
	"Tobit" => ["Tobias"],
	"Judith" => ["Judith", "Iudith"],
	"Esther" => ["Hester"],
	"Job" => ["Iob", "Job"],
	"Psalms" => ["Psal", "Ps", "Psalm"],
	"Proverbs" => ["Proverb", "Prover", "Prov"],
	"Ecclesiastes" => ["Ecclesiast", "Eccl", "Eccles", "Eccle"],
	"Canticle of Canticles" => ["Cant", "Cantic"],
	"Wisdom" => ["Sap", "Sap.", "Sapient", "Sapien"],
	"Ecclesiasticus" => ["Eccl", "Eccle"],
	"Isaiah" => ["Isai", "Isa", "Is"],
	"Jeremiah" => ["Jerem", "Ierem", "Hier", "Ier", "Hierem", "Hieremiae"],
	"Lamentations" => ["Thren"],
	"Ezechiel" => ["Ezech"],
	"Daniel" => ["Dan"],
	"Hosea" => ["Oseae", "Osee"],
	"Joel" => ["Joelis", "Joel"],
	"Amos" => ["Amos"],
	"Jonah" => ["Jon", "Jonae"],
	"Micah" => ["Mich", "Michaeae"],
	"Nahum" => ["Nahum"],
	"Habakkuk" => ["Abacuc", "Habac", "Habacuc"],
	"Zephaniah" => ["Sophon", "Sophonia"],
	"Zechariah" => ["Zach", "Zachar", "Zachariae"],
	"Malachi" => ["Malach"],
	"Tobit" => ["Tobiae", "Tob"],
	"Judith" => ["Judith"],
	"Wisdom" => ["Sap", "Sapient", "Sapien", "Sapientiae"],
	"Sirach" => ["Eccli"],
	"Baruch" => ["Baruch"],
	"1 Maccabees" => ["1. Machab"],
	"2 Maccabees" => ["2. Machab"],
	"1 Esdras" => ["1 Esdr"],
	"Mark" => ["Marci", "Marcus", "Marc"],
	"Luke" => ["Luc"],
	"John" => ["Joan", "Ioan", "Io"],
	"1 John" => ["I Ioan", "1 Joan", "I Ioannis", "I Io"],
	"2 John" => ["II canonica Iohannis", "II Io"],
	"3 John" => ["III Io"],
	"Acts" => ["Act"],
	"1 Corinthians" => ["I Cor"],
	"2 Corinthians" => ["2 Cor"],
	"Galatians" => ["Gal", "Galat"],
	"Ephesians" => ["Ephes"],
	"Philippians" => ["Phil", "Philipp"],
	"Colossians" => ["Col"],
	"1 Thessalonians" => ["I Thess", "1 Thess", "I ad Thessal"],
	"2 Thessalonians" => ["2 Thess", "II ad Thess", "II ad Thessal"],
	"1 Timothy" => ["1 Timoth", "I ad Tim", "I Tim"],
	"2 Timothy" => ["2 Timoth", "II ad Tim", "II Tim"],
	"Titus" => ["Tit"],
	"Philemon" => ["Philem"],
	"Hebrews" => ["Hebr", "Heb"],
	"James" => ["Iac", "Jac"],
	"1 Peter" => ["I Pet", "1 Pet"],
	"2 Peter" => ["II Pet", "2 Pet"],
	"Jude" => ["Iud", "Iudas in sua canonica"],
	"Apocalypse" => ["Apoc", "Apocal", "Apocalyp"]
	);

# These are the books in english, mapping back to the canonical-name. 
our %englishbooks = (
	"Romans" => ["Romans"],
	"Matthew" => ["Matthew"],
	"Genesis" => ["Genesis"],
	"Exodus" => ["Exodus"],
	"Leviticus" => ["Leviticus"],
	"Numbers" => ["Numbers"],
	"Deuteronomy" => ["Deuteronomy"],
	"Joshua" => ["Joshua"],
	"Judges" => ["Judges"],
	"Ruth" => ["Ruth"],
	"1 Samuel" => ["1 Samuel"],
	"2 Samuel" => ["2 Samuel"],
	"1 Kings" => ["1 Kings"],
	"2 Kings" => ["2 Kings"],
	"1 Chronicles" => ["1 Chronicles"],
	"2 Chronicles" => ["2 Chronicles"],
	"Ezra" => ["Ezra"],
	"Nehemiah" => ["Nehemiah"],
	"Tobit" => ["Tobit"],
	"Judith" => ["Judith"],
	"Esther" => ["Esther"],
	"Job" => ["Job"],
	"Psalms" => ["Psalms"],
	"Proverbs" => ["Proverbs"],
	"Ecclesiastes" => ["Ecclesiastes", "Eccl"],
	"Canticle of Canticles" => ["Canticle of Canticles"],
	"Wisdom" => ["Wisdom"],
	"Ecclesiasticus" => ["Ecclesiasticus"],
	"Isaiah" => ["Isaiah"],
	"Jeremiah" => ["Jeremiah"],
	"Lamentations" => ["Lamentations"],
	"Ezechiel" => ["Ezechiel"],
	"Daniel" => ["Daniel"],
	"Hosea" => ["Hosea"],
	"Joel" => ["Joel"],
	"Amos" => ["Amos"],
	"Jonah" => ["Jonah"],
	"Micah" => ["Micah"],
	"Nahum" => ["Nahum"],
	"Habakkuk" => ["Habakkuk"],
	"Zephaniah" => ["Zephaniah"],
	"Zechariah" => ["Zechariah"],
	"Malachi" => ["Malachi"],
	"Tobit" => ["Tobit"],
	"Judith" => ["Judith"],
	"Wisdom" => ["Wisdom"],
	"Sirach" => ["Sirach"],
	"Baruch" => ["Baruch"],
	"1 Maccabees" => ["1 Maccabees"],
	"2 Maccabees" => ["2 Maccabees"],
	"1 Esdras" => ["1 Esdras"],
	"Mark" => ["Mark"],
	"Luke" => ["Luke"],
	"John" => ["John", "Jn"],
	"1 John" => ["1 John", "1 Jn"],
	"2 John" => ["2 John", "2 Jn"],
	"3 John" => ["3 John", "3 Jn"],
	"Acts" => ["Acts"],
	"1 Corinthians" => ["1 Corinthians"],
	"2 Corinthians" => ["2 Corinthians"],
	"Galatians" => ["Galatians"],
	"Ephesians" => ["Ephesians"],
	"Philippians" => ["Philippians"],
	"Colossians" => ["Colossians"],
	"1 Thessalonians" => ["1 Thessalonians"],
	"2 Thessalonians" => ["2 Thessalonians"],
	"1 Timothy" => ["1 Timothy"],
	"2 Timothy" => ["2 Timothy"],
	"Titus" => ["Titus"],
	"Philemon" => ["Philemon"],
	"Hebrews" => ["Hebrews"],
	"James" => ["James"],
	"1 Peter" => ["1 Peter"],
	"2 Peter" => ["2 Peter"],
	"Jude" => ["Jude"],
	"Apocalypse" => ["Apocalypse"]
	);

















