Return to 'original' versions of TEDIT files

docs/medley-irm/04-STRINGS.TEDIT

@@ -56,24 +56,24 @@ If X is not a string, it is converted to one.  For example,
 SUBSTRING does not actually copy any characters, but simply creates a new string pointer to the characters in X.   If OLDPTR is a string pointer, it is modified and returned.
 (GNC(GNC (Function) NIL NIL ("4") 3) X)  	[Function]
 ªGet Next Character.º  Returns the next character of the string X (as a symbol); also removes the character from the string, by changing the string pointer.  Returns NIL if X is the null string.  If X isn't a string, a string is made.  Used for sequential access to characters of a string.  Example:
-¬(SETQ FOO "ABCDEFG")
+_(SETQ FOO "ABCDEFG")
 "ABCDEFG"
-¬(GNC FOO)
+_(GNC FOO)
 A
-¬(GNC FOO)
+_(GNC FOO)
 B
-¬FOO
+_FOO
 "CDEFG"
 Note that if A is a substring of B, (GNC A) does not remove the character from B.
 (GLC(GLC (Function) NIL NIL ("4") 3) X)  	[Function]
 ªGet Last Character.º  Returns the last character of the string X (as a symbol); also removes the character from the string.  Similar to GNC.  Example:
-¬(SETQ FOO "ABCDEFG")
+_(SETQ FOO "ABCDEFG")
 "ABCDEFG"
-¬(GLC FOO)
+_(GLC FOO)
 G
-¬(GLC FOO)
+_(GLC FOO)
 F
-¬FOO
+_FOO
 "ABCDE"
 (CONCAT(CONCAT (Function) NIL NIL ("4") 4) X1 X2 ... XN)  	[NoSpread Function]
 Returns a new string which is the concatenation of (copies of) its arguments.  Any arguments which are not strings are transformed to strings.  Examples:
@@ -125,25 +125,25 @@ Note:  If NEG = T, STRPOSL must call MAKEBITTABLE whether A is a list or a bit t
 
 [This page intentionally left blank]
 (SEQUENCE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "4-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "4-" "")) (222 24 288 36) NIL) (TEXT NIL NIL (54 36 408 540) NIL))) (ALTERNATE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "4-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "4-" "")) (102 24 288 36) NIL) (HEADING NIL (HEADINGTYPE LEFTBACK) (96 612 516 36) NIL) (TEXT NIL NIL (102 36 456 540) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "4-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "4-" "")) (222 24 288 36) NIL) (HEADING NIL (HEADINGTYPE RIGHTPAGE) (48 612 564 36) NIL) (TEXT NIL NIL (54 36 408 540) NIL)))))))1
$6
°
$ä
ìEVEN
T2
°
$
TE
È$PAGEHEADING	RIGHTPAGE1HH
°$506
°
-
$

°

T1l~
°
$1ll
°
$1~~
°
$1l~
°
$1
°$1
°$1
°$7
È$Ì
à
D
È
$PAGEHEADINGLEFTBACKMODERN
-GACHA
-PALATINO	TITAN	TITAN	
PALATINO	
PALATINO	TITAN
-CLASSIC
-TITAN	TITAN	ÿþ
CLASSIC
-
MODERN
-
+
$

°

T1l~
°
$1ll
°
$1~~
°
$1l~
°
$1
°$1
°$1
°$7
È$Ì
à
D
È
$PAGEHEADINGLEFTBACK/MODERN
+(CHARPROPS (COLOR . BLACK)).GACHA
+(CHARPROPS (COLOR . BLACK))1PALATINO	(CHARPROPS (COLOR . BLACK)).TITAN	(CHARPROPS (COLOR . BLACK)).TITAN	(CHARPROPS (COLOR . BLACK))
1PALATINO	(CHARPROPS (COLOR . BLACK))
1PALATINO	(CHARPROPS (COLOR . BLACK)).TITAN
+(CHARPROPS (COLOR . BLACK))0CLASSIC
+(CHARPROPS (COLOR . BLACK)).TITAN	(CHARPROPS (COLOR . BLACK)).TITAN	ÿþ(CHARPROPS (COLOR . BLACK))
0CLASSIC
+(CHARPROPS (COLOR . BLACK))
3
 TIMESROMAN
-MODERN






IM.CHAP.GETFN

)
IM.INDEX.GETFN

HRULE.GETFN



%
D
,


8
+
T%
"
+(CHARPROPS (COLOR . BLACK))/MODERN
+(CHARPROPS (COLOR . BLACK))/MODERN(CHARPROPS (COLOR . BLACK))





IM.CHAP.GETFN
)
IM.INDEX.GETFN
HRULE.GETFN




%
D
,


8
+
T%
"
 
–

 





 
	


N	


ð



-





p"!«

-





H !
#
+





p"!«

+





H !
#
 

 

	

S'K

 

 
	


H

#.
	
1"

-
	


	6
M
	
+
	


	6
M
	
 &
IM.INDEX.GETFN










c		.

(


,
%#)&##
8$	e
3

  
IM.INDEX.GETFN


@
e

c
		
 
@@ -169,4 +169,4 @@ TIMESROMAN
 $
IM.INDEX.GETFN
	
:
.
 
 
F#
)
h+


;;>
:‹$

-)
IM.INDEX.GETFN
	
(
-
F	
3<

%DATE:içê.<2E>,zº
+)
IM.INDEX.GETFN
	
(
-
F	
3<

%(((CHARENCODING . MCCS)))PROPS:#DATE:j¶£.<2E>,zº

docs/medley-irm/10-FUNC-DEF.TEDIT

@@ -9,15 +9,15 @@ A function's definition specifies if the function has a fixed or variable number
 (LAMBDA (X Y) (PRINT X) (PRINT Y))
 This function has two evaluated arguments, X and Y, and it will execute (PRINT X) and (PRINT Y) when evaluated.  Other types of function definitions are described below.
 A function is defined by putting an expr definition in the function definition cell of a symbol.  There are a number of functions for accessing and setting function definition cells, but one usually defines a function with DEFINEQ (see the Defining Functions section below).  For example:
-¬ (DEFINEQ (FOO (LAMBDA (X Y) (PRINT X) (PRINT Y))))(FOO)
+_ (DEFINEQ (FOO (LAMBDA (X Y) (PRINT X) (PRINT Y))))(FOO)
 The expression above will define the function FOO to have the expr definition (LAMBDA (X Y) (PRINT X) (PRINT Y)).  After being defined, this function may be evaluated just like any system function:
-¬ (FOO 3 (IPLUS 3 4))
+_ (FOO 3 (IPLUS 3 4))
 3
 7
 7
 Not all function definition cells contain expr definitions.  The compiler (see the first page of Chapter 18) translates expr definitions into compiled code objects, which execute much faster.  Interlisp provides a number of ªfunction type functionsº which determine how a given function is defined, the number and names of function arguments, etc.  See the Function Type Functions section below.
 Usually, functions are evaluated automatically when they appear within another function or when typed into Interlisp.  However, sometimes it is useful to envoke the Interlisp interpreter explicitly to apply a given ªfunctional argumentº to some data.  There are a number of functions which will apply a given function repeatedly.  For example, MAPCAR will apply a function (or an expr definition) to all of the elements of a list, and return the values returned by the function:
-¬ (MAPCAR '(1 2 3 4 5) '(LAMBDA (X) (ITIMES X X))
+_ (MAPCAR '(1 2 3 4 5) '(LAMBDA (X) (ITIMES X X))
 (1 4 9 16 25)
 When using functional arguments, there are a number of problems which can arise, related to accessing free variables from within a function argument.  Many times these problems can be solved using the function FUNCTION to create a FUNARG object.
 The macro facility provides another way of specifying the behavior of a function (see the Macros section below).  Macros are very useful when developing code which should run very quickly, which should be compiled differently than when it is interpreted, or which should run differently in different implementations of Interlisp.
@@ -34,9 +34,9 @@ Lambda-Spread Functions(LAMBDA-SPREAD% FUNCTIONS NIL Lambda-Spread% Functions NI
 Lambda-spread functions take a fixed number of evaluated arguments.  This is the most common function type.  A lambda-spread expr definition has the form:
 (LAMBDA (ARG1 ... ARGM) FORM1 ... FORMN)
 The argument list (ARG1 ... ARGM) is a list of symbols that gives the number and names of the formal arguments to the function.  If the argument list is ( ) or NIL, this indicates that the function takes no arguments.  When a lambda-spread function is applied to some arguments, the arguments are evaluated, and bound to the local variables ARG1 ... ARGM.  Then, FORM1 ... FORMN are evaluated in order, and the value of the function is the value of FORMN.
-¬ (DEFINEQ (FOO (LAMBDA (X Y) (LIST X Y))))
+_ (DEFINEQ (FOO (LAMBDA (X Y) (LIST X Y))))
 (FOO)
-¬ (FOO 99 (PLUS 3 4))
+_ (FOO 99 (PLUS 3 4))
 (99 7)
 In the above example, the function FOO defined by (LAMBDA (X Y) (LIST X Y)) is applied to the arguments 99 and (PLUS 3 4).  These arguments are evaluated (giving 99 and 7), the local variable X is bound to 99 and Y to 7, (LIST X Y) is evaluated, returning (99 7), and this is returned as the value of the function.
 A standard feature of the Interlisp system is that no error occurs if a spread function is called with too many or too few arguments.  If a function is called with too many argumnents, the extra arguments are evaluated but ignored.  If a function is called with too few arguments, the unsupplied ones will be delivered as NIL.  In fact, a spread function cannot distinguish between being given NIL as an argument, and not being given that argument, e.g., (FOO) and (FOO NIL) are exactly the same for spread functions.  If it is necessary to distinguish between these two cases, use an nlambda function and explicitly evaluate the arguments with the EVAL function.
@@ -44,9 +44,9 @@ Nlambda-Spread Functions(NLAMBDA-SPREAD% FUNCTIONS NIL Nlambda-Spread% Functions
 Nlambda-spread functions take a fixed number of unevaluated arguments.  An nlambda-spread expr definition has the form:
 (NLAMBDA (ARG1 ... ARGM) FORM1 ... FORMN)
 Nlambda-spread functions are evaluated similarly to lanbda-spread functions, except that the arguments are not evaluated before being bound to the variables ARG1 ... ARGM.
-¬ (DEFINEQ (FOO (NLAMBDA (X Y) (LIST X Y))))
+_ (DEFINEQ (FOO (NLAMBDA (X Y) (LIST X Y))))
 (FOO)
-¬ (FOO 99 (PLUS 3 4))
+_ (FOO 99 (PLUS 3 4))
 (99 (PLUS 3 4))
 In the above example, the function FOO defined by (NLAMBDA (X Y) (LIST X Y)) is applied to the arguments 99 and (PLUS 3 4).  These arguments are unevaluated to X and Y.   (LIST X Y) is evaluated, returning (99 (PLUS 3 4)), and this is returned as the value of the function.
 Functions can be defined so that all of their arguments are evaluated (lambda functions) or none are evaluated (nlambda functions).  If it is desirable to write a function which only evaluates some of its arguments (e.g., SETQ), the functions should be defined as an nlambda, with some arguments explicitly evaluated using the function EVAL.  If this is done, the user should put the symbol EVAL on the property list of the function under the property INFO.  This informs various system packages, such as DWIM, CLISP, and Masterscope, that this function in fact does evaluate its arguments, even though it is an nlambda.
@@ -61,23 +61,23 @@ Returns the Mth argument for the lambda-nospread function whose argument list is
 (SETARG(SETARG (Function) NIL NIL ("10") 4) VAR M X)  	[NLambda Function]
 Sets the Mth argument for the lambda-nospread function whose argument list is VAR to X.  VAR is not evaluated;  M and X are evaluated.  M should be between 1 and the value of VAR.
 In the example below, the function FOO is defined to collect and return a list of all of the evaluated arguments it is given (the value of the for statement).
-¬ (DEFINEQ (FOO 
+_ (DEFINEQ (FOO 
   (LAMBDA X (for ARGNUM from 1 to X collect (ARG X ARGNUM)]
 (FOO)
-¬ (FOO 99 (PLUS 3 4))
+_ (FOO 99 (PLUS 3 4))
 (99 7)
-¬ (FOO 99 (PLUS 3 4)(TIMES 3 4)))
+_ (FOO 99 (PLUS 3 4)(TIMES 3 4)))
 (99 7 12)
 NLambda-Nospread Functions(NLAMBDA-NOSPREAD% FUNCTIONS NIL NLambda-Nospread% Functions NIL ("10") 4)
 Nlambda-nospread functions take a variable number of unevaluated arguments.  An nlambda-nospread expr definition has the form:
 (NLAMBDA VAR FORM1 ... FORMN)
 VAR may be any symbol, except NIL and T.  Though similar in form to lambda-nospread expr definitions, an nlambda-nospread is evaluated quite differently.  When an nlambda-nospread function is applied to some arguments, VAR is simply bound to a list of the unevaluated arguments.  The user may pick apart this list, and evaluate different arguments.
 In the example below, FOO is defined to return the reverse of the list of arguments it is given (unevaluated):
-¬ (DEFINEQ (FOO (NLAMBDA X (REVERSE X)))) 
+_ (DEFINEQ (FOO (NLAMBDA X (REVERSE X)))) 
 (FOO)
-¬ (FOO 99 (PLUS 3 4))
+_ (FOO 99 (PLUS 3 4))
 ((PLUS 3 4) 99)
-¬ (FOO 99 (PLUS 3 4)(TIMES 3 4))
+_ (FOO 99 (PLUS 3 4)(TIMES 3 4))
 (TIMES 3 4)(PLUS 3 4) 99)
 The warning about evaluating arguments to nlambda functions also applies to nlambda-nospread function.  
 Compiled Functions(COMPILED% FUNCTIONS NIL Compiled% Functions NIL ("10") 5)
@@ -158,23 +158,23 @@ Usually, function application is done automatically by the Interlisp interpreter
 There are some situations where it is necessary to explicitly call the evaluator, and Interlisp supplies a number of functions that will do this.  These functions take ªfunctional arguments,º which may either be symbols with function definitions, or expr definition forms such as (LAMBDA (X)...), or FUNARG expressions. 
 ÿÿ(ÿAPPLY(APPLY (Function) NIL NIL ("10") 9) FN ARGLISTÿÿ ï%)  	[Function]ÿ
 Applies the function FN to the arguments in the list ARGLIST, and returns its value.  APPLY is a lambda function, so its arguments are evaluated, but the individual elements of ARGLIST are not evaluated.  Therefore, lambda and nlambda functions are treated the same by APPLYÿÿï%lambda functions take their arguments from ARGLIST without evaluating them.  For example:
-ÿ¬ (APPLY 'APPEND '((PLUS 1 2 3)(4 5 6))) 
+ÿ_ (APPLY 'APPEND '((PLUS 1 2 3)(4 5 6))) 
 (PLUS 1 2 3 4 5 6)
 Note that FN may explicitly evaluate one or more of its arguments itself.  For example, the system function SETQ is an nlambda function that explicitly evaluates its second argument.  Therefore, (APPLY 'SETQ '(FOO (ADD1 3)))will set FOO to 4, instead of setting it to the expression (ADD1 3).
 APPLY can be used for manipulating expr definitions.  For example:
-¬ (APPLY '(LAMBDA (X Y)(ITIMES X Y)) '(3 4))) 
+_ (APPLY '(LAMBDA (X Y)(ITIMES X Y)) '(3 4))) 
 12ÿÿ
 (ÿAPPLY*(APPLY* (Function) NIL NIL ("10") 9) FN ARG1 ARG2 ... ARGNÿÿ )  	[ÿNoSpread ÿÿFunction]ÿ
 Nospread version of APPLY.  Applies the function FN to the arguments ARG1 ARG2 ... ARGN.  For example: 
-¬ (APPLY 'APPEND '(PLUS 1 2 3)(4 5 6)) 
+_ (APPLY 'APPEND '(PLUS 1 2 3)(4 5 6)) 
 (PLUS 1 2 3 4 5 6)
 ÿÿ(ÿEVAL(EVAL (Function) NIL NIL ("10") 10) Xÿÿï%)  	[Function]ÿ
 EVAL evaluates the expression X and returns this value, i.e., EVAL provides a way of calling the Interlisp interpreter.  Note that EVAL is itself a lambda function, so its argument is first evaluated, e.g.:
-¬ (SETQ FOO 'ADD1 3)))
+_ (SETQ FOO 'ADD1 3)))
 (ADD1 3)
-¬(EVAL FOO)
+_(EVAL FOO)
 4
-¬(EVAL 'FOO)
+_(EVAL 'FOO)
 (ADD1 3)
 ÿÿ(ÿQUOTE(QUOTE (Function) NIL NIL ("10") 10) Xÿÿ)  	[ÿNlambda NoSpread ÿÿFunction]ÿ
 QUOTE prevents its arguments from being evaluated.  Its value is X itself, e.g., (QUOTE FOO) is FOO.
@@ -198,12 +198,12 @@ COMPILETYPELST (see Chapter 18) permits the user to specify how a datum of a par
 ÿÿ(ÿEVALHOOK(EVALHOOK (Function) NIL NIL ("10") 11) FORM EVALHOOKFNÿÿ)  	[Function]ÿ
 EVALHOOK evaluates the expression FORM, and returns its value.  While evaluating FORM, the function EVAL behaves in a special way.  Whenever a list other than FORM itself is to be evaluated, whether implicitly or via an explicit call to EVAL, EVALHOOKFN is invoked (it should be a function), with the form to be evaluated as its argument.  EVALHOOKFN is then responsible for evaluating the form.  Whatever is returned is assume to be the result of evaluating the form.  During the execution of EVALHOOKFN, this special evaluation is turned off.  (Note that EVALHOOK does not affect the evaluations of variables, only of lists).
 Here is an example of a simple tracing routine that uses the EVALHOOK feature:
-¬(DEFINEQ (PRINTHOOK (FORM)
+_(DEFINEQ (PRINTHOOK (FORM)
 (printout T "eval: "FORM T)
 (EVALHOOK FORM (FUNCTION PRINTHOOK
 (PRINTHOOK)
 Using PRINTHOOK, one might see the following interaction:
-¬(EVALHOOK '(LIST (CONS 1 2)(CONS 3 4)) 'PRINTHOOK)
+_(EVALHOOK '(LIST (CONS 1 2)(CONS 3 4)) 'PRINTHOOK)
 eval: (CONS 1 2)
 eval: (CONS 3 4)
 ((1.2)(3.4))
@@ -381,21 +381,21 @@ Note:  Because of the way that the evaluator processes macros, if you have a mac
 
 (SEQUENCE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "10-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "10-" "")) (222 24 288 36) NIL) (TEXT NIL NIL (54 36 408 540) NIL))) (ALTERNATE NIL NIL (0 0 0 0) ((PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "10-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD LEFT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "10-" "")) (102 24 288 36) NIL) (HEADING NIL (HEADINGTYPE LEFTBACK) (102 612 510 36) NIL) (TEXT NIL NIL (102 36 456 540) NIL))) (PAGE NIL (PAPERSIZE Letter FOLIOINFO (ARABIC "10-" "")) (0 0 612 792) ((FOLIO NIL (PARALOOKS (QUAD RIGHT) CHARLOOKS (SUPERSCRIPT 0 INVISIBLE OFF SELECTPOINT OFF PROTECTED OFF SIZE 9 FAMILY TIMESROMAN OVERLINE OFF STRIKEOUT OFF UNDERLINE OFF EXPANSION REGULAR SLOPE REGULAR WEIGHT MEDIUM INVERTED OFF USERINFO NIL STYLE NIL) FORMATINFO (ARABIC "10-" "")) (222 24 288 36) NIL) (HEADING NIL (HEADINGTYPE RIGHTPAGE) (48 612 564 36) NIL) (TEXT NIL NIL (54 36 408 540) NIL))))))))1
$1
°6
°
$ä
ìEVEN
T2
°
$
TE
È$PAGEHEADING	RIGHTPAGE1
°$2
È
 

T7<00>
°„
<00>7œ
°
–
œ7<00>
°„
<00>7<00>
°„
<00>7<00>
°„
<00>7<00>
°„
<00>1HH
°1l~
°
$506
°
$

°

T2
È
-

T1HH
°
$1HH
°
1
°
$1
°
$1xx
°
$2l~
°
$
T1Zl
°
$1l~
°
$1~~
°
$7„
˜
~
„7–
°
<00>
–1HH
°
1<N
°
2<N
°

T1<<
°
$1<<
°
1NN
°
2<<
°

T1NN
°
$1<<
°
$1
°$2
È$
TF
È$PAGEHEADING	RIGHTPAGE
TE
È
$PAGEHEADINGLEFTBACK
TPALATINO	GACHA
-PALATINO	TITANMODERN
-MODERN
-CLASSIC
-TITAN	
TITAN	PALATINO	
CLASSIC
-CLASSIC
-
CLASSIC
-ÿý
TITANÿþ
PALATINO	ÿý
TITANÿþPALATINO	ÿþCLASSIC
-ÿþ
+

T1HH
°
$1HH
°
1
°
$1
°
$1xx
°
$2l~
°
$
T1Zl
°
$1l~
°
$1~~
°
$7„
˜
~
„7–
°
<00>
–1HH
°
1<N
°
2<N
°

T1<<
°
$1<<
°
1NN
°
2<<
°

T1NN
°
$1<<
°
$1
°$2
È$
TF
È$PAGEHEADING	RIGHTPAGE
TE
È
$PAGEHEADINGLEFTBACK
T/MODERN
+(CHARPROPS (COLOR . BLACK)).GACHA
+(CHARPROPS (COLOR . BLACK))1PALATINO	(CHARPROPS (COLOR . BLACK)).TITAN(CHARPROPS (COLOR . BLACK))1PALATINO	(CHARPROPS (COLOR . BLACK))/MODERN
+(CHARPROPS (COLOR . BLACK))0CLASSIC
+(CHARPROPS (COLOR . BLACK)).TITAN	(CHARPROPS (COLOR . BLACK))
.TITAN	(CHARPROPS (COLOR . BLACK))1PALATINO	(CHARPROPS (COLOR . BLACK))
0CLASSIC
+(CHARPROPS (COLOR . BLACK))0CLASSIC
+(CHARPROPS (COLOR . BLACK))
0CLASSIC
+ÿý(CHARPROPS (COLOR . BLACK))
.TITANÿþ(CHARPROPS (COLOR . BLACK))
1PALATINO	ÿý(CHARPROPS (COLOR . BLACK))
.TITANÿþ(CHARPROPS (COLOR . BLACK))1PALATINO	ÿþ(CHARPROPS (COLOR . BLACK))0CLASSIC
+ÿþ(CHARPROPS (COLOR . BLACK))3
 TIMESROMAN
-MODERN	HELVETICA)
(1'

IM.CHAP.GETFN5
HRULE.GETFN
'&
¡ù%#+

	
+(CHARPROPS (COLOR . BLACK))2	HELVETICA(CHARPROPS (COLOR . BLACK)))

(1
'

IM.CHAP.GETFN5
HRULE.GETFN
'&
¡ù%#+

	
 Jß;%:."V%$$$
Œ
X<00>%2$Ò
	
H

HRULE.GETFN
|

	

M	0
	
_
8º
Pa?:
	
(
Y
W’	D
IM.INDEX.GETFN
›!


	




w²

	
	
F

#,"#"#
 )





 5
BE:	¯F
IM.INDEX.GETFN
x!







œ

!-!#
-&

5Þn39¥
V
_½H
IM.INDEX.GETFN
z	





‹V





[
	!
IM.INDEX.GETFN


D_
H
6
	$
IM.INDEX.GETFN

	
D



&#y <"
+&

5Þn39¥V
_½H
IM.INDEX.GETFN
z	





‹V





[
	!
IM.INDEX.GETFN


D_
H
6
	$
IM.INDEX.GETFN

	
D



&#y <"
 J
IM.INDEX.GETFN
	
	



´V+!i:
IM.INDEX.GETFN
<00>
þ
	#
IM.INDEX.GETFN


MU



"


$




$


 


$









$A

Q8*
	#
IM.INDEX.GETFN





	

	
<
	$
IM.INDEX.GETFN





	%
IM.INDEX.GETFN

/	



5

















	#
IM.INDEX.GETFN

#&

	%
IM.INDEX.GETFN

 LN^"=
4(
	*
IM.INDEX.GETFN

5c


 
	

 


@@ -406,9 +406,9 @@ TIMESROMAN
 


HRULE.GETFN
•@
	%
IM.INDEX.GETFN








‚

3,.

„
#<00>6	&
IM.INDEX.GETFN

 %<:	€3	2
IM.INDEX.GETFN°2
γ7	$
IM.INDEX.GETFN4
 
-#Ž3(GF
Ê

+#Ž3(GF
Ê
 vT
-
	¡
	"
IM.INDEX.GETFN

#(….	$
IM.INDEX.GETFN

'-
	$
IM.INDEX.GETFN 

3(	º
+
	¡
	"
IM.INDEX.GETFN

#(….	$
IM.INDEX.GETFN
'-
	$
IM.INDEX.GETFN 

3(	º
 	%
IM.INDEX.GETFN	 &

HRULE.GETFN
{A

	#
IM.INDEX.GETFN

 VU[P,
 `S	
*>/	$
IM.INDEX.GETFN








@@ -439,7 +439,7 @@ TIMESROMAN
 
{k+.
 1"


 	
	
*)
-Ÿ)

+Ÿ)
 Î3
 9

 
@@ -447,7 +447,7 @@ TIMESROMAN
 
V
 P
 n,

-8

.0¶>.?á›'	“	,
IM.INDEX.GETFNk

/
&R
!ÙŽ
	'
IM.INDEX.GETFN

3< :
MB d,…()\
		S	
~
+8

.0¶>.?á›'	“	,
IM.INDEX.GETFNk

/&R

!ÙŽ
	'
IM.INDEX.GETFN

3< :MB d,…()\
		S	
~
 
 
‡
 > m
@@ -455,7 +455,7 @@ TIMESROMAN
 $





<#
	
 
|
 


7#~^M
 

¢ƒ
6

-;
	










	<00>
	


!
	
J
+;
	










	<00>
	

!
	
J
 M<
 
 
T
@@ -463,7 +463,7 @@ TIMESROMAN
 )



	Jc
6

 %
	

	



[
 (








(Š-
<00>
-0






%


Ò	


+0






%

Ò	


 +	





†
-K


'MŠ	ì
-

R

%
DATE:iæ5pÛ·
zº
+K



'MŠ	ì
+
R

%
(((CHARENCODING . MCCS)))PROPS:#DATE:j¶¤<EFBFBD>Û·
zº