1 |
C |
C |
2 |
C Written by Mirko Boezio and Emiliano Mocchiutti |
C Written by Mirko Boezio and Emiliano Mocchiutti |
3 |
C |
C |
4 |
C * Version: 3.1.0 * |
C * Version: 3.1.1 * |
5 |
|
C |
6 |
|
C 3.1.0 - 3.1.1: (2004-12-21) changed common varie. |
7 |
C |
C |
8 |
C 3.0.01 - 3.1.0: (2004-12-10) cleanup of the code and changes in the |
C 3.0.01 - 3.1.0: (2004-12-10) cleanup of the code and changes in the |
9 |
C sections order. |
C sections order. |
36 |
C |
C |
37 |
integer me, lleng |
integer me, lleng |
38 |
INTEGER i, j |
INTEGER i, j |
39 |
INTEGER ERROR(4) |
INTEGER ERROR(4), merror(4) |
40 |
INTEGER ic, k, ke, ic0, l |
INTEGER ic, k, ke, ic0, l |
41 |
INTEGER contr, m |
INTEGER contr, m |
42 |
INTEGER inf, sup,iev |
INTEGER inf, sup,iev |
60 |
|
|
61 |
save / calib / |
save / calib / |
62 |
c |
c |
63 |
COMMON /VARIE/ dump, contr |
COMMON /VARIE/ dump, contr, merror |
64 |
SAVE /VARIE/ |
SAVE /VARIE/ |
65 |
|
|
66 |
C |
C |