(FILECREATED "16-Sep-87 14:05:30" {QV}<NOTECARDS>1.3KNEXT>RGPATCH058.;1
 835    

      changes to:  (VARS RGPATCH058COMS)
		   (FNS NCP.DeleteCardType))


(* Copyright (c) 1987 by Xerox Corporation. All rights reserved.)

(PRETTYCOMPRINT RGPATCH058COMS)

(RPAQQ RGPATCH058COMS
 ((* * rg 9/16/87 new function needed by IDE - simply calls existing internal 
			    funciton)
			 (* * new for NCPROGINT)
			 (FNS NCP.DeleteCardType)))
(* * rg 9/16/87 new function needed by IDE - simply calls existing internal funciton)


(* * new for NCPROGINT)


(DEFINEQ

(NCP.DeleteCardType

  [LAMBDA (TypeName DeleteSubTypesFlg)                       (* Randy.Gobbel "15-Sep-87 18:50")

    (
NC.DeleteCardType
 TypeName DeleteSubTypesFlg])
)
(PUTPROPS RGPATCH058 COPYRIGHT ("Xerox Corporation" 1987))
(DECLARE: DONTCOPY
  (FILEMAP (NIL (563 754 (NCP.DeleteCardType 573 . 752)))))
STOP