mixSurf = pCellMix_select/10
IF ( mixSurf.GE.1 ) THEN
IF ( mixSurf.EQ.2 ) THEN
ELSEIF ( mixSurf.EQ.3 ) THEN
ELSEIF ( mixSurf.EQ.4 ) THEN
INTEGER km, mixSurf, mixBott