Parent Directory | Revision Log
Main features of this release are: - updated classes documentations; - major changes on the calibration fortran routine for the calorimeter - update on the TMTC thermistors - removed old classes as CalibTrkBoth and CalibTrd
1 | kusanagi | 1.1 | C------------------------------------------------ |
2 | SUBROUTINE AZERO(vetto,lung) | ||
3 | C------------------------------------------------ | ||
4 | |||
5 | IMPLICIT NONE | ||
6 | C | ||
7 | integer lung, i | ||
8 | INTEGER vetto(lung) | ||
9 | |||
10 | do i = 1, lung | ||
11 | vetto(i) = 0 | ||
12 | enddo | ||
13 | |||
14 | return | ||
15 | end |
ViewVC Help | |
Powered by ViewVC 1.1.23 |