reference designs for subdivisions

1 files changed, 27 insertions, 0 deletions

diff --git a/sal.otx b/sal.otx
index d886e49..3ffe77f 100644
--- a/sal.otx
+++ b/sal.otx
@@ -55,6 +55,33 @@
 \def\ulRedefine{\def~{\egroup\hbox{\rlap{\copy0}\uline\wd0}\nobreak\uline\uspace\relax 
          \setbox0=\hbox\bgroup}} 
 
+% --- default designs, for handy reference
+
+\_def \_titfont {\_scalemain\_typoscale[\_magstep4/\_magstep5]\_boldify}
+\_def \_chapfont {\_scalemain\_typoscale[\_magstep3/\_magstep3]\_boldify}
+\_def \_secfont {\_scalemain\_typoscale[\_magstep2/\_magstep2]\_boldify}
+\_def \_seccfont {\_scalemain\_typoscale[\_magstep1/\_magstep1]\_boldify}
+
+\_def\_printchap #1{\_vfill\_supereject \_prevdepth=0pt
+  \_vglue\_medskipamount % shifted by topkip+\medskipamount
+  {\_chapfont \_noindent \_mtext{chap} \_printrefnum[@]\_par
+    \_nobreak\_smallskip
+    \_noindent \_raggedright #1\_nbpar}\_mark{}%
+  \_nobreak \_belowtitle{\_bigskip}%
+  \_firstnoindent}
+
+\_def\_printsec#1{\_par
+  \_abovetitle{\_penalty-151}\_bigskip
+  {\_secfont \_noindent \_raggedright \_printrefnum[@\_quad]#1\_nbpar}\_insertmark{#1}%
+  \_nobreak \_belowtitle{\_medskip}%
+  \_firstnoindent}
+
+\_def\_printsecc#1{\_par
+  \_abovetitle{\_penalty-101}{\_medskip\_smallskip}
+  {\_seccfont \_noindent \_raggedright \_printrefnum[@\_quad]#1\_nbpar}%
+  \_nobreak \_belowtitle{\_medskip}%
+  \_firstnoindent}
+
 % ============ sal style
 \load[mte]
 #\load[f_pp_writer]