agraph TypeOfGraph=LinearLogaritmic; setViewport(750,750,70); setGraphArea(4,0,0,1); setGridandTicks(1,0.1,1,0.1); setLabelsandTitle(BottomLeft,"Settling velocity/Flow velocity","Settling efficiency","Total settling efficiency for individual grains"); initPicture(); drawGraphArea(); labda=lambda.value; setPen("2","green"); plot("TSE(5.0,x,labda)",4,0); plot("TSE(4.0,x,labda)",4,0); plot("TSE(3.0,x,labda)",4,0); text([3.8,0.915],"`v_s/v_o=2.5`","middlemiddle","vsvo25"); plot("TSE(2.5,x,labda)",4,0); setPen("2","blue"); text([3.50,0.865],"`v_s/v_o=2.0`","middlemiddle","vsvo20"); plot("TSE(2.0,x,labda)",4,0); text([3.0,0.84],"`v_s/v_o=1.75`","middlemiddle","vsvo175"); plot("TSE(1.75,x,labda)",4,0); text([2.35,0.825],"`v_s/v_o=1.5`","middlemiddle","vsvo15"); plot("TSE(1.5,x,labda)",4,0); text([1.75,0.845],"`v_s/v_o=1.25`","middlemiddle","vsvo125"); plot("TSE(1.25,x,labda)",4,0); setPen("3","red"); text([0.02,1.0],"`v_s/v_o=1.0`","middleright","vsvo10"); plot("TSE(1.0,x,labda)",4,0); setPen("2","black"); text([0.02,0.9],"`v_s/v_o=0.9`","middleright","vsvo09"); plot("TSE(0.9,x,labda)",4,0); text([0.02,0.8],"`v_s/v_o=0.8`","middleright","vsvo08"); plot("TSE(0.8,x,labda)",4,0); text([0.02,0.7],"`v_s/v_o=0.7`","middleright","vsvo07"); plot("TSE(0.7,x,labda)",4,0); text([0.02,0.6],"`v_s/v_o=0.6`","middleright","vsvo06"); plot("TSE(0.6,x,labda)",4,0); text([0.02,0.5],"`v_s/v_o=0.5`","middleright","vsvo05"); plot("TSE(0.5,x,labda)",4,0); text([0.02,0.4],"`v_s/v_o=0.4`","middleright","vsvo04"); plot("TSE(0.4,x,labda)",4,0); text([0.02,0.3],"`v_s/v_o=0.3`","middleright","vsvo03"); plot("TSE(0.3,x,labda)",4,0); text([0.02,0.2],"`v_s/v_o=0.2`","middleright","vsvo02"); plot("TSE(0.2,x,labda)",4,0); text([0.02,0.1],"`v_s/v_o=0.1`","middleright","vsvo01"); plot("TSE(0.1,x,labda)",4,0); axesBorder("2","black"); viewportBorder("3","black"); endagraphPointer coordinates: (x,y) Click coordinates: (x,y) 


`v_s=8.925*((sqrt(1+95*R_d*d^3)1)/(1000*d))` settling velocity in m/sec according to Budryck with d in mm
`v_o=(Q/(L*W))` Hopper Load Parameter in m/sec
`s_o=((Q*100)/(W*H*p))` flow velocity in m/sec
`eta_g=(v_s/v_o)` grain efficiency
Turbulent settling efficiency equations:
if: `v_s/v_o<=1`
`eta_t=eta_g^0*(1.184*eta_g^(+.885.20*eta_g)*(1tanh(eta_g^(.13.80*eta_g)*(log(v_s/s_o).2614.5*log(lambda)+eta_g^(.33.94*eta_g)))))`
if: `v_s/v_o>1`
`eta_t=eta_g^(1)*(1.184*eta_g^(.69.38*eta_g)*(1tanh(eta_g^(+.77.08*eta_g)*(log(v_s/s_o).2614.5*log(lambda)+eta_g^(+1.01.18*eta_g)))))`
Settling velocity equations:
Stokes: `Stokes` in mm/sec
Budryck: `Budryck` in mm/sec
Rittinger: `Rittinger` in mm/sec
Friction coefficient equations (see the Moody Diagram Calculator):
Hydraulic diameter `Dhr` for river flow or TSHD flow,
or `Dhp` for pipe flow
Relative roughness `epsilon=d/D_h`
Reynolds: `Reynolds` for calculating `lambda`
Swamee Jain: `SwameeJain` for calculating the friction coefficient `lambda`
The original
ASCIIMathML and
ASCIIsvg
scripts have been developed by by
Peter Jipsen,
Chapman University (jipsen@chapman.edu) LaTeXMathML has been developed by Douglas Woodall (and extended by Jeff Knisley), based on ASCIIMathML Image fallback scripts have been developed by David Lippman based on MimeTex and MathTex of John Forkosh. The version of ASCIIMathML used on this website, is a modified and extended version based on version 2.1 of Peter Jipsen, the new SVG library has been developed by Dr.ir. S.A. Miedema Other sources: An ASCIIsvg manual by Robert Fant. An ASCIIsvg manual by Peter Jipsen. An ASCIIMathML manual by James Gray.
Plugins and fonts required (depending on your browser):
MIT MathML
font packages,
MathPlayer,
Adobe SVGviewer Department of Marine & Transport Technology, The Chair of Dredging Engineering 