/[PAMELA software]/root2paw/src/claclev1.for
ViewVC logotype

Annotation of /root2paw/src/claclev1.for

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (hide annotations) (download)
Mon Dec 5 16:17:39 2005 UTC (19 years ago) by mocchiut
Branch point for: GroundDataConvert, MAIN
Initial revision

1 mocchiut 1.1 C------------------------------------------------
2     INTEGER FUNCTION CLACLEV1()
3     C------------------------------------------------
4     C
5     INCLUDE 'ACINT.TXT'
6     C
7     INTEGER icycle
8     c
9     CLACLEV1 = 0
10     CALL HROUT(0,icycle,' ')
11     CALL HREND('Event')
12     CLOSE (59)
13     CC
14     RETURN
15     END

  ViewVC Help
Powered by ViewVC 1.1.23