/[PAMELA software]/calo/flight/MyDetector2Level2/src/mydeccom.for
ViewVC logotype

Contents of /calo/flight/MyDetector2Level2/src/mydeccom.for

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (show annotations) (download) (vendor branch)
Tue Apr 18 13:12:40 2006 UTC (18 years, 7 months ago) by mocchiut
Branch: MAIN, v0r00
CVS Tags: start, HEAD
Changes since 1.1: +0 -0 lines
Error occurred while calculating annotation data.
Imported sources

1 *****************************************************************************
2 INTEGER FUNCTION MYDECCOM()
3 c
4 IMPLICIT NONE
5 C
6 INCLUDE 'COMMON.TXT'
7 C
8 C Begin !
9 C
10 MYDECCOM = 0
11 C
12 C CALCULATE COMMON VARIABLES
13 C
14 MYVAR1 = 1
15 MYVAR2 = 2
16 MYVAR3 = 3.
17
18 RETURN
19 END
20
21

  ViewVC Help
Powered by ViewVC 1.1.23