


ERFN - ???
Usage:
res=erfn(z)

0001 function res=erfn(z) 0002 %ERFN - ??? 0003 % 0004 % Usage: 0005 % res=erfn(z) 0006 0007 for n=1:length(z), 0008 res(n)=quad('exn',0,z(n)); 0009 end 0010 0011 0012 0013 0014 0015 0016 0017 0018 0019 0020 0021 0022 0023 0024 0025 0026 0027