/[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.1.1 - (hide annotations) (download) (vendor branch)
Mon Dec 5 16:17:39 2005 UTC (19 years ago) by mocchiut
Branch: GroundDataConvert, MAIN
CVS Tags: start, v3r00, v4r00, HEAD
Changes since 1.1: +0 -0 lines
Imported sources

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