beer4.c corrected to original