Salome HOME
Homard executable
[modules/homard.git] / src / tool / Utilitaire / utjomo.h
1 c
2       character*9 nomjou(nblang,7)
3       character*9 nommoi(nblang,12)
4 c
5       integer lgnomj(nblang,7)
6       integer lgnomm(nblang,12)
7 c
8       nomjou(1,1) = 'lundi    '
9       lgnomj(1,1) = 5
10       nomjou(1,2) = 'mardi    '
11       lgnomj(1,2) = 5
12       nomjou(1,3) = 'mercredi '
13       lgnomj(1,3) = 8
14       nomjou(1,4) = 'jeudi    '
15       lgnomj(1,4) = 5
16       nomjou(1,5) = 'vendredi '
17       lgnomj(1,5) = 8
18       nomjou(1,6) = 'samedi   '
19       lgnomj(1,6) = 6
20       nomjou(1,7) = 'dimanche '
21       lgnomj(1,7) = 8
22 c
23       nomjou(2,1) = 'monday   '
24       lgnomj(2,1) = 6
25       nomjou(2,2) = 'tuesday  '
26       lgnomj(2,2) = 7
27       nomjou(2,3) = 'wednesday'
28       lgnomj(2,3) = 9
29       nomjou(2,4) = 'thursday '
30       lgnomj(2,4) = 8
31       nomjou(2,5) = 'friday   '
32       lgnomj(2,5) = 6
33       nomjou(2,6) = 'saturday '
34       lgnomj(2,6) = 8
35       nomjou(2,7) = 'sunday   '
36       lgnomj(2,7) = 6
37 c
38       nommoi(1,1)  = 'janvier  '
39       lgnomm(1,1)  = 7
40       nommoi(1,2)  = 'fevrier  '
41       lgnomm(1,2)  = 7
42       nommoi(1,3)  = 'mars     '
43       lgnomm(1,3)  = 4
44       nommoi(1,4)  = 'avril    '
45       lgnomm(1,4)  = 5
46       nommoi(1,5)  = 'mai      '
47       lgnomm(1,5)  = 3
48       nommoi(1,6)  = 'juin     '
49       lgnomm(1,6)  = 4
50       nommoi(1,7)  = 'juillet  '
51       lgnomm(1,7)  = 7
52       nommoi(1,8)  = 'aout     '
53       lgnomm(1,8)  = 4
54       nommoi(1,9)  = 'septembre'
55       lgnomm(1,9)  = 9
56       nommoi(1,10) = 'octobre  '
57       lgnomm(1,10) = 7
58       nommoi(1,11) = 'novembre '
59       lgnomm(1,11) = 8
60       nommoi(1,12) = 'decembre '
61       lgnomm(1,12) = 8
62 c
63       nommoi(2,1)  = 'january  '
64       lgnomm(2,1)  = 7
65       nommoi(2,2)  = 'february '
66       lgnomm(2,2)  = 8
67       nommoi(2,3)  = 'march    '
68       lgnomm(2,3)  = 5
69       nommoi(2,4)  = 'april    '
70       lgnomm(2,4)  = 5
71       nommoi(2,5)  = 'may      '
72       lgnomm(2,5)  = 3
73       nommoi(2,6)  = 'june     '
74       lgnomm(2,6)  = 4
75       nommoi(2,7)  = 'july     '
76       lgnomm(2,7)  = 4
77       nommoi(2,8)  = 'august   '
78       lgnomm(2,8)  = 6
79       nommoi(2,9)  = 'september'
80       lgnomm(2,9)  = 9
81       nommoi(2,10) = 'october  '
82       lgnomm(2,10) = 7
83       nommoi(2,11) = 'november '
84       lgnomm(2,11) = 8
85       nommoi(2,12) = 'december '
86       lgnomm(2,12) = 8
87 c