Rewrite function CountParameter
Rewrite function CircularSample, Cissq and Cissa