<function>
<fname property="Normal Order / LEVEL: 0">
Define
</fname>
<prototype>
LISP`

(1) (Define symbol exp)
(2) ([Define Order="Normal"] 
	symbol1
	(Argmnets symbol2 ....) 
	exp)
(3) ([Define Order="Applicative"] 
	symbol1 
	env-exp 
	(Argmnets symbol2 ....) 
	exp)
(4) ([Define Order="Normal"] 
	symbol1 symbol2 exp)
(4) ([Define Order="Applicative"] 
	symbol1 env-exp symbol2 exp)

XML`

(1)
<Define> ^symbol1 exp </Define>

(2)
<Define Order="Normal">
	^symbol1
	<Argmnets>
		^symbol2
		....
	</Argments>
	exp
</Define>
(3)
<Define Order="Applicative">
	^symbol1
	env-exp
	<Argmnets>
		^symbol2
		....
	</Argments>
	exp
</Define>
(4)
<Define Order="Normal"> 
^symbol1
	^symbol2
	exp
</Define>
(5)
<Define Order="Applicative"> 
^symbol1
	^symbol2
	env-exp
	exp
</Define>
</prototype>
<prototype>
C֐錾

XLtype *
cDefine(XLenv * e,char * symbol,XLtype * exp);
</prototype>
<explanation>
(1) ̓JgɂāAsymbol1ƁAexp̕]ʂΉBA symbol̃Ggłɂꍇ́A̒lB 

(2)(3)  (Define symbol1 (Lambda (Argments ....) exp) ̗L`B 

(4)(5)  (Define symbol1(Lambda symbol exp) ̗L`B 
</explanation>
</function>
