perm filename CRESOR[3,LMM] blob sn#037517 filedate 1973-04-22 generic text, type T, neo UTF8

(DEFPROP CRESORFNS
 (CRESORFNS (SETQ LOADING NIL)
	    (DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))
	    (DSKIN (FORSM . LSP)
		   (DUMMY . LSP)
		   (INIT . LSP)
		   (FORLSP . LSP)
		   (MORE . LSP)
		   (CYCPRE . LSP)
		   (CYCOMA . LSP)
		   (CYCOMB . LSP)
		   (CYCOMD . LSP)
		   (CYCOME . LSP)
		   (CYCOMF . LSP)
		   (CYCOMG . LSP)
		   (CYCOMH . LSP)
		   (CYCDRA . LSP)
		   (CYCDRB . LSP)
		   (CYCDRC . LSP)
		   (CYCDRD . LSP)
		   (CYCDRE . LSP)
		   (CYCDRF . LSP)
		   (CYCDRG . LSP)
		   (CYCDRH . LSP)
		   (CYCDRI . LSP)
		   (CYCDRJ . LSP)
		   (CYCMR1 . LSP)
		   (CYCCAT . LSP)
		   (CYCMR2 . LSP)
		   (CYCFRM . LSP)
		   (CYCXGP . LSP))
	    CRELAPFNS
	    CRECYCFNS)
VALUE)

(SETQ LOADING NIL)

(DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))

(DSKIN (FORSM . LSP)
       (DUMMY . LSP)
       (INIT . LSP)
       (FORLSP . LSP)
       (MORE . LSP)
       (CYCPRE . LSP)
       (CYCOMA . LSP)
       (CYCOMB . LSP)
       (CYCOMD . LSP)
       (CYCOME . LSP)
       (CYCOMF . LSP)
       (CYCOMG . LSP)
       (CYCOMH . LSP)
       (CYCDRA . LSP)
       (CYCDRB . LSP)
       (CYCDRC . LSP)
       (CYCDRD . LSP)
       (CYCDRE . LSP)
       (CYCDRF . LSP)
       (CYCDRG . LSP)
       (CYCDRH . LSP)
       (CYCDRI . LSP)
       (CYCDRJ . LSP)
       (CYCMR1 . LSP)
       (CYCCAT . LSP)
       (CYCMR2 . LSP)
       (CYCFRM . LSP)
       (CYCXGP . LSP))

(DEFPROP CRELAPFNS
 (CRELAPFNS (DSKIN (INIT . LSP) (FORLSP . LSP) (CYCPRE . LSP) (DUMMY . LSP))
	    (COMPL (INIT . LSP)
		   (FORLSP . LSP)
		   (DUMMY . LSP)
		   (CYCOMA . LSP)
		   (CYCOMB . LSP)
		   (CYCOMD . LSP)
		   (CYCOME . LSP)
		   (CYCOMF . LSP)
		   (CYCOMG . LSP)
		   (CYCOMH . LSP)
		   (CYCDRA . LSP)
		   (CYCDRB . LSP)
		   (CYCDRC . LSP)
		   (CYCDRD . LSP)
		   (CYCDRE . LSP)
		   (CYCDRF . LSP)
		   (CYCDRG . LSP)
		   (CYCDRH . LSP)
		   (CYCDRI . LSP)
		   (CYCDRJ . LSP)
		   (CYCCAT . LSP)
		   (CYCXGP . LSP)))
VALUE)

(DEFPROP CRECYCFNS
 (CRECYCFNS (SETQ LOADING T)
	    (DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))
	    (DSKIN (FORSM . LSP)
		   (DUMMY . LAP)
		   (INIT . LAP)
		   (FORLSP . LAP)
		   (CYCPRE . LSP)
		   (CYCOMA . LAP)
		   (CYCOMB . LAP)
		   (CYCOMD . LAP)
		   (CYCOME . LAP)
		   (CYCOMF . LAP)
		   (CYCOMG . LAP)
		   (CYCOMH . LAP)
		   (CYCDRA . LAP)
		   (CYCDRB . LAP)
		   (CYCDRC . LAP)
		   (CYCDRD . LAP)
		   (CYCDRE . LAP)
		   (CYCDRF . LAP)
		   (CYCDRG . LAP)
		   (CYCDRH . LAP)
		   (CYCDRI . LAP)
		   (CYCDRJ . LAP)
		   (CYCMR1 . LSP)
		   (CYCCAT . LAP)
		   (CYCMR2 . LSP)
		   (CYCFRM . LSP)
		   (CYCXGP . LAP)))
VALUE)