burg - burg decon
call burg(lx,x,la,a)
input length
real(lx)
input
output length
real(la)
output
Burg routione adopted from FGDP page 137
wilson
sepfilterf90