|
|
|
|
|
|
|
|
|
Flow of Non-Newtonian Fluids
|
|
|
|
|
|
Department: | Chemical Engineering |
|
|
|
|
|
|
2004-05-10
|
|
|
|
|
|
In the first notebook Bingham_Fluid.nb, the velocity profiles of a vertical laminar flow of Bingham and Newtonian liquid films are computed and compared. With the Bingham fluid, we find the typical flat velocity profile near the liquid surface where the shear stress is small. In the second notebook Power_Law_Fluid.nb, the velocity profile in horizontal pipe and annulus are computed for dilatant, pseudoplastic and Newtonian fluids. These sample problems are an excellent opportunity to introduce undergraduate students to Non-Newtonian fluids as well as split boundary problems. The resolution is based on the Shooting Method developed in Mathematica by Professor Brian Higgins (Chemical Engineering Department, University of California, Davis). The notebook VolumetricFlowRate.nb finds expressions for the volumetric flow rate in a horizontal pipe of Bingham and Power Law Non-Newtonian fluids. The notebook Model.nb make use of the Mathematica FindMinimum function to compute model parameters of Bingham and Power Law Non-Newtonian fluids using experimental values of flow rates obtained for different pressure gradients in a horizontal tube. The experimental data is taken from problem 15 Chapter 11 page 553 of Fluid Mechanics for Chemical Engineers by Professor J. O. Wilkes (Prentice Hall, 1999).
The notebooks were updated by the author 10 May 2004
|
|
|
|
|
|
|
|
|
|
|
|
Power Law Fluids, Non-Newtonian Fluids, Dilatant Fluids, Pseudoplastic Fluids, Bingham Fluids, Shooting Method, Split Boundary Conditions, Vertical Flow of Liquid Films, Horizontal Flow in Pipe and Annulus
|
|
|
|
|
|
| Bingham_Fluid5.nb (98.4 KB) - Mathematica Notebook [for Mathematica 5.0] | | Model5.nb (25.1 KB) - Mathematica Notebook [for Mathematica 5.0] | | Non_Newtonian5.nb (204.5 KB) - Mathematica Notebook [for Mathematica 5.0] | | PowerLawFluid5.nb (210.6 KB) - Mathematica Notebook [for Mathematica 5.0] | | VolumetricFlowRate.nb (65.8 KB) - Mathematica Notebook [for Mathematica 5.0] |
|
|
|
|
|
|
|
| | | | | |
|