Analytical and Numerical Solutions of Vapor Flow in a Flat Plate Heat Pipe