types in types

here is the fourth way. this is kind of stupid usually...hmm..I havent tried it actually

Type forest1tree
	Field tree.tree
End Type

Type forest2tree
	Field tree.tree
End Type

Type tree
	Field name$
End Type


Local f.forest1tree
Local f2.forest2tree

For a=1 To 5
	f.forest1tree=New forest1tree
	f\tree=New tree
	f\tree\name="green"+a
Next


For a=1 To 5
	f2=New forest2tree
	f2\tree=New tree
	f2\tree\name="brown"+a
Next




For f2=Each forest2tree
	Print f2\tree\name
Next

now someone give the \arrays[] example