Computing the Newton polytope of the discriminant from the fiber polytope. Algebraic analysis. Proceedings of a Symposium held at the Research Institute for Mathematical Sciences, Kyoto University, Kyoto, October 17- 20, 1983 