Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
        $rmsd = sqrt ($sum1);
        print"$rmsd\n";
}

Select or download this

Use of uninitialized value $xC1 in subtraction (-) at getrmsd2.pl line
+ 80.
Use of uninitialized value $yC1 in subtraction (-) at getrmsd2.pl line
+ 80.
...
Use of uninitialized value $zC13 in subtraction (-) at getrmsd2.pl lin
+e 82.
70.8509364158301
1.68309110468408