commit c101b2b474ec92924e49ba1daf5d8313474ab842
Author: thangarson <thangarson>
Date:   Wed Aug 11 21:14:35 2004 +0000

    Initial revision

diff --git a/WordToXML/ItalicOptions.frm b/WordToXML/ItalicOptions.frm
new file mode 100644
index 0000000..3162527
--- /dev/null
+++ b/WordToXML/ItalicOptions.frm
@@ -0,0 +1,114 @@
+VERSION 5.00
+Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ItalicOptions 
+   Caption         =   "Options for Italics"
+   ClientHeight    =   1650
+   ClientLeft      =   30
+   ClientTop       =   480
+   ClientWidth     =   7125
+   OleObjectBlob   =   "ItalicOptions033104.frx":0000
+   StartUpPosition =   1  'CenterOwner
+End
+Attribute VB_Name = "ItalicOptions"
+Attribute VB_GlobalNameSpace = False
+Attribute VB_Creatable = False
+Attribute VB_PredeclaredId = True
+Attribute VB_Exposed = False
+Dim lastChoice As Integer
+Dim cancelled As Boolean
+
+
+Private Sub Cancel_Click()
+    cancelled = True
+    ItalicOptions.Hide
+End Sub
+
+Private Sub Submit_Click()
+    lastChoice = ItalicOptions.StyleChoices.ListIndex
+    ItalicOptions.Hide
+End Sub
+
+Private Sub UserForm_Activate()
+    ItalicOptions.StyleChoices.SetFocus
+    ItalicOptions.StyleChoices.ListIndex = lastChoice
+    cancelled = False
+End Sub
+
+Private Sub UserForm_Initialize()
+    StyleChoices.AddItem "Weak Emphasis"            'ListIndex = 0
+    StyleChoices.AddItem "Title"                    'ListIndex = 1
+    StyleChoices.AddItem "Tibetan Word"             'ListIndex = 2
+    StyleChoices.AddItem "Sanskrit Word"            'ListIndex = 3
+    StyleChoices.AddItem "Chinese Word"             'ListIndex = 4
+    StyleChoices.AddItem "Japanese Word"            'ListIndex = 5
+    StyleChoices.AddItem "Personal Name Human"      'ListIndex = 6
+    StyleChoices.AddItem "Personal Name Other"      'ListIndex = 7
+    StyleChoices.AddItem "Place Name"               'ListIndex = 8
+    StyleChoices.AddItem "Organization Name"        'ListIndex = 9
+    StyleChoices.AddItem "Reference"                'ListIndex = 10
+    StyleChoices.AddItem "Strong Emphasis"          'ListIndex = 11
+    StyleChoices.AddItem "Remove Italics"           'ListIndex = 12
+End Sub
+Public Function wasCancelled() As Boolean
+    wasCancelled = cancelled
+End Function
+Public Function getSelectedStyle() As Style
+    
+    Select Case lastChoice
+        Case 0  ' Weak Emphasis
+            Set getSelectedStyle = ActiveDocument.Styles("Emphasis Weak,ew")
+            Exit Function
+            
+        Case 1  ' Title English
+            Set getSelectedStyle = ActiveDocument.Styles("Text Title,tt")
+            Exit Function
+            
+        Case 2  ' Tibetan Word
+            Set getSelectedStyle = ActiveDocument.Styles("Lang Tibetan,tib")
+            Exit Function
+            
+        Case 3  ' Sanskrit Word
+            Set getSelectedStyle = ActiveDocument.Styles("Lang Sanskrit,san")
+            Exit Function
+            
+        Case 4  ' Chinese Word
+            Set getSelectedStyle = ActiveDocument.Styles("Lang Chinese,chi")
+            Exit Function
+            
+        Case 5  ' Japanese Word
+            Set getSelectedStyle = ActiveDocument.Styles("Lang Japanese,jap")
+            Exit Function
+            
+        Case 6  ' Personal Name Human
+            Set getSelectedStyle = ActiveDocument.Styles("Name Personal Human,nph")
+            Exit Function
+            
+        Case 7  ' Personal Name Other
+            Set getSelectedStyle = ActiveDocument.Styles("Name Personal other,npo")
+            Exit Function
+            
+        Case 8  ' Place Name
+            Set getSelectedStyle = ActiveDocument.Styles("Name Place,np")
+            Exit Function
+        
+        Case 9  ' Organizational Name
+            Set getSelectedStyle = ActiveDocument.Styles("Name organization,nor")
+            Exit Function
+            
+        Case 10  ' Reference
+            Set getSelectedStyle = ActiveDocument.Styles("Reference,rf")
+            Exit Function
+                
+        Case 11  ' Strong Emphasis
+            Set getSelectedStyle = ActiveDocument.Styles("Emphasis Strong,es")
+            Exit Function
+            
+        Case 12  ' Remove Italics
+            Set getSelectedStyle = ActiveDocument.Styles("Normal,no")
+            Exit Function
+                                
+        Case Default
+            Set getSelectedStyle = ActiveDocument.Styles("Emphasis Weak,ew")
+        
+    End Select
+        
+End Function
diff --git a/WordToXML/ItalicOptions.frx b/WordToXML/ItalicOptions.frx
new file mode 100644
index 0000000..8bcff2a
Binary files /dev/null and b/WordToXML/ItalicOptions.frx differ
diff --git a/WordToXML/NewMacros.bas b/WordToXML/NewMacros.bas
new file mode 100644
index 0000000..a916d7b
--- /dev/null
+++ b/WordToXML/NewMacros.bas
@@ -0,0 +1,1089 @@
+Attribute VB_Name = "NewMacros"
+
+Sub conversionHelp()
+    Dim msgTitle, msg As String
+    
+    msgTitle = "Conversion Macro Help"
+    msg = "The shortcut keys for the conversion macros are as follows:" & vbCrLf & _
+        vbTab & "Convert Document to XML:" & vbTab & "    Ctrl + Alt + c" & vbCrLf & _
+        vbTab & "Convert Italics to Specific Styles: Alt + i" & vbCrLf & _
+        vbTab & "Display This Help Message: " & vbTab & "    Alt + Shift + ?"
+    res = MsgBox(msg, vbOKOnly, msgTitle)
+        
+End Sub
+
+Sub convertToXML()
+    Dim teiHead, flName, temp, writepath As String
+    Dim rng As Range
+    
+    ActiveDocument.Endnotes.Convert
+    writepath = ThisDocument.Path
+    
+    ' Replace entities
+    Application.StatusBar = "Proceessing document: replacing entities!"
+    replaceEntities
+    
+    ' Do Metadata
+    Application.StatusBar = "Proceessing document: converting metadata!"
+    teiHead = doMetadata
+    
+    ' Deal with italicized commas
+    Application.StatusBar = "Proceessing document: de-italicizing commas!"
+    unItalicizeCommas
+    
+    'Deal with tables
+    Application.StatusBar = "Processing document: processing tables!"
+    doTables
+    
+    ' Do specific character styles
+    Application.StatusBar = "Proceessing document: processing character styles!"
+    doCharacterStyles
+    
+    ' Do the Links
+    Application.StatusBar = "Proceessing document: processing links!"
+    doLinks
+    
+    ' Do FootNotes
+    Application.StatusBar = "Proceessing document: processing foot- or endnotes!"
+    doFootNotes
+    doNoteTags
+    
+    ' Do the Italics Bold and Underline
+    Application.StatusBar = "Proceessing document: marking bold, italic, and underline!"
+    doItalicsBoldUnderline
+    
+    ' Do the Paragraph tags
+    doParas
+    
+    ' Do the Divs
+    Application.StatusBar = "Proceessing document: marking outline divisions!"
+    doDivs
+    
+    ' Clean up
+    replaceAllEmptyP
+    
+    Application.StatusBar = "Proceessing document: finalizing markup!"
+    Selection.HomeKey unit:=wdStory
+    Selection.TypeParagraph
+    Selection.MoveUp unit:=wdLine, Count:=1
+    Selection.Style = "Normal,no"
+    Selection.TypeText Text:=teiHead
+    Selection.EndKey unit:=wdStory
+    
+    Selection.TypeText Text:="</body></text></TEI.2>"
+    Selection.EndKey unit:=wdStory, Extend:=wdExtend
+    Selection.Cut
+    
+    Selection.HomeKey unit:=wdStory
+    MsgBox ("Conversion complete! Copy the results and paste into your XML editor!")
+    
+    Exit Sub
+
+End Sub
+Sub doDivs()
+    Dim tagName, closeTag, lastTag, headNum, styleName  As String
+    Dim cnt, ind1, ind2, lvl, lastLvl, numOfLevels As Integer
+    
+    numOfLevels = findHighestHeader()
+    ActiveWindow.ActivePane.View.Type = wdMasterView
+    ActiveWindow.View.ShowHeading 9
+    cnt = ActiveWindow.ActivePane.Document.Paragraphs.Count - 1
+    With Selection
+        .HomeKey unit:=wdStory
+        lastLvl = 0
+        For n = 1 To cnt
+            styleName = .Style
+            If InStr(styleName, "Head") > 0 Then
+                ind1 = InStr(styleName, " ") + 1
+                ind2 = InStr(styleName, ",") - ind1
+                headNum = Mid(styleName, ind1, ind2)
+                lvl = Val(headNum)
+                If numOfLevels < 8 Then
+                    tagName = "div" & headNum
+                    closeTag = tagName
+                Else:
+                    tagName = "div n=""" & lvl & """"
+                    closeTag = "div"
+                End If
+                If lastLvl = lvl Then
+                    .TypeText ("</" & closeTag & ">")
+                ElseIf lastLvl > lvl Then
+                    For lvNum = lastLvl To lvl Step -1
+                       If numOfLevels < 8 Then
+                            .TypeText ("</div" & lvNum & ">")
+                       Else:
+                            .TypeText ("</div>")
+                       End If
+                    Next lvNum
+                End If
+                lastLvl = lvl
+                .TypeText ("<" & tagName & "><head>")
+                If n < cnt Then
+                    .MoveDown unit:=wdParagraph, Count:=1
+                    .MoveLeft unit:=wdCharacter, Count:=1
+                Else
+                    .EndKey unit:=wdStory
+                End If
+                .TypeText ("</head>")
+             End If
+             .MoveDown unit:=wdParagraph, Count:=1
+        Next n
+        ActiveWindow.ActivePane.View.Type = wdNormalView
+        .EndKey unit:=wdStory
+        For n = lvl To 1 Step -1
+            If numOfLevels < 8 Then
+                .TypeText ("</div" & n & ">")
+            Else
+                .TypeText ("</div>")
+            End If
+        Next n
+    End With
+    
+    
+End Sub
+Function findHighestHeader() As Integer
+    Dim para As Paragraph
+    Dim lvl, highest As Integer
+    highest = 1
+    For Each para In ActiveDocument.Paragraphs
+        styleName = para.Style
+        If InStr(styleName, "Head") > 0 Then
+            ind1 = InStr(styleName, " ") + 1
+            ind2 = InStr(styleName, ",") - ind1
+            headNum = Mid(styleName, ind1, ind2)
+            lvl = Val(headNum)
+            If lvl > highest Then highest = lvl
+        End If
+    Next para
+    findHighestHeader = highest
+End Function
+Sub doParas()
+
+    Dim inList, inVerse As Boolean
+    Dim rng As Range
+    Dim openTag, endTag, tagName As String
+    Dim ct As Integer
+    
+    inList = False: inVerse = False
+    Selection.HomeKey unit:=wdStory
+    
+    ct = ActiveDocument.Paragraphs.Count
+
+    For n = 1 To ct
+        Set para = ActiveDocument.Paragraphs(n)
+        Application.StatusBar = "Proceessing document: marking paragraphs (" & n & ")!"
+        If InStr(para.Style, "Heading") > 0 Then GoTo 50
+        If isTable(para) Then GoTo 50
+        tagName = "": openTag = "": endTag = ""
+        Select Case para.Style
+        
+            Case "List Number,ln"
+               If inVerse Then
+                  inVerse = False
+                  openTag = "</lg>"
+               End If
+               If Not inList Then
+                  openTag = openTag & "<list rend=""1"">"
+                  inList = True
+               End If
+               tagName = "item"
+               
+            Case "List Bullet,lb"
+               If inVerse Then
+                  inVerse = False
+                  openTag = "</lg>"
+               End If
+               If Not inList Then
+                  openTag = openTag & "<list rend=""bullet"">"
+                  inList = True
+               End If
+               tagName = "item"
+               
+            Case "Citation Prose,cp"
+               If inList Then
+                  openTag = "</list>"
+                  inList = False
+               End If
+               If inVerse Then
+                  inVerse = False
+                  openTag = "</lg>"
+               End If
+               tagName = "q"
+               
+            Case "Citation Verse 1,cv1"
+               If inList Then
+                  openTag = "</list>"
+                  inList = False
+               End If
+               If Not inVerse Then
+                  openTag = openTag & "<lg>"
+                  inVerse = True
+               End If
+               tagName = "l"
+               
+            Case "Citation Verse 2,cv2"
+               If inList Then
+                  openTag = "</list>"
+                  inList = False
+               End If
+               If Not inVerse Then
+                  openTag = openTag & "<lg>"
+                  inVerse = True
+               End If
+               tagName = "l"
+               
+            Case Else
+               If inList Then
+                  openTag = "</list>"
+                  inList = False
+               ElseIf inVerse Then
+                  openTag = "</lg>"
+                  inVerse = False
+               End If
+               tagName = "p"
+         End Select
+
+        Set rng = ActiveDocument.Paragraphs(n).Range
+        rng.StartOf
+        rng.Text = openTag & "<" & tagName & ">"
+  
+        Set rng = ActiveDocument.Paragraphs(n).Range
+        rng.End = rng.End - 1
+        rng.EndOf
+        rng.Text = "</" & tagName & ">" & endTag
+        ActiveDocument.Paragraphs(n).Style = "Normal,no"
+  
+50    Next n
+
+End Sub
+Function isTable(ByVal para As Paragraph) As Boolean
+    Dim tct, pst, pend, tst, tend As Integer
+    pst = para.Range.Start
+    pend = para.Range.End
+    tct = ActiveDocument.Tables.Count
+    For n = 1 To tct
+        With ActiveDocument.Tables(n)
+            tst = .Range.Start
+            tend = .Range.End
+        End With
+        If pst >= tst And pst <= tend Then
+            isTable = True
+            Exit Function
+        End If
+        If pend >= tst And pend <= tend Then
+            isTable = True
+            Exit Function
+        End If
+    Next n
+    isTable = False
+End Function
+Sub doTables()
+    Dim tble As Table
+    Dim wrkCell As Cell
+    Dim outStr As String
+    Dim rwInd As Integer
+    Dim insertRng As Range
+    
+    While ActiveDocument.Tables.Count > 0
+        outStr = "<list rend=""table""><item>"
+        Set tble = ActiveDocument.Tables.Item(1)
+        Set wrkCell = tble.Cell(1, 1)
+        rwInd = 1
+        While Not (wrkCell Is Nothing)
+            If wrkCell.Row.Index > rwInd Then
+                outStr = outStr & "</item><item>"
+            End If
+            rwInd = wrkCell.RowIndex
+            outStr = outStr & addToTable(wrkCell)
+            Set wrkCell = wrkCell.Next
+        Wend
+        outStr = outStr & "</item></list>"
+        Set insertRng = tble.Range
+        insertRng.Collapse wdCollapseStart
+        tble.Delete
+        insertRng.Select
+        Selection.TypeText Text:=outStr
+    Wend
+End Sub
+Function addToTable(ByVal cl As Cell) As String
+    Dim rng As Range
+    Set rng = cl.Range
+    rng.End = rng.End - 1
+    addToTable = "<rs>" & rng.Text & "</rs>"
+End Function
+Sub doFootNotes()
+Attribute doFootNotes.VB_Description = "Macro recorded 8/12/2003 by Than G"
+Attribute doFootNotes.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.FootnoteTest"
+'
+' FootnoteTest Macro
+' Macro recorded 8/12/2003 by Than G
+'
+    Dim fn As Footnote
+    Dim n, fnNum As Integer
+    Dim rng As Range
+    
+    ActiveDocument.Endnotes.Convert
+    fnNum = ActiveDocument.Footnotes.Count
+    If fnNum > 0 Then
+        For n = 1 To fnNum
+            doFootnoteItalEtc (n)
+            Set fn = ActiveDocument.Footnotes.Item(n)
+            fn.Range.Select
+            Selection.Text = Replace(Selection.Text, Chr(13), "<!--[newLine]-->")
+            Selection.Copy
+            ActiveWindow.ActivePane.Close
+            With Selection
+                .GoTo what:=wdGoToFootnote, Which:=wdGoToFirst, Count:=n, Name:=""
+                .TypeText Text:="~"
+                .Paste
+                .TypeText Text:="^"
+                .MoveRight unit:=wdCharacter, Count:=1, Extend:=wdExtend
+            End With
+            
+        Next n
+        
+        n = 1
+        Do
+            ActiveDocument.Footnotes.Item(1).Delete
+            n = n + 1
+            If n > fnNum Then Exit Do
+        Loop While ActiveDocument.Footnotes.Count > 0
+    End If
+End Sub
+
+Sub doLinks()
+    Dim hyl As Hyperlink
+    Dim n, hyNum As Integer
+    Dim rng As Range
+    Dim addr As String
+    
+    hyNum = ActiveDocument.Hyperlinks.Count
+    
+    For n = 1 To hyNum
+        Set hyl = ActiveDocument.Hyperlinks.Item(n)
+        addr = hyl.Address
+        Set rng = hyl.Range
+        With rng.Font
+            .Italic = False
+            .Bold = False
+            .Underline = wdUnderlineNone
+        End With
+        rng.StartOf
+        rng.Text = "<xref n=""" & addr & """>"
+        Set rng = hyl.Range
+        rng.End = rng.End - 1
+        rng.EndOf
+        rng.Text = "</xref>"
+    Next n
+
+End Sub
+
+Sub doItalicsBoldUnderline()
+    Dim rngToSearch, srchResult, wrng As Range
+    Dim fcount, addOn, y, max As Integer
+    Dim doingFeet As Boolean
+
+    ' Do the body of the text now
+    Set rngToSearch = ActiveDocument.Range
+    Set srchResult = rngToSearch.Duplicate
+    max = 100
+    
+    ' Search and Replace ITALICS
+    y = 0
+    Do
+        y = y + 1
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ""
+            .Font.Italic = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Then Exit Do
+        
+        Set wrng = srchResult.Duplicate
+        addOn = 1
+        If wrng.Style = "Normal,no" Or InStr(wrng.Style, "List") > 0 Then
+            If Not isCharStyle(wrng) Then
+                Set wrng = fixRange(wrng)
+                wrng.Font.Italic = False
+                wrng.StartOf
+                wrng.Text = "<hi rend=""weak"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+                wrng.Font.Italic = False
+                addOn = 5
+            End If
+        End If
+        srchResult.Start = wrng.End + addOn
+        srchResult.End = rngToSearch.End
+        If y > 100 Then Exit Do
+    Loop Until Not srchResult.Find.Found
+    
+    '  Search and Replace BOLD
+    y = 0
+    Set srchResult = rngToSearch.Duplicate
+    Do
+        y = y + 1
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ""
+            .Font.Bold = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Then Exit Do
+        
+        Set wrng = srchResult.Duplicate
+        addOn = 1
+        If wrng.Style = "Normal,no" Or InStr(wrng.Style, "List") > 0 Then
+            If Not isCharStyle(wrng) Then
+                Set wrng = fixRange(wrng)
+                wrng.Font.Bold = False
+                wrng.StartOf
+                wrng.Text = "<hi rend=""strong"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+                wrng.Font.Bold = False
+                addOn = 5
+            End If
+        End If
+        srchResult.Start = wrng.End + addOn
+        srchResult.End = rngToSearch.End
+        If y > 100 Then Exit Do
+    Loop Until Not srchResult.Find.Found
+    
+    ' Do Underline
+    y = 0
+    Set srchResult = rngToSearch.Duplicate
+    Do
+        y = y + 1
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ""
+            .Font.Underline = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Then Exit Do
+        
+        Set wrng = srchResult.Duplicate
+        addOn = 1
+        If wrng.Style = "Normal,no" Or InStr(wrng.Style, "List") > 0 Then
+            If Not isCharStyle(wrng) Then
+                Set wrng = fixRange(wrng)
+                wrng.Font.Underline = wdUnderlineNone
+                wrng.StartOf
+                wrng.Text = "<hi rend=""underline"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+                wrng.Font.Underline = wdUnderlineNone
+                addOn = 5
+            End If
+        End If
+        srchResult.Start = wrng.End + addOn
+        srchResult.End = rngToSearch.End
+        If y > 100 Then Exit Do
+    Loop Until Not srchResult.Find.Found
+    
+End Sub
+
+
+Function doMetadata() As String
+Attribute doMetadata.VB_Description = "Macro recorded 8/13/2003 by Than G"
+Attribute doMetadata.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.tableaccess"
+
+'
+' tableaccess Macro
+' Macro recorded 8/13/2003 by Than G
+'
+    Dim metaTable As Table
+    Dim inData, header As String
+    
+    Open "C:\xml\teiHeader.dat" For Input As #1
+    
+    Do While Not EOF(1)
+        Line Input #1, inData
+        header = header & inData & vbCrLf
+    Loop
+        
+    Close #1
+    
+    Set metaTable = ActiveDocument.Tables(1)
+    
+    header = Replace(header, "{Eng Lang}", doTrim(metaTable.Cell(3, 2)))
+    header = Replace(header, "{Eng Title}", doTrim(metaTable.Cell(1, 2)))
+    header = Replace(header, "{Orig Lang}", doTrim(metaTable.Cell(3, 4)))
+    header = Replace(header, "{Orig Title}", doTrim(metaTable.Cell(2, 2)))
+    header = Replace(header, "{Author}", doTrim(metaTable.Cell(4, 2)))
+    header = Replace(header, "{Author Date}", doTrim(metaTable.Cell(4, 4)))
+    header = Replace(header, "{Trans}", doTrim(metaTable.Cell(5, 2)))
+    header = Replace(header, "{Trans Date}", doTrim(metaTable.Cell(5, 4)))
+    header = Replace(header, "{Editor}", doTrim(metaTable.Cell(6, 2)))
+    header = Replace(header, "{Editor Date}", doTrim(metaTable.Cell(6, 4)))
+    header = Replace(header, "{Markup}", doTrim(metaTable.Cell(7, 2)))
+    header = Replace(header, "{Markup Date}", doTrim(metaTable.Cell(7, 4)))
+    header = Replace(header, "{Journal Title}", doTrim(metaTable.Cell(3, 2)))
+    header = Replace(header, "{Editor Coll}", doTrim(metaTable.Cell(9, 2)))
+    header = Replace(header, "{Vol}", doTrim(metaTable.Cell(8, 4)))
+    header = Replace(header, "{Pages}", doTrim(metaTable.Cell(8, 6)))
+    header = Replace(header, "{Pub Place}", doTrim(metaTable.Cell(11, 2)))
+    header = Replace(header, "{Pub Per}", doTrim(metaTable.Cell(10, 2)))
+    header = Replace(header, "{Pub Date}", doTrim(metaTable.Cell(10, 4)))
+    header = Replace(header, "{Description}", doTrim(metaTable.Cell(12, 2)))
+    header = Replace(header, "{Domain URL}", doTrim(metaTable.Cell(13, 2)))
+    header = Replace(header, "{Domain Text}", doTrim(metaTable.Cell(13, 4)))
+    header = Replace(header, "{Portal URL}", doTrim(metaTable.Cell(14, 2)))
+    header = Replace(header, "{Portal Text}", doTrim(metaTable.Cell(14, 4)))
+    header = Replace(header, "{Project URL}", doTrim(metaTable.Cell(15, 2)))
+    header = Replace(header, "{Project Text}", doTrim(metaTable.Cell(15, 4)))
+    header = Replace(header, "{Home URL}", doTrim(metaTable.Cell(16, 2)))
+    header = Replace(header, "{Home Text}", doTrim(metaTable.Cell(16, 4)))
+    
+    ActiveDocument.Tables(1).Delete
+    
+    doMetadata = header
+    
+End Function
+
+Function doTrim(ByVal aCell As Cell) As String
+    
+    Dim rng As Range
+    
+    Set rng = aCell.Range
+    rng.End = rng.End - 1
+    doTrim = rng.Text
+    
+    
+End Function
+Function fixRange(ByVal rng As Range) As Range
+    Dim gtPlace, ltPlace As Integer
+    
+    rng.Select
+    rng.Style = "Plain Text"
+    rng.Font.Bold = False
+    rng.Font.Italic = False
+    rng.Font.Underline = wdUnderlineNone
+    
+    gtPlace = InStr(rng.Text, ">")
+    ltPlace = InStr(rng.Text, "<")
+    If gtPlace < ltPlace Then
+        If gtPlace > 0 Then rng.Start = rng.Start + gtPlace
+        If ltPlace > 0 Then rng.End = rng.Start + ltPlace - 1
+    ElseIf gtPlace > ltPlace Then
+        rng.End = rng.Start + ltPlace - 1
+    End If
+    Set fixRange = rng
+End Function
+
+Sub doNoteTags()
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = "~"
+        .Replacement.Text = "<note>"
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+    
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = "^"
+        .Replacement.Text = "</note>"
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+
+End Sub
+
+Sub doFootnoteItalEtc(ByVal fn As Integer)
+Attribute doFootnoteItalEtc.VB_Description = "Macro recorded 8/13/2003 by Than G"
+Attribute doFootnoteItalEtc.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.closeFootnotes"
+'
+' closeFootnotes Macro
+' Macro recorded 8/13/2003 by Than G
+'
+      'ActiveDocument.Endnotes.Convert
+      Dim loopCt, addOn As Integer
+      
+        loopCt = 0
+        Set rngToSearch = ActiveDocument.Footnotes.Item(fn).Range
+        rngToSearch.End = rngToSearch.End - 1
+        Set srchResult = rngToSearch.Duplicate
+        Do
+            loopCt = loopCt + 1
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Text = ""
+                .Font.Italic = True
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If Not srchResult.Find.Found Then Exit Do
+            addOn = 2
+            Set wrng = srchResult.Duplicate
+            If Not isCharStyle(wrng) Then
+                wrng.StartOf
+                wrng.Text = "<hi rend=""weak"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+                addOn = 5
+            End If
+            srchResult.Start = wrng.End + addOn
+            srchResult.End = rngToSearch.End
+            If loopCt > 10 Then Exit Do
+        Loop Until Not srchResult.Find.Found
+        
+        loopCt = 0
+        Set srchResult = rngToSearch.Duplicate
+        Do
+            loopCt = loopCt + 1
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Text = ""
+                .Font.Bold = True
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If Not srchResult.Find.Found Then Exit Do
+            
+            Set wrng = srchResult.Duplicate
+            addOn = 2
+            If Not isCharStyle(wrng) Then
+                wrng.StartOf
+                wrng.Text = "<hi rend=""strong"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+                addOn = 5
+            End If
+            srchResult.Start = wrng.End + addOn
+            srchResult.End = rngToSearch.End
+            If loopCt > 10 Then Exit Do
+        Loop Until Not srchResult.Find.Found
+        
+        loopCt = 0
+        Set srchResult = rngToSearch.Duplicate
+        Do
+            loopCt = loopCt + 1
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Text = ""
+                .Font.Underline = True
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If Not srchResult.Find.Found Then Exit Do
+            
+            Set wrng = srchResult.Duplicate
+            addOn = 2
+            If Not isCharStyle(wrng) Then
+                wrng.StartOf
+                wrng.Text = "<hi rend=""underline"">"
+                Set wrng = srchResult.Duplicate
+                wrng.End = wrng.End - 1
+                wrng.EndOf
+                wrng.Text = "</hi>"
+            End If
+            srchResult.Start = wrng.End + addOn
+            srchResult.End = rngToSearch.End
+            If loopCt > 10 Then Exit Do
+        Loop Until Not srchResult.Find.Found
+
+      End Sub
+
+Sub replaceAllEmptyP()
+Attribute replaceAllEmptyP.VB_Description = "Macro recorded 8/18/2003 by Than G"
+Attribute replaceAllEmptyP.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.replaceAllP"
+'
+' replaceAllP Macro
+' Macro recorded 8/18/2003 by Than G
+'
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = "<p></p>"
+        .Replacement.Text = ""
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+End Sub
+Sub convertItalics()
+Attribute convertItalics.VB_Description = "Macro recorded 8/18/2003 by Than G"
+Attribute convertItalics.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.searchItalics"
+'
+' searchItalics Macro
+' Macro recorded 8/18/2003 by Than G
+'
+    Dim rngToSearch, srchResult As Range
+    Dim textRun, openTag, endTage As String
+    Dim resInt, loopCt As Integer
+    
+    loopCt = 0
+    unItalicizeCommas
+
+    Load ItalicOptions
+    ItalicOptions.Hide
+    
+    Set rngToSearch = ActiveDocument.Range.Duplicate
+    If ActiveDocument.Tables.Count > 0 Then
+        rngToSearch.Start = ActiveDocument.Tables(1).Range.End + 1
+    End If
+    Set srchResult = rngToSearch.Duplicate
+    
+    Do
+        loopCt = loopCt + 1
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ""
+            .Font.Italic = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Or loopCt > 200 Then Exit Do
+        If InStr(srchResult.Style, "Heading") = 0 And Not isCharStyle(srchResult) Then
+            textRun = srchResult.Text
+            ItalicOptions.ItalText.Caption = textRun
+            ItalicOptions.Show
+            If ItalicOptions.wasCancelled Then
+                Unload ItalicOptions
+                Exit Sub
+            End If
+            srchResult.Style = ItalicOptions.getSelectedStyle()
+            If ItalicOptions.getSelectedStyle() = "Normal,no" Then
+                srchResult.Font.Italic = False
+            End If
+        End If
+        srchResult.Start = srchResult.End + 1
+        srchResult.End = rngToSearch.End
+        
+    Loop Until Not srchResult.Find.Found
+    
+    convertFootnoteItalics
+  End Sub
+  Sub convertFootnoteItalics()
+    Dim loopCt As Integer
+    
+    ActiveDocument.Endnotes.Convert
+    For n = 1 To ActiveDocument.Footnotes.Count
+        Set rngToSearch = ActiveDocument.Footnotes(n).Range.Duplicate
+        Set srchResult = rngToSearch.Duplicate
+        loopCt = 0
+        
+        Do
+            loopCt = loopCt + 1
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Text = ""
+                .Font.Italic = True
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If Not srchResult.Find.Found Or loopCt > 20 Then Exit Do
+            If InStr(srchResult.Style, "Heading") = 0 And Not isCharStyle(srchResult) Then
+                textRun = srchResult.Text
+                ItalicOptions.ItalText.Caption = textRun
+                ItalicOptions.Show
+                If ItalicOptions.wasCancelled Then
+                    Unload ItalicOptions
+                    Exit Sub
+                End If
+                srchResult.Style = ItalicOptions.getSelectedStyle()
+                If ItalicOptions.getSelectedStyle() = "Normal,no" Then
+                    srchResult.Font.Italic = False
+                End If
+            End If
+            srchResult.Start = srchResult.End + 2
+            srchResult.End = rngToSearch.End
+            
+        Loop Until Not srchResult.Find.Found
+    
+    Next n
+    
+End Sub
+Sub doCharacterStyles()
+    Dim styleData(50, 3) As String
+    Dim styleCount As Integer
+    Dim rngToSearch, srchResult, wrng As Range
+    
+    styleData(1, 1) = "Emphasis Weak,ew": styleData(1, 2) = "<hi rend=""weak"">": styleData(1, 3) = "</hi>"
+    styleData(2, 1) = "Text Title,tt": styleData(2, 2) = "<title>": styleData(2, 3) = "</title>"
+    styleData(3, 1) = "Lang Tibetan,tib": styleData(3, 2) = "<foreign lang=""tib"">": styleData(3, 3) = "</foreign>"
+    styleData(4, 1) = "Lang Sanskrit,san": styleData(4, 2) = "<foreign lang=""san"">": styleData(4, 3) = "</foreign>"
+    styleData(5, 1) = "Lang Chinese,chi": styleData(5, 2) = "<foreign lang=""chi"">": styleData(5, 3) = "</foreign>"
+    styleData(6, 1) = "Lang Japanese,jap": styleData(6, 2) = "<foreign lang=""jap"">": styleData(6, 3) = "</foreign>"
+    styleData(7, 1) = "Name Personal Human,nph": styleData(7, 2) = "<persName type=""human"">": styleData(7, 3) = "</persName>"
+    styleData(8, 1) = "Name Personal other,npo": styleData(8, 2) = "<persName type=""other"">": styleData(8, 3) = "</persName>"
+    styleData(9, 1) = "Name Place,np": styleData(9, 2) = "<placeName>": styleData(9, 3) = "</placeName>"
+    styleData(10, 1) = "Name organization,nor": styleData(10, 2) = "<orgName>": styleData(10, 3) = "</orgName>"
+    styleData(11, 1) = "Reference,rf": styleData(11, 2) = "<ref type=""bibl"">": styleData(11, 3) = "</ref>"
+    styleData(12, 1) = "Emphasis Strong,es": styleData(12, 2) = "<hi rend=""strong"">": styleData(12, 3) = "</hi>"
+    styleData(13, 1) = "Dates , dt": styleData(13, 2) = "<date>": styleData(13, 3) = "</date>"
+    styleCount = 13
+    
+    For x = 1 To styleCount
+      Set rngToSearch = ActiveDocument.Range
+      Set srchResult = rngToSearch.Duplicate
+        y = 0
+        Do
+              Application.StatusBar = "Proceessing document: processing character styles (" & styleData(x, 1) & ")! " & y
+
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Style = styleData(x, 1)
+                .Text = ""
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If Not srchResult.Find.Found Or InStr(srchResult.Text, "</hi></hi>") > 0 Then Exit Do
+            
+            Set wrng = fixRange(srchResult.Duplicate)
+            wrng.Select
+            Selection.Style = "Plain Text"
+            wrng.StartOf
+            wrng.Text = styleData(x, 2)
+            wrng.Select
+            Selection.Style = "Plain Text"
+            Set wrng = srchResult.Duplicate
+            wrng.EndOf
+            wrng.Text = styleData(x, 3)
+            wrng.Select
+            Selection.Style = "Plain Text"
+            srchResult.Start = wrng.End + Len(styleData(x, 3))
+            srchResult.End = rngToSearch.End
+50            y = y + 1
+            If y > 100 Then Exit Do
+        Loop Until Not srchResult.Find.Found
+    Next x
+    
+    Application.StatusBar = "Proceessing document: processing character styles in footnotes!"
+    For n = 1 To ActiveDocument.Footnotes.Count
+        For x = 1 To styleCount
+          Application.StatusBar = "Proceessing document: processing footnote character styles (" & styleData(x, 1) & ")!"
+          Set rngToSearch = ActiveDocument.Footnotes(n).Range
+          Set srchResult = rngToSearch.Duplicate
+          y = 0
+        Do
+            With srchResult.Find
+                .ClearFormatting
+                .Format = True
+                .Style = styleData(x, 1)
+                .Text = ""
+                .Wrap = wdFindStop
+                .Forward = True
+                .Execute
+            End With
+            
+            If srchResult.Find.Found = False Or InStr(srchResult.Text, "</hi></hi>") > 0 Then Exit Do
+            Set wrng = fixRange(srchResult.Duplicate)
+           
+            wrng.Select
+            Selection.Style = "Plain Text"
+            wrng.StartOf
+            wrng.Text = styleData(x, 2)
+            wrng.Select
+            Selection.Style = "Plain Text"
+            Set wrng = srchResult.Duplicate
+            wrng.EndOf
+            wrng.Text = styleData(x, 3)
+            wrng.Select
+            Selection.Style = "Plain Text"
+            srchResult.Start = wrng.End + Len(styleData(x, 2)) + Len(styleData(x, 3)) + 2
+            srchResult.End = rngToSearch.End
+100         y = y + 1
+            If y > 10 Then Exit Do
+       Loop Until Not srchResult.Find.Found
+       Next x
+    Next n
+    
+End Sub
+Function isCharStyle(ByVal rng As Range) As Boolean
+    styleName = rng.Style
+    isCharStyle = False
+    If styleName = "Emphasis Weak,ew" Then
+        isCharStyle = True
+    ElseIf styleName = "Text Title,tt" Then
+        isCharStyle = True
+    ElseIf styleName = "Lang Tibetan,tib" Then
+        isCharStyle = True
+    ElseIf styleName = "Lang Sanskrit,san" Then
+        isCharStyle = True
+    ElseIf styleName = "Lang Chinese,chi" Then
+        isCharStyle = True
+    ElseIf styleName = "Lang Japanese,jap" Then
+        isCharStyle = True
+    ElseIf styleName = "Name Personal Human,nph" Then
+        isCharStyle = True
+    ElseIf styleName = "Name Personal other,npo" Then
+        isCharStyle = True
+    ElseIf styleName = "Name Place,np" Then
+        isCharStyle = True
+    ElseIf styleName = "Name organization,nor" Then
+        isCharStyle = True
+    End If
+End Function
+
+Sub unItalicizeCommas()
+Attribute unItalicizeCommas.VB_Description = "Macro recorded 8/19/2003 by Than G"
+Attribute unItalicizeCommas.VB_ProcData.VB_Invoke_Func = "Project.NewMacros.unItalicizeCommas"
+'
+' unItalicizeCommas Macro
+' Macro recorded 8/19/2003 by Than G
+'
+    Dim rngToSearch, srchResult As Range
+    
+    Set rngToSearch = ActiveDocument.Range.Duplicate
+    Set srchResult = rngToSearch.Duplicate
+    Do
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ","
+            .Font.Italic = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .MatchWildcards = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Then Exit Do
+        srchResult.Font.Italic = False
+        srchResult.Start = srchResult.End + 1
+        srchResult.End = rngToSearch.End
+    Loop Until Not srchResult.Find.Found
+    
+    For n = 1 To ActiveDocument.Footnotes.Count
+        Set rngToSearch = ActiveDocument.Footnotes(n).Range
+        Set srchResult = rngToSearch.Duplicate
+    Do
+        With srchResult.Find
+            .ClearFormatting
+            .Format = True
+            .Text = ","
+            .Font.Italic = True
+            .Wrap = wdFindStop
+            .Forward = True
+            .MatchWildcards = True
+            .Execute
+        End With
+        
+        If Not srchResult.Find.Found Then Exit Do
+        srchResult.Font.Italic = False
+        srchResult.Start = srchResult.End + 1
+        srchResult.End = rngToSearch.End
+    Loop Until Not srchResult.Find.Found
+        
+    Next n
+
+End Sub
+
+Sub replaceEntities()
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = "&"
+        .Replacement.Text = "&amp;"
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = "<"
+        .Replacement.Text = "&lt;"
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+    Selection.Find.ClearFormatting
+    Selection.Find.Replacement.ClearFormatting
+    With Selection.Find
+        .Text = ">"
+        .Replacement.Text = "&gt;"
+        .Forward = True
+        .Wrap = wdFindContinue
+        .Format = False
+        .MatchCase = False
+        .MatchWholeWord = False
+        .MatchWildcards = False
+        .MatchSoundsLike = False
+        .MatchAllWordForms = False
+    End With
+    Selection.Find.Execute Replace:=wdReplaceAll
+    
+    
+    
+
+End Sub
+
diff --git a/WordToXML/metatable.rtf b/WordToXML/metatable.rtf
new file mode 100644
index 0000000..4c6ff60
--- /dev/null
+++ b/WordToXML/metatable.rtf
@@ -0,0 +1,168 @@
+{\rtf1\adeflang1103\ansi\ansicpg1252\uc1\adeff0\deff0\stshfdbch0\stshfloch0\stshfhich0\stshfbi0\deflang1033\deflangfe1033{\fonttbl{\f0\froman\fcharset0\fprq2{\*\panose 02020603050405020304}Times New Roman;}
+{\f1\fswiss\fcharset0\fprq2{\*\panose 020b0604020202020204}Arial;}{\f2\fmodern\fcharset0\fprq1{\*\panose 02070309020205020404}Courier New;}{\f34\fswiss\fcharset128\fprq2{\*\panose 020b0604020202020204}Arial Unicode MS;}
+{\f224\fswiss\fcharset128\fprq2{\*\panose 020b0604020202020204}@Arial Unicode MS;}{\f382\froman\fcharset238\fprq2 Times New Roman CE;}{\f383\froman\fcharset204\fprq2 Times New Roman Cyr;}{\f385\froman\fcharset161\fprq2 Times New Roman Greek;}
+{\f386\froman\fcharset162\fprq2 Times New Roman Tur;}{\f387\froman\fcharset177\fprq2 Times New Roman (Hebrew);}{\f388\froman\fcharset178\fprq2 Times New Roman (Arabic);}{\f389\froman\fcharset186\fprq2 Times New Roman Baltic;}
+{\f390\froman\fcharset163\fprq2 Times New Roman (Vietnamese);}{\f392\fswiss\fcharset238\fprq2 Arial CE;}{\f393\fswiss\fcharset204\fprq2 Arial Cyr;}{\f395\fswiss\fcharset161\fprq2 Arial Greek;}{\f396\fswiss\fcharset162\fprq2 Arial Tur;}
+{\f397\fswiss\fcharset177\fprq2 Arial (Hebrew);}{\f398\fswiss\fcharset178\fprq2 Arial (Arabic);}{\f399\fswiss\fcharset186\fprq2 Arial Baltic;}{\f400\fswiss\fcharset163\fprq2 Arial (Vietnamese);}{\f402\fmodern\fcharset238\fprq1 Courier New CE;}
+{\f403\fmodern\fcharset204\fprq1 Courier New Cyr;}{\f405\fmodern\fcharset161\fprq1 Courier New Greek;}{\f406\fmodern\fcharset162\fprq1 Courier New Tur;}{\f407\fmodern\fcharset177\fprq1 Courier New (Hebrew);}
+{\f408\fmodern\fcharset178\fprq1 Courier New (Arabic);}{\f409\fmodern\fcharset186\fprq1 Courier New Baltic;}{\f410\fmodern\fcharset163\fprq1 Courier New (Vietnamese);}{\f724\fswiss\fcharset0\fprq2 Arial Unicode MS Western;}
+{\f722\fswiss\fcharset238\fprq2 Arial Unicode MS CE;}{\f723\fswiss\fcharset204\fprq2 Arial Unicode MS Cyr;}{\f725\fswiss\fcharset161\fprq2 Arial Unicode MS Greek;}{\f726\fswiss\fcharset162\fprq2 Arial Unicode MS Tur;}
+{\f727\fswiss\fcharset177\fprq2 Arial Unicode MS (Hebrew);}{\f728\fswiss\fcharset178\fprq2 Arial Unicode MS (Arabic);}{\f729\fswiss\fcharset186\fprq2 Arial Unicode MS Baltic;}{\f730\fswiss\fcharset163\fprq2 Arial Unicode MS (Vietnamese);}
+{\f731\fswiss\fcharset222\fprq2 Arial Unicode MS (Thai);}{\f2624\fswiss\fcharset0\fprq2 @Arial Unicode MS Western;}{\f2622\fswiss\fcharset238\fprq2 @Arial Unicode MS CE;}{\f2623\fswiss\fcharset204\fprq2 @Arial Unicode MS Cyr;}
+{\f2625\fswiss\fcharset161\fprq2 @Arial Unicode MS Greek;}{\f2626\fswiss\fcharset162\fprq2 @Arial Unicode MS Tur;}{\f2627\fswiss\fcharset177\fprq2 @Arial Unicode MS (Hebrew);}{\f2628\fswiss\fcharset178\fprq2 @Arial Unicode MS (Arabic);}
+{\f2629\fswiss\fcharset186\fprq2 @Arial Unicode MS Baltic;}{\f2630\fswiss\fcharset163\fprq2 @Arial Unicode MS (Vietnamese);}{\f2631\fswiss\fcharset222\fprq2 @Arial Unicode MS (Thai);}}{\colortbl;\red0\green0\blue0;\red0\green0\blue255;
+\red0\green255\blue255;\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;\red128\green0\blue0;
+\red128\green128\blue0;\red128\green128\blue128;\red192\green192\blue192;}{\stylesheet{\qj \li0\ri0\sl-240\slmult0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 
+\f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 \snext0 \styrsid16650104 Normal,no;}{\s1\qj \li0\ri0\sb240\sa60\sl-240\slmult0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel0\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 
+\b\caps\fs24\ul\cf1\lang1033\langfe1033\kerning28\loch\f34\hich\af34\dbch\af34\cgrid\langnp1033\langfenp1033 \sbasedon0 \snext0 \styrsid9965374 heading 1,h1;}{\s2\qj \li0\ri0\sb240\sa60\sl-240\slmult0
+\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel1\adjustright\rin0\lin0\itap0 \fcs1 \ab\ai\af1\afs28\alang1025 \fcs0 \b\i\scaps\fs24\lang1033\langfe1033\loch\f34\hich\af34\dbch\af34\cgrid\langnp1033\langfenp1033 \sbasedon0 \snext0 \styrsid9965374 
+heading 2,h2;}{\s3\qj \li0\ri0\sb240\sa60\sl-240\slmult0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel2\adjustright\rin0\lin0\itap0 \fcs1 \ab\af1\afs26\alang1025 \fcs0 \b\f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 
+\sbasedon0 \snext0 \styrsid9965374 heading 3,h3;}{\*\cs10 \additive \ssemihidden Default Paragraph Font;}{\*
+\ts11\tsrowd\trftsWidthB3\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3\tscellwidthfts0\tsvertalt\tsbrdrt\tsbrdrl\tsbrdrb\tsbrdrr\tsbrdrdgl\tsbrdrdgr\tsbrdrh\tsbrdrv 
+\ql \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs20 \fcs0 \fs20\lang1024\langfe1024\cgrid\langnp1024\langfenp1024 \snext11 \ssemihidden Normal Table;}{\s15\qj \li0\ri0\sb240\sl-280\slmult0\widctlpar
+\tx360\tx720\tx1080\tx1440\tx1800\tx2160\tx2520\tx2880\tx3240\tx3600\tx3960\tx4320\tx4680\tx5040\tx5400\tx5760\tx6120\tx6480\tx6840\tx7200\tx7560\tx7920\tx8280\tx8640\tx9000\tx9720\tx10080\tx10440\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 
+\af0\afs20\alang1025 \fcs0 \f34\fs22\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 \sbasedon0 \snext0 Triple,t;}{\s16\qj \li0\ri0\sl240\slmult0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af2\afs24\alang1025 \fcs0 
+\f2\fs20\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 \sbasedon0 \snext16 \styrsid91415 Plain Text;}}{\*\latentstyles\lsdstimax156\lsdlockeddef0}{\*\pgptbl {\pgp\ipgp0\itap0\li0\ri0\sb0\sa0}{\pgp\ipgp0\itap0\li0\ri0\sb0\sa0}}{\*\rsidtbl \rsid83015
+\rsid91415\rsid1465280\rsid1534417\rsid2237508\rsid3305356\rsid3673047\rsid4138990\rsid4878106\rsid5709781\rsid6704448\rsid7953796\rsid8278687\rsid9568672\rsid9965374\rsid14953160\rsid16650104}{\*\generator Microsoft Word 11.0.5604;}{\info
+{\title E-Text Title:}{\author Than G}{\operator Than Garson}{\creatim\yr2004\mo8\dy11\hr17\min2}{\revtim\yr2004\mo8\dy11\hr17\min2}{\version2}{\edmins1}{\nofpages1}{\nofwords76}{\nofchars434}{\*\company THDL}{\nofcharsws509}{\vern24689}}
+\widowctrl\ftnbj\aenddoc\ftnrstpg\noxlattoyen\expshrtn\noultrlspc\dntblnsbdb\nospaceforul\formshade\horzdoc\dgmargin\dghspace180\dgvspace180\dghorigin1701\dgvorigin1984\dghshow1\dgvshow1
+\jexpand\viewkind4\viewscale100\pgbrdrhead\pgbrdrfoot\splytwnine\ftnlytwnine\htmautsp\nolnhtadjtbl\useltbaln\alntblind\lytcalctblwd\lyttblrtgr\lnbrkrule\nojkernpunct\rsidroot91415 \fet0{\*\ftnsep \pard\plain \qj \li0\ri0\sl-240\slmult0
+\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 \f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 {\fcs1 \af0 \fcs0 \insrsid5709781 \chftnsep 
+\par }}{\*\ftnsepc \pard\plain \qj \li0\ri0\sl-240\slmult0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 \f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 {\fcs1 \af0 \fcs0 \insrsid5709781 \chftnsepc 
+
+\par }}{\*\aftnsep \pard\plain \qj \li0\ri0\sl-240\slmult0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 \f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 {\fcs1 \af0 \fcs0 \insrsid5709781 \chftnsep 
+
+\par }}{\*\aftnsepc \pard\plain \qj \li0\ri0\sl-240\slmult0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fcs1 \af0\afs24\alang1025 \fcs0 \f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 {\fcs1 \af0 \fcs0 \insrsid5709781 \chftnsepc 
+
+\par }}\sectd \linex576\headery1080\footery1080\endnhere\sectdefaultcl\sftnbj\sftnrstpg {\*\pnseclvl1\pnucrm\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl2\pnucltr\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl3\pndec\pnstart1\pnindent720\pnhang 
+{\pntxta .}}{\*\pnseclvl4\pnlcltr\pnstart1\pnindent720\pnhang {\pntxta )}}{\*\pnseclvl5\pndec\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl6\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl7
+\pnlcrm\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl8\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl9\pnlcrm\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}\trowd \irow0\irowband0
+\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt
+\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\pard\plain \qj \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 \fcs1 \af0\afs24\alang1025 \fcs0 \f34\fs24\lang1033\langfe1033\cgrid\langnp1033\langfenp1033 {
+\fcs1 \af34\afs22 \fcs0 \b\fs22\dbch\af34\insrsid4138990 \hich\af34\dbch\af34\loch\f34 E-Text Title:}{\fcs1 \af34\afs22 \fcs0 \b\fs22\dbch\af34\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow0\irowband0\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr
+\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 E-Text Title Original:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow1\irowband1
+\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt
+\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\row }\trowd \irow2\irowband2\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\pard \ql \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Language of text:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 
+\hich\af34\dbch\af0\loch\f34 eng}{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Original Language:}{\fcs1 \af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 
+\hich\af34\dbch\af0\loch\f34 eng}{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow2\irowband2\ts11\trgaph108\trleft0\trkeep
+\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl
+\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 
+\b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Author:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 
+\cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow3\irowband3\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 
+\trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb
+\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400
+\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Translator:}{
+\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow4\irowband4\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr
+\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Editor:}{\fcs1 \ab\af0 \fcs0 
+\b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow5\irowband5\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr
+\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Mark-up:}{\fcs1 \ab\af0 
+\fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow6\irowband6\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr
+\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Inputter:}{\fcs1 \ab\af0 
+\fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow7\irowband7\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr
+\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\trowd \irow8\irowband8\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth720\clshdrawnil \cellx6120\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth720\clshdrawnil \cellx6840\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl
+\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1440\clshdrawnil \cellx8280\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1384\clshdrawnil \cellx9664\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Journal or Collection:}{\fcs1 
+\ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Vol.:}{\fcs1 \af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 
+\fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Pagination:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 
+\fcs0 \f0\fs20\insrsid4138990 \trowd \irow8\irowband8\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth720\clshdrawnil \cellx6120\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth720\clshdrawnil \cellx6840\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl
+\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1440\clshdrawnil \cellx8280\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1384\clshdrawnil \cellx9664\row }\trowd \irow9\irowband9\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\pard \ql \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Editor of Collection:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 
+\fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 
+\f0\fs20\insrsid4138990 \trowd \irow9\irowband9\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 P\hich\af34\dbch\af0\loch\f34 ublisher:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 
+\hich\af34\dbch\af0\loch\f34 Tibetan & Himalayan Digital Library}{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Date:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 
+\insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow10\irowband10\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 
+\trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2284\clshdrawnil \cellx7684\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1980\clshdrawnil \cellx9664\row }\trowd \irow11\irowband11\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv
+\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340
+\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {
+\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Place of Pub.:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \hich\af34\dbch\af0\loch\f34 Charlottesville, VA 22904}{\fcs1 \af0 \fcs0 \insrsid4138990 
+\cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow11\irowband11\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb
+\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\row }\pard 
+\ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Description:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 
+\trowd \irow12\irowband12\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth7324\clshdrawnil \cellx9664\row }\trowd \irow13\irowband13\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 
+\trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1800\clshdrawnil \cellx7200\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2464\clshdrawnil \cellx9664\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Domain URL:}{\fcs1 \ab\af0 \fcs0 
+\b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Domain Text:}{\fcs1 \af0 
+\fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow13\irowband13\ts11\trgaph108\trleft0\trkeep
+\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl
+\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1800\clshdrawnil \cellx7200\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2464\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 
+\b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Portal URL:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 
+\fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Portal Text:}{\fcs1 \af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 
+\f0\fs20\insrsid4138990 \trowd \irow14\irowband14\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 
+\trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth1800\clshdrawnil \cellx7200\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2464\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Project URL:}{\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0
+\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Project Text:}{\fcs1 \af0 \fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 
+\insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow15\irowband15\ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 
+\trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt
+\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1800\clshdrawnil \cellx7200\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth2464\clshdrawnil \cellx9664\row }\pard \ql \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Home URL:}{\fcs1 \ab\af0 
+\fcs0 \b\insrsid4138990 \cell }\pard \qj \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0 \fcs0 \insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Home Text:}{\fcs1 \af0 
+\fcs0 \b\insrsid4138990 \cell }{\fcs1 \af0 \fcs0 \insrsid4138990 \cell }\pard \ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow16\irowband16\ts11\trgaph108\trleft0\trkeep
+\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl
+\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2340\clshdrawnil \cellx2340\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth3060\clshdrawnil \cellx5400\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth1800\clshdrawnil \cellx7200\clvertalt\clbrdrt\brdrs\brdrw10 
+\clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth2464\clshdrawnil \cellx9664\row }\trowd \irow17\irowband17\lastrow \ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb
+\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr
+\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth3780\clshdrawnil \cellx3780\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth5884\clshdrawnil \cellx9664\pard 
+\qj \li0\ri0\sl-240\slmult0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \ab\af0 \fcs0 \b\insrsid4138990 \hich\af34\dbch\af0\loch\f34 Breadcrumb Name for this doc:}{\fcs1 \af0 \fcs0 \insrsid4138990 \cell \cell }\pard 
+\ql \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fcs1 \af0\afs20 \fcs0 \f0\fs20\insrsid4138990 \trowd \irow17\irowband17\lastrow \ts11\trgaph108\trleft0\trkeep\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 
+\trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 
+\cltxlrtb\clftsWidth3\clwWidth3780\clshdrawnil \cellx3780\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrs\brdrw10 \clbrdrb\brdrs\brdrw10 \clbrdrr\brdrs\brdrw10 \cltxlrtb\clftsWidth3\clwWidth5884\clshdrawnil \cellx9664\row }\pard \qj \li0\ri0\sl-240\slmult0
+\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0\pararsid4138990 {\fcs1 \af0 \fcs0 \insrsid83015\charrsid4138990 
+\par }}
\ No newline at end of file