fonction hexagone(cote) {
	pour var j allant de 1 à 6 {
		av(cote);
		tddeg(60);
	}
}
fonction carapace(l,nbIter){
	hexagone(l);
	si (nbIter>0) {
		av(l/3);
		pour var i allant de 1 à 6 {
			carapace(l/3, nbIter-1);
			av(2*l/3);
			tddeg(60);
			av(l/3);
		}
		re(l/3);
	}
}

carapace(2,3);