perm filename CREDEN[NIH,LMM] blob sn#038913 filedate 1973-05-19 generic text, type T, neo UTF8

(DEFPROP CREDENFNS
 (CREDENFNS (SETQ LOADING T)
	    (DE DECIMAL NIL (SETQ BASE (SETQ IBASE (PLUS 5. 5.))))
	    (DSKIN (FORSM . LSP)
		   (DUMMY . LAP)
		   (INIT . LAP)
		   (MORE . LAP)
		   (FORLSP . LAP)
		   (CYCPRE . LSP)
		   (CYCOMA . LAP)
		   (CYCOMB . LAP)
		   (CYCOMD . LAP)
		   (CYCOME . LAP)
		   (CYCOMF . LAP)
		   (CYCOMG . LAP)
		   (CYCOMH . LAP)
		   (CYCMR1 . LSP)
		   (CYCCAT . LAP)
		   (CYCMR2 . LSP)
		   (CYCFRM . LSP)
		   (FOROUT . LSP)))
VALUE)

(SETQ LOADING T)

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

(DSKIN (FORSM . LSP)
       (DUMMY . LAP)
       (INIT . LAP)
       (MORE . LAP)
       (FORLSP . LAP)
       (CYCPRE . LSP)
       (CYCOMA . LAP)
       (CYCOMB . LAP)
       (CYCOMD . LAP)
       (CYCOME . LAP)
       (CYCOMF . LAP)
       (CYCOMG . LAP)
       (CYCOMH . LAP)
       (CYCMR1 . LSP)
       (CYCCAT . LAP)
       (CYCMR2 . LSP)
       (CYCFRM . LSP)
       (FOROUT . LSP))