Create fpica.m