sub r_outer { ($R_center * sin( $pi / $n)) / (1 - sin $pi / $n) }