(cond
	[(null? s) '()]
	[(null? (rest s)) '()]
	[(null? (rest (rest s))) '()]
	[else (cons (first s) 
	      (cons (first (rest s))
	      (cons (first (rest (rest s))) '() )))])