--- DarthVader/TrackerLevel2/src/F77/filladc.f 2007/05/24 16:45:48 1.8 +++ DarthVader/TrackerLevel2/src/F77/filladc.f 2007/08/07 13:56:29 1.9 @@ -363,11 +363,11 @@ if(flag.ne.0.and.flag.ne.1) then c print*,'compdecode --> error on uncompression: flag=',flag - errflag=1. + errflag=1. endif if(flag.eq.0) then ! valore ADC - tipo=0 - info=iand(word,z'0fff') + tipo=0 + info=iand(word,z'0fff') endif if(flag.eq.1) then ! indirizzo OR fine vista info=iand(word,z'03ff')