Smith Form Of A matrix

This M file,calculate the smith form of a matix.

This M-file uses these common variables(A,B,C,I,t)
Before running the M-file you should first place the matrix that you want to calculate it's smith-form in a variable named A then run the M-file and it calculates it's smith-form and puts it in B.
It takes 12 secs to calculate smith-form of a typical 10*10 matrix.
At last it gives you the response(Smith-Form) saved in variable B.
Your matrix will be saved in variable A.
I is the unit matrix.

This M-file may have some problems yet(It may not be able to calculate some forms)but if I see that it is valuable to users I will fix these special cases in future releases.Send me your ratings that how useful is this product to you so that I decide whether it worths more attention or not.
thank you