39 double scalef_phase2[
ntrgline] = {1, 1, 20, 1, 1, 1, 1, 1, 1, 1, 1, 10, 10, 1, 1, 1, 1, 1};
41 double scalef_phase3[
ntrgline] = {1, 1, 20, 2, 1, 1, 1, 1, 2, 1, 1, 20, 20, 1, 5, 1, 3, 5};
48 double ran = gRandom->Uniform(f);
49 if (ceil(ran) == f) Val = 1;