pascal function

MATLAB pascal function