Parent Directory | Revision Log | Patch
revision 1.5 by mocchiut, Tue Aug 4 14:01:32 2009 UTC | revision 1.7 by mocchiut, Tue Aug 11 12:58:23 2009 UTC | |
---|---|---|
# | Line 6 C--------------------------------------- | Line 6 C--------------------------------------- |
6 | ||
7 | c----- HBOOK | c----- HBOOK |
8 | INTEGER HMEM | INTEGER HMEM |
9 | REAL RDTOFCAL | c REAL RDTOFCAL |
10 | parameter (NWPAWC=8500000) | parameter (NWPAWC=8500000) |
11 | common/PAWC/HMEM(NWPAWC) | common/PAWC/HMEM(NWPAWC) |
12 | ||
# | Line 129 c call HPRNTU(ntp_tofcalib) | Line 129 c call HPRNTU(ntp_tofcalib) |
129 | close(0) | close(0) |
130 | ||
131 | return | return |
132 | end | end |
133 |
|
ViewVC Help | |
Powered by ViewVC 1.1.23 |