**********************************************************************
* Name:		->PRG
* Stack:	( Meta --> seco )
* Desc:		Convert meta object to program
**********************************************************************
ASSEMBLE
	CON(1)	8
RPL
xNAME \8DPRG
::
  CKN
  ::N
;

**********************************************************************