Computing the Newton polytope of the discriminant from the fiber polytope. The curves seminar at Queen's. Volume XIII. Proceedings of the seminar held at Queen's University, Kingston, Ontario, Canada, 2000 