#479
#$478
TEXT(1DZ Coal-Particle Combustion      
TITLE
NZ=20; GRDPWR(Z,NZ,LENGTH,1.)
ONEPHS=F
#SOLVEL
NAME(7)=GVEL; NAME(8)=CVEL
#$477
 
PATCH(INLETS,LOW,1,1,1,1,1,1,1,1); PATCH(INLETG,LOW,1,1,1,1,1,1,1,1)
PATCH(OUTLET,CELL,1,1,1,1,NZ,NZ,1,1)
#$476
LSWEEP=500
  Undo relaxation from 476 so that CONWIZ can work properly
RELAX(H1,FALSDT,1E9); RELAX(H2,FALSDT,1E9);RELAX(MIXF,FALSDT,1E9)
VARMIN(P1)=-PRESS0+10
CONWIZ=T
LIBREF=482