function DrawFlower(r,n,backPetalColor,frontPetalColor, diskColor) % In the current figure window this function draws a unit radius flower % with n petals fiwhere n is an even integer >= 4. % The inner radius is specied by r and 0