00001 fvVectorMatrix UEqn 00002 ( 00003 fvm::ddt(rho, U) 00004 + fvm::div(phi, U) 00005 + turbulence->divDevRhoReff(U) 00006 == 00007 rho.dimensionedInternalField()*g 00008 + coalParcels.SU() 00009 + limestoneParcels.SU() 00010 ); 00011 00012 UEqn.relax(); 00013 00014 if (momentumPredictor) 00015 { 00016 solve(UEqn == -fvc::grad(p)); 00017 }