add pascal array function