Update p1.m