Create fir1p.c