Update chapter4.erl