# A command that returns a random list of mentities from a model
class CmdRandomEntities
	super CmdModelEntities

	# Always return `CmdSuccess`
	redef fun init_results do
		if results != null then return new CmdSuccess
		var res = super
		if not res isa CmdSuccess then return res
		randomize
		return res
	end

	# Randomize mentities order
	fun randomize do
		var results = self.results
		if results == null then return
		results.shuffle
	end
end