# locations
	_locations          => [ ['????']  ,   'read.write.noinit.array'   ],         
	_refseqposition     => [ { }       ,   'read.write.noinit.hash'    ],         
		
		# licrinfo
	_licr_info          => [ ['????']  ,   'read.write.noinit.array'   ],         
		 

##</code><code>##

# Added Type handler
	sub _check_type {
		my ($self,$attribute,$type) = @_;
		$_attribute_properties{$attribute}[1] =~ /$type/;
	}