A computer model for the gel effect in free-radical polymerization