added variable calc_comp_velo, which is used to determined when compaction velocity should (or should not) be calculated