Update p18.erl