global proc makeShell(float $rot) {
	circle -n "shellHull";
	instance -smartTransform;
	move 0 0 ($rot/33);
	rotate $rot 0 0;
	scale (0.9) (0.9) (0.9);
	for ($i=1; $i<100; $i++ ){instance -smartTransform;}
	select -r shellHull;
	for ($i=1; $i<100; $i++ ){select -add ("shellHull" + $i);}
	loft -n "shell";
	select -r shellHull.cv[0:7] ;
}

// Nautilus type shell
makeShell(33);