How to improve these two function to take less time on giving result?

Question

I want to calculate all roots of polynomial (assume that all roots are real). I wrote two functions laguerre.m which uses Laguerre\'s method to calculate a root