--- DarthVader/TrackerLevel2/src/F77/filladc.f 2006/10/16 12:36:52 1.6 +++ DarthVader/TrackerLevel2/src/F77/filladc.f 2007/03/15 12:17:10 1.7 @@ -55,6 +55,7 @@ $ .false.) then C++++++++++++++++++++++++++++++++++++++++++++++++++++++ C--------------------------------------compressed mode + if(debug)print*,'DSP #',DSPn,' --> compressed ' is = 0 il = 0 prec_ind = 0 @@ -251,6 +252,7 @@ C++++++++++++++++++++++++++++++++++++++++++++++++++++++ C--------------------------------------------full mode + if(debug)print*,'DSP #',DSPn,' --> full ' do i=1,3 !loop over ladder do j=1,1024 !loop over strips