@Comment(
================================================================================LPT LPT LPT LPT LPT LPT LPT LPT

........................................................................TESTCASE
)
@Marker(Make,TestCase,LPT,File)
@Style(LeftMargin 0,TopMargin 3,BottomMargin 4, LineWidth 70)
@Begin(Text,Justification,Font CharDef,FaceCode R,Spaces Compact,
  Spacing 1,Spread 1,Indent 0,LineWidth 72)

@Comment(
........................................................................TEXT
)
@Marker(Make,Text,LPT,File)
@Style(LeftMargin 0,TopMargin 3,BottomMargin 4,LineWidth 80)
@Begin(Text,Justification,Font CharDef,FaceCode R,Spaces Compact,
  Spacing 1,Spread 1,Indent 0)


@Comment(
........................................................................FILE
)
@Marker(Make,File,LPT,File)
@Style(LeftMargin 0,TopMargin 2,BottomMargin 2,LineWidth 80,Paperlength 23,
  Paperwidth 80)
@Modify(C,Use R,Capitalized)
@Modify(I,Use R,Capitalized)
@Modify(B,Use R,Capitalized)
@Modify(P,Use I,Capitalized)
@Modify(T,Use R)
@Modify(U,Use R,Capitalized)
@Modify(UN,Use U)
@Modify(UX,Use U)
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(TitleStyle,Spacing 1)
@Define(NoteStyle,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Justification Off,
  LeftMargin 10,RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@TextForm(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@TextForm(IndexMain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@b{@ParmValue(Page)}>]")
@TextForm(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondaryMain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@b<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
  s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Chapter,Init 0)
@Counter(TheoremCounter,Within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,Justification,Font CharDef,FaceCode R,Spaces Compact,
  Spacing 1,Spread 1,Indent 0)
@PageHeading[Centre "@Value(page)"]


@Comment(
........................................................................LETTER
)
@Marker(Make,Letter,LPT,File)
@Style(TopMargin 1Inch,BottomMargin 1Inch,LeftMargin 1Inch,LineWidth 6.5Inches)
@Define(ReturnAddress,NoFill,LeftMargin 4Inches,Spread 0,Break,BlankLines Kept,
  RightMargin 0)
@Define(Address=ReturnAddress,LeftMargin 0,Above 4)
@Define(Body,Fill,Justification,Use R,LeftMargin 0,Spacing 1,Spread 1,
  Spaces Compact,BlankLines Break,Above 1,Below 0.5Inches,Break)
@Define[Close=Body,NoFill,AfterEntry "Yours Sincerely @Blankspace(1inch)"]
@Define(Notations,NoFill,LeftMargin 0,Spread 0,Break,BlankLines Kept,
  RightMargin 0,Spaces Kept)
@Define(Ps=Body,Above 0,Below 0,AfterEntry "P.S. ")
@TextForm(Greeting="@Begin(FlushLeft,Below 1)Dear @Parm(Text),@End(FlushLeft)")
@TextForm[Closing="@Begin(FlushLeft, Above 1)Yours Sincerely
@BlankSpace(1inch)
@Parm(Text)
@End(FlushLeft)"]
@Equate(PostScript=Ps,Closings=Notations,Initials=Notations)
@Begin(Text,Justification,Font CharDef,FaceCode R)
@PageHeading(Centre "@Value(Page)")
@Comment[@Begin(ReturnAddress)]


@Comment(
........................................................................ARTICLE
)
@Marker(Make,Article,LPT,File)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(TitleStyle,Spacing 1)
@Define(NoteStyle,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD2,Use HDX,Above 3,FaceCode B,Capitalized)
@Define(HD2A=HD2,Centred,Below 3)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC2=TCX,Above 1,Below 1,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Section,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD2A)@Parm(Title)@End(HD2A)")

@Comment(what follows is libraryfile math, which we don't yet do as a library.)

@Counter(EquationCounter,Numbered <(@1)>,
  Referenced <(@1)>,IncrementedBy Tag,
  Init 0)
@Counter(TheoremCounter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Style(LeftMargin 0,TopMargin 3,BottomMargin 4,LineWidth 72)
@Begin(Text,Indent 2,Spread 1,Spacing 2,
  Spaces Compact,Justification,Font Chardef,FaceCode R)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................REPORT
)
@Marker(Make,Report,LPT,File)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(TitleStyle,Spacing 1)
@Define(NoteStyle,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
 TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Chapter,Init 0)
@Counter(TheoremCounter,Within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Style(LeftMargin 0,TopMargin 3,BottomMargin 4,LineWidth 72)
@Begin(Text,Indent 2,Spread 1,Spacing 1,
  Spaces Compact,Justification,Font Chardef,FaceCode R)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................MANUAL
)
@Marker(Make,Manual,LPT,File)
@Style[DoubleSided]
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(TitleStyle,Spacing 1)
@Define(NoteStyle,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Justification Off,
  LeftMargin 10,RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@TextForm(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@TextForm(IndexMain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@b{@ParmValue(Page)}>]")
@TextForm(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondaryMain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@b<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
  s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Chapter,Init 0)
@Counter(TheoremCounter,Within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Style(LeftMargin 0,TopMargin 3,BottomMargin 4,LineWidth 72)
@Begin(Text,Indent 2,Spread 1,Spacing 1,
  Spaces Compact,Justification,Font Chardef,FaceCode R)
@PageHeading(Centre "@Value(Page)")



@Marker(Make,TestCase,B)
@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,BottomMargin 1Inch,
  Justification,Font BodyFont,FaceCode R,Spaces Compact,
  Spacing 1,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")

@Comment(
........................................................................NOTES
)
@Marker(Make,Notes,LPT,File)
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(TitleStyle,Spacing 1)
@Define(NoteStyle,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Lecture,
  TitleForm "@Begin(HD1A)Lecture @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Lecture,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
 TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
 TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Justification Off,
  LeftMargin 10,RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@TextForm(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@TextForm(IndexMain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@b{@ParmValue(Page)}>]")
@TextForm(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondaryMain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@b<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
  s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Lecture,Init 0)
@Counter(TheoremCounter,Within Lecture,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Style(LeftMargin 0,TopMargin 3,BottomMargin 4,LineWidth 72)
@Begin(Text,Indent 2,Spread 1,Spacing 1,
  Spaces Compact,Justification,Font Chardef,FaceCode R)
@PageHeading(Centre "@Value(Page)")



@Comment(
================================================================================GP300 GP300 GP300 GP300 GP300 GP300 GP300 GP300

........................................................................TEXT
)
@Marker(Make,Text,GP300)
@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,
  BottomMargin 1Inch,Justification,Font BodyFont,FaceCode R,Spaces Compact,
  Spacing 1.25,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................LETTER
)
@Marker(Make,Letter,GP300)
@Style(TopMargin 0.45Inch,BottomMargin 1Inch,LeftMargin 0.25Inch,LineWidth 6.25Inches)
@Comment(as usual allowing 0.5 for h/w Top Margin, and 0.75 for Left)
@Define(ReturnAddress,NoFill,LeftMargin 4Inches,Spread 0,Break,BlankLines Kept,
  RightMargin 0)
@Define(Address=ReturnAddress,LeftMargin 0,Above 4)
@Define(Body,Fill,Justification,Use R,LeftMargin 0,Spacing 1,Spread 1,
  Spaces Compact,BlankLines Break,Above 1,Below 0.5Inches,Break)
@Define(Notations,NoFill,LeftMargin 0,Spread 0,Break,BlankLines Kept,
  RightMargin 0,Spaces Kept)
@Define(Ps=Body,Above 0,Below 0,AfterEntry "P.S. ")
@TextForm(Greeting="@Begin(FlushLeft,Below 1)Dear @Parm(Text),@End(FlushLeft)")
@TextForm[Closing="@Begin(FlushLeft, Above 1)Yours Sincerely
@BlankSpace(1inch)
@Parm(Text)
@End(FlushLeft)"]
@Equate(PostScript=Ps,Closings=Notations,Initials=Notations)
@Begin(Text,Justification,Font BodyFont,FaceCode R)
@PageHeading(Left "@Value(Date)",Right "Page @Value(Page)")
@Comment[@Begin(ReturnAddress)]


@Comment(
........................................................................ARTICLE
)
@Marker(Make,Article,GP300)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD2,Use HDX,FaceCode R,Above 3,Use B,Capitalized)
@Define(HD2A=HD2,Centred,Below 3)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC2=TCX,Above 1,Below 1,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Section,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD2A)@Parm(Title)@End(HD2A)")


@Comment(what follows is libraryfile math, which we don't yet do as a library.)

@Counter(EquationCounter,Numbered <(@1)>,
  Referenced <(@1)>,IncrementedBy Tag,
  Init 0)
@Counter(TheoremCounter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,
  BottomMargin 1Inch,Indent 2,Spread 1,Spaces Compact,Justification,FaceCode R,
  Font BodyFont,Spacing 1.25)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................REPORT
)
@Marker(Make,Report,GP300)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Chapter,Init 0)
@Counter(TheoremCounter,Within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,
  BottomMargin 1Inch,Indent 2,Spread 1,Spaces Compact,Justification,FaceCode R,  Font BodyFont,Spacing 1.25)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................MANUAL
)
@Marker(Make,Manual,GP300)
@Style[DoubleSided]
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear",Spacing 0.75,Capitalized Off,
  FaceCode K,Indent 0,Overstruck 0,Justification Off,LeftMargin 10,
  RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@TextForm(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@TextForm(IndexMain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@B{@ParmValue(Page)}>]")
@TextForm(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondaryMain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@B<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
  s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Chapter,Init 0)
@Counter(TheoremCounter,Within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,
  BottomMargin 1Inch,Indent 2,Spread 1,Spaces Compact,Justification,FaceCode R,
  Font BodyFont,Spacing 1.25)
@PageHeading(Centre "@Value(Page)")

@Comment(
........................................................................NOTES
)
@Marker(Make,Notes,GP300)
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B,Capitalized)
@Define(HD3,Use HDX,FaceCode R)
@Define(HD4,Use HDX,FaceCode R)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Lecture,
  TitleForm "@Begin(HD1A)Lecture @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Lecture,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear
",Capitalized Off,FaceCode R,Indent 0,Overstruck 0,Justification Off,
  LeftMargin 10,RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@TextForm(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@TextForm(IndexMain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@B{@ParmValue(Page)}>]")
@TextForm(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondaryMain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
  r="   @Parm(Secondary)",s="@B<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
  s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,Within Lecture,Init 0)
@Counter(TheoremCounter,Within Lecture,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 0.25Inch,RightMargin 1Inch,TopMargin 0.45Inch,
  BottomMargin 1Inch,Indent 2,Spread 1,Spaces Compact,Justification,FaceCode R,
  Font BodyFont,Spacing 1.25)
@PageHeading(Centre "@Value(Page)")
@Comment(
X2700 X2700 X2700 X2700 X2700 X2700 X2700 X2700

........................................................................TESTCASE
)
@Marker(Make,TestCase,X2700)
@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Justification,Font BodyFont,FaceCode R,Spaces Compact,
   Spacing 1,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................TEXT
)
@Marker(Make,Text,X2700)
@Modify[MajorHeading,Use FlushLeft,Use B]
@Modify[Heading,Use Flushleft,Use R]
@Modify[Subheading,Use Flushleft,Use R,Capitalized Off,Underline All]
@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Justification,Font BodyFont,FaceCode R,Spaces Compact,
  Spacing 1,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................SLIDE
)
@Marker(Make,Slide,X2700)
@Modify(Text,LeftMargin 10Mm,LineWidth 145Mm,TopMargin 10Mm,BottomMargin 100Mm,
  Justification,Font BodyFont,Use R14,Spaces Compact,Spacing 1.5,Spread 1,
  Indent 0)
@Modify[MajorHeading,Use R14,UnderLine All]
@Modify[Heading,Use R14]
@Modify[Subheading,Use R14,Capitalized Off]
@Modify[Verbatim,Use R14]
@Modify[Verse, Use R14]
@Modify[Display, Use R14]
@Modify[Example, Use R14]
@Modify[ProgramExample, Use R14]
@Define(BodyStyle,Font BodyFont,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,Above 2,
  Below 1,Break,Need 5,Justification Off,Use R14)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,Below 3,Capitalized,Pagebreak UntilOdd,
  Centred)
@Define(HD2,Use HDX,Capitalized)
@Define(HD3,Use HDX,Capitalized)
@Define(HD4,Use HDX)
@Comment<@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,Use R14)
@Define(TC1=TCX,Above 1,Below 1,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)>
@Counter(Lecture,
  TitleForm "@Begin(HD1)Lecture @Parm(Referenced) @Parm(Title)@End(HD1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Lecture,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1)",Numbered [@A],Referenced [@A],IncrementedBy Use,
  Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1)@Parm(Title)@End(HD1)")

@Begin[Text]
@PageFooting(Centre "@Value(Page)")
@message[Copy masters at 1.27 magnification to get A4 OHP slides.]
@Comment(
........................................................................SLIDEA5
)
@Marker(Make,SlideA5,X2700)
@Begin(Text,LeftMargin 5Mm,LineWidth 95Mm,TopMargin 5Mm,BottomMargin 170Mm,
  Justification,Font BodyFont,FaceCode L,Spaces Compact,
  Spacing 1.5,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................SLIDEA4
)
@Marker(Make,SlideA4,X2700)
@Begin(Text,LeftMargin 10Mm,LineWidth 190Mm,TopMargin 10Mm,BottomMargin 42Mm,
  Justification,Font BodyFont,FaceCode L,Spaces Compact,
  Spacing 1.5,Spread 1,Indent 0)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................LETTER
)
@Marker(Make,Letter,X2700)
@Style(TopMargin 1Inch,BottomMargin 1Inch,LeftMargin 1Inch,LineWidth 6.25Inches)
@Define(ReturnAddress,NoFill,LeftMargin 4Inches,Spread 0,Break,BlankLines Kept,
  RightMargin 0)
@Define(Address=ReturnAddress,LeftMargin 0,Above 4)
@Define(Body,Fill,Justification,Use R,LeftMargin 0,Spacing 1,Spread 1,
  Spaces Compact,BlankLines Break,Above 1,Below 0.5Inches,Break)
@Define(Notations,NoFill,LeftMargin 0,Spread 0,Break,BlankLines Kept,
  RightMargin 0,Spaces Kept)
@Define(Ps=Body,Above 0,Below 0,AfterEntry "P.S. ")
@Textform(Greeting="@Begin(FlushLeft,Below 1)Dear @Parm(Text),@End(FlushLeft)")
@TextForm[Closing="@Begin(FlushLeft, Above 1)Yours Sincerely
@BlankSpace(1inch)
@Parm(Text)
@End(FlushLeft)"]
@Equate(PostScript=Ps,Closings=Notations,Initials=Notations)
@Begin(Text,Justification,Font BodyFont,FaceCode R)
@PageHeading(Left "@Value(Date)",Right "Page @Value(Page)")
@Comment[@Begin(ReturnAddress)]
@Comment(
........................................................................ARTICLE
)
@Marker(Make,Article,X2700)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(BodyStyle,Font BodyFont,Spacing 1.5)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use R)
@Define(HD1,Use HDX,Use B,Above 3,Capitalized)
@Define[HD1A,Use HDX,Below 3,Capitalized,Centred]
@Define(HD2=HDX,Below 3,Capitalized)
@Define[HD3=HDX]
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,LeftMargin 8)
@Define(TC2=TCX,LeftMargin 12)
@Define(TC3=TCX,LeftMargin 16)
@Counter(Section,TitleForm "@Begin(HD1)@Parm(Numbered) @Parm(Title)@End(HD1)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,TitleForm "@Begin(HD1)@Parm(Title)@End(HD1)",
  ContentsForm "@Begin(TC1)@Parm(Title)@>@Parm(Page)@\@End(TC1)")
@Counter(Appendix,TitleForm "@Begin(HD1)@Parm(Numbered) @Parm(Title)@End(HD1)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")


@Comment(what follows is libraryfile math, which we don't yet do as a library.)

@Counter(EquationCounter,Numbered <(@1)>,
  Referenced <(@1)>,IncrementedBy Tag,
  Init 0)
@Counter(TheoremCounter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Modify[MajorHeading,Use FlushLeft,Use B]
@Modify[Heading,Use Flushleft,Use R]
@Modify[Subheading,Use Flushleft,Use R,Capitalized Off,Underline All]
@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Indent 2,Spread 1,Use BodyStyle,
  Spaces Compact,Justification,FaceCode R)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................REPORT
)
@Marker(Make,Report,X2700)
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(BodyStyle,Font BodyFont,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use C,Below 3)
@Define(HD2,Use HDX)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R)
@Define(TC1=TCX,Above 1,Below 1,Use B)
@Define(TC2=TCX,LeftMargin 8)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
@Parm(title)@End(HD1A)",
  ContentsForm "@TC1(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  Numbered [@1.],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@TC2(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  within Chapter,Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HDX)@Parm(Numbered) @Parm(Title)@End(HDX)",
  ContentsForm "@TC3(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HDX)@Parm(Numbered) @Parm(Title)@End(HDX)",
  ContentsForm "@TC4(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@TC2(@Parm(Title)@>@Parm(Page)@\)")
@Counter(Appendix,TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@TC1(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@TC2(@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,within Chapter,Init 0)
@Counter(TheoremCounter,within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Indent 2,Spread 1,Use BodyStyle,
  Spaces Compact,Justification,FaceCode R)
@PageHeading(Centre "@Value(Page)")
@Comment(
........................................................................MANUAL
)
@Marker(Make,Manual,X2700)
@Style[DoubleSided]
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(BodyStyle,Font BodyFont,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B14,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B12,Capitalized)
@Define(HD3,Use HDX,Use B,Capitalized)
@Define(HD4,Use HDX,Use B)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R,AfterEntry "@TabClear")
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Chapter,
  TitleForm "@Begin(HD1A)Chapter @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Chapter,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear",Spacing 1.0,Capitalized Off,
  FaceCode C,Indent 0,Overstruck 0,Justification Off,LeftMargin 10,
  RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@Textform(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@Textform(Indexmain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@B{@ParmValue(Page)}>]")
@Textform(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
      r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondarymain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
      r="   @Parm(Secondary)",s="@B<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
      s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,within Chapter,Init 0)
@Counter(TheoremCounter,within Chapter,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Indent 2,Spread 1,Use BodyStyle,
  Spaces Compact,Justification,FaceCode R)
@PageHeading(Centre "@Value(Page)")


@Comment(
........................................................................NOTES
)
@Marker(Make,Notes,X2700)
@Style[DoubleSided]
@Send(Index "@NewPage
@PrefaceSection(Index)
@Indexenv(")
@Send(Contents "@Set(Page=0)
@NewPage
@Style(PageNumber <@i>)
@PrefaceSection(Table of Contents)
")
@Define(BodyStyle,Font BodyFont,Spacing 1)
@Define(HDX,Hyphenation Off,LeftMargin 0,Indent 0,Fill,Spaces Compact,
  Above 2,Below 1,Break,Need 5,Justification Off,Use B)
@Define(HD0,Use HDX,Above 1Inch,Below 0.5Inch)
@Define(HD1,Use HDX,Above 3,PageBreak UntilOdd)
@Define(HD1A=HD1,Centred,Use B14,Capitalized,Below 3)
@Define(HD2,Use HDX,Use B12,Capitalized)
@Define(HD3,Use HDX,Use B,Capitalized)
@Define(HD4,Use HDX,Use B)
@Define(TCX,LeftMargin 5,Indent -5,RightMargin 5,Fill,Spaces Compact,
  Above 0,Below 0,Spacing 1,Spread 0,Break,FaceCode R,AfterEntry "@TabClear")
@Define(TC1=TCX,Above 1,Below 1,Use B,Capitalized)
@Define(TC2=TCX,LeftMargin 8,Capitalized)
@Define(TC3=TCX,LeftMargin 12)
@Define(TC4=TCX,LeftMargin 16)
@Counter(Lecture,
  TitleForm "@Begin(HD1A)Lecture @Parm(Referenced)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@1],Referenced [@1],IncrementedBy Use,Announced)
@Counter(Section,Within Lecture,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(SubSection,Within Section,
  TitleForm "@Begin(HD3)@Parm(Numbered) @Parm(Title)@End(HD3)",
  ContentsForm "@Begin(TC3)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC3)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(Paragraph,Within SubSection,
  TitleForm "@Begin(HD4)@Parm(Numbered) @Parm(Title)@End(HD4)",
  ContentsForm "@Begin(TC4)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC4)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use)
@Counter(UnNumbered,
  TitleForm "@Begin(HD2)@Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Title)@>@Parm(Page)@\@End(TC2)")
@Counter(Appendix,
  TitleForm "@Begin(HD1A)Appendix @Parm(Numbered)
  @Parm(Title)@End(HD1A)",
  ContentsForm "@Begin(TC1)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC1)",
  Numbered [@A],Referenced [@A],IncrementedBy Use,Announced)
@Counter(AppendixSection,Within Appendix,
  TitleForm "@Begin(HD2)@Parm(Numbered) @Parm(Title)@End(HD2)",
  ContentsForm "@Begin(TC2)@Parm(Referenced) @Parm(Title)@>@Parm(Page)@\@End(TC2)",
  Numbered [@#@:.@1],Referenced [@#@:.@1],IncrementedBy Use,Announced)
@Counter(PrefaceSection,
  TitleForm "@Begin(HD1A)@Parm(Title)@End(HD1A)")

@Define(Indexenv,Use W,AfterEntry "@Tabclear",Spacing 1.0,Capitalized Off,
  FaceCode C,Indent 0,Overstruck 0,Justification Off,LeftMargin 10,
  RightMargin 0,NoFill,UnderLine Off,Break,Above 0,Below 0)

@Form(Ind={@IndexEntry["@W<@Parm(q)>","@Parm(r)  ",@Imbed(s,def "@ParmQuote(s)",undef "<>")]})
@Textform(Index="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@ParmValue(Page)>]")
@Textform(Indexmain="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text),s/<@B{@ParmValue(Page)}>]")
@Textform(IndexPrimary="@Ind[q/<@Parm(Text) 1>,r/@ParmQuote(Text)]")
@Form(IndexSecondary={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
      r="   @Parm(Secondary)",s="@ParmValue(Page)"]})
@Form(IndexSecondarymain={@IndexPrimary<@Parm(Primary)>@Ind[q/<@Parm(Primary) 2  @Parm(Secondary)>,
      r="   @Parm(Secondary)",s="@B<@ParmValue(Page)>"]})
@Form(Seealso={@Ind[q/<@Parm(Primary) 3 @Parm(other)>,r/<     See also>,
      s/@ParmQuote(other)]})


@Comment(what follows is libraryfile math, which we don't yet do as a library.
As `MODIFY does not yet work on Counters, it is also 'REPORT' specific.)

@Counter(EquationCounter,Numbered <(@#@1)>,Referenced <(@#@:.@1)>,
  IncrementedBy Tag,within Lecture,Init 0)
@Counter(TheoremCounter,within Lecture,Numbered <@1.>,Referenced <@1>,
  IncrementedBy Reference,Init 0)
@Define(Equation,Use Insert,NoFill,Spaces Kept,Use R,BlankLines Kept,
  NumberLocation rfr,Counter EquationCounter,TabExport False,RightMargin +10)
@Define(Theorem,Use Insert, Fill,BlankLines Break,
  AfterEntry "@b(Theorem @Ref(TheoremCounter): )",
  Counter TheoremCounter)
@Define(Lemma=Theorem,AfterEntry "@b(Lemma @Ref(TheoremCounter): )")
@Define(Proposition=Theorem,AfterEntry "@b(Proposition @Ref(TheoremCounter): )")
@Define(Definition=Theorem,AfterEntry "@b(Definition @Ref(TheoremCounter): )")
@Define(Corollary=Theorem,AfterEntry "@b(Corollary @Ref(TheoremCounter): )")
@Define(Proof=Theorem,AfterEntry "@b(Proof @Ref(TheoremCounter): )")

@Comment(end of math lib)

@Begin(Text,LeftMargin 1Inch,RightMargin 1Inch,TopMargin 1Inch,BottomMargin 1Inch,
  Indent 2,Spread 1,Use BodyStyle,
  Spaces Compact,Justification,FaceCode R)
@PageHeading(Centre "@Value(Page)")