Code clean-up in lib function.
Task #7807 (https://gna.org/task/index.php?7807): Speed-up of dispersion models for Clustered analysis.
Authored by: tlinnet 2014-06-10
Parent: [r23802]
Child: [r23804]
