#479
#$478
TEXT(1DX Coal-Particle Combustion      
TITLE
    GROUP 3. X-direction grid specification
NX=20; GRDPWR(X,NX,LENGTH,1.0)
ONEPHS=F
#SOLVEL
NAME(3)=GVEL; NAME(4)=CVEL
#$477
 
PATCH(INLETS,WEST,1,1,1,1,1,1,1,1)
PATCH(INLETG,WEST,1,1,1,1,1,1,1,1)
 
PATCH(OUTLET,CELL,NX,NX,1,1,1,1,1,1)
 
#$476
relax(p1,linrlx,0.5)
isg21=1000 ! enforce at least 1000 iterations