Parametric Trumpet Mouthpiece

This is an predecessor to Mouthpiece 2.1:
http://www.thingiverse.com/thing:44422

After I successfully printed the working Trumpet mouthpiece yesterday, I learned OpenScad and made a parametrized version.