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

Annotation of /root2paw/src/cltrklev1.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     FUNCTION CLTRKLEV1()
3     C------------------------------------------------
4     C Written by Emiliano Mocchiutti
5     C v. 0.2
6     C
7     INCLUDE 'COMMON.TXT'
8     INTEGER cltrklev1
9     c
10     c
11     cltrklev1 = 0
12     call HCDIR('//LEVEL1',' ')
13     call HREND('level1')
14     CLOSE (79)
15     CC
16     52 continue
17     RETURN
18     END
19    
20    

  ViewVC Help
Powered by ViewVC 1.1.23