summaryrefslogtreecommitdiffstats
path: root/scilab/modules/sparse
diff options
context:
space:
mode:
authorAllan CORNET <allan.cornet@scilab.org>2010-01-22 10:25:31 +0100
committerAllan CORNET <allan.cornet@scilab.org>2010-01-22 10:25:31 +0100
commit15711cf58d78c0432ff22551252cc6c15a20cc6a (patch)
tree5bc9007d36f0406b4b4ad7b2ba5912d2c5252234 /scilab/modules/sparse
parent739313cd70cad2e3e85cc44a4149638854a64f21 (diff)
parentbab7806d1e9c5a72faa9a48514e26e90d897ed50 (diff)
downloadscilab-15711cf58d78c0432ff22551252cc6c15a20cc6a.zip
scilab-15711cf58d78c0432ff22551252cc6c15a20cc6a.tar.gz
Merge remote branch 'refs/remotes/origin/5.2'
Diffstat (limited to 'scilab/modules/sparse')
-rw-r--r--scilab/modules/sparse/locales/uk_UA/sparse.po338
-rw-r--r--scilab/modules/sparse/src/fortran/spextr.f10
-rw-r--r--scilab/modules/sparse/src/fortran/spextr1.f4
3 files changed, 345 insertions, 7 deletions
diff --git a/scilab/modules/sparse/locales/uk_UA/sparse.po b/scilab/modules/sparse/locales/uk_UA/sparse.po
new file mode 100644
index 0000000..a1beed1
--- /dev/null
+++ b/scilab/modules/sparse/locales/uk_UA/sparse.po
@@ -0,0 +1,338 @@
1# Ukrainian translation for scilab
2# Copyright (c) 2010 Rosetta Contributors and Canonical Ltd 2010
3# This file is distributed under the same license as the scilab package.
4#
5# FIRST AUTHOR <EMAIL@ADDRESS>, 2010.
6# Yuri Chornoivan <yurchor@gmail.com>, 2010.
7msgid ""
8msgstr ""
9"Project-Id-Version: scilab\n"
10"Report-Msgid-Bugs-To: FULL NAME <EMAIL@ADDRESS>\n"
11"POT-Creation-Date: 2007-11-26 18:05+0100\n"
12"PO-Revision-Date: 2010-01-14 19:10+0000\n"
13"Last-Translator: yurchor <yurchor@gmail.com>\n"
14"Language-Team: Ukrainian <translation@linux.org.ua>\n"
15"MIME-Version: 1.0\n"
16"Content-Type: text/plain; charset=UTF-8\n"
17"Content-Transfer-Encoding: 8bit\n"
18"X-Launchpad-Export-Date: 2010-01-21 15:53+0000\n"
19"X-Generator: Launchpad (build Unknown)\n"
20
21#, c-format
22msgid ""
23"\n"
24"Density = %2.2lf%%.\n"
25msgstr ""
26"\n"
27"Щільність = %2.2lf%%.\n"
28
29#, c-format
30msgid ""
31"\n"
32"Largest diagonal element = %-1.4lg.\n"
33msgstr ""
34"\n"
35"Найбільший діагональний елемент = %-1.4lg.\n"
36
37#, c-format
38msgid ""
39"\n"
40"Largest element in matrix = %-1.4lg.\n"
41msgstr ""
42"\n"
43"Найбільший елемент у матриці = %-1.4lg.\n"
44
45#, c-format
46msgid ""
47"\n"
48"Largest pivot element = %-1.4lg.\n"
49msgstr ""
50"\n"
51"Найбільший опорний елемент = %-1.4lg.\n"
52
53#, c-format
54msgid " Absolute Threshold = %e\n"
55msgstr " Абсолютне порогове значення = %e\n"
56
57#, c-format
58msgid " Average number of elements per row = %lf\n"
59msgstr " Середня кількість елементів на рядок = %lf\n"
60
61#, c-format
62msgid " Average number of fill-ins per row = %lf%%\n"
63msgstr " Середня кількість ненульових коефіцієнтів на рядок = %lf%%\n"
64
65#, c-format
66msgid " Density = %lf%%\n"
67msgstr " Щільність = %lf%%\n"
68
69#, c-format
70msgid " Fill-ins = %d\n"
71msgstr " Ненульових коефіцієнтів = %d\n"
72
73#, c-format
74msgid " Initial average number of elements per row = %lf\n"
75msgstr " Початкова кількість елементів на рядок = %lf\n"
76
77#, c-format
78msgid " Initial number of elements = %d\n"
79msgstr " Початкова кількість елементів = %d\n"
80
81#, c-format
82msgid " Largest Element = %e\n"
83msgstr " Найбільший елемент = %e\n"
84
85#, c-format
86msgid " Relative Threshold = %e\n"
87msgstr " Відносне порогове значення = %e\n"
88
89#, c-format
90msgid ""
91" Smallest Element = %e\n"
92"\n"
93"\n"
94msgstr ""
95" Найменший елемент = %e\n"
96"\n"
97"\n"
98
99#, c-format
100msgid " Total number of elements = %d\n"
101msgstr " Загальна кількість елементів = %d\n"
102
103#, c-format
104msgid " Iteration #%s/%s residual : %s\n"
105msgstr " Ітерація №%s з %s, нев’язка: %s\n"
106
107#, c-format
108msgid " New residual = %s < tol = %s => break\n"
109msgstr " Нова нев’язка = %s < tol = %s => зупинка\n"
110
111#, c-format
112msgid " Type of preconditionning #1 : %d\n"
113msgstr " Тип передобумовленості №1: %d\n"
114
115#, c-format
116msgid " Type of preconditionning #2 : %d\n"
117msgstr " Тип передобумовленості №2: %d\n"
118
119#, c-format
120msgid "%s: A zero was encountered on the diagonal the matrix.\n"
121msgstr "%s: на діагоналі матриці виявлено нульовий елемент.\n"
122
123#, c-format
124msgid "%s: Convergence error.\n"
125msgstr "%s: помилка збіжності.\n"
126
127#, c-format
128msgid "%s: Did not converge.\n"
129msgstr "%s: не збігся.\n"
130
131#, c-format
132msgid "%s: Wrong number of input argument: At least %d expected.\n"
133msgstr ""
134"%s: помилкова кількість вхідних параметрів: слід використовувати не менше за "
135"%d.\n"
136
137#, c-format
138msgid "%s: Wrong number of input arguments: %d to %d expected.\n"
139msgstr ""
140"%s: помилкова кількість вхідних параметрів: слід використовувати від %d до "
141"%d.\n"
142
143#, c-format
144msgid "%s: Wrong number of input arguments: At least %d expected.\n"
145msgstr ""
146"%s: помилкова кількість вхідних параметрів: мало бути не менше за %d.\n"
147
148#, c-format
149msgid ""
150"%s: Wrong size for input argument #%d: Must be same size as input argument "
151"#%d"
152msgstr ""
153"%s: помилкова розмірність вхідного параметра №%d: розмірність має збігатися "
154"з розмірністю вхідного параметра №%d"
155
156#, c-format
157msgid ""
158"%s: Wrong size for input argument #%d: Same size as input argument #%d "
159"expected.\n"
160msgstr ""
161"%s: помилкова розмірність вхідного параметра №%d: розмірність має збігатися "
162"з розмірністю вхідного параметра №%d.\n"
163
164#, c-format
165msgid "%s: Wrong size for input argument #%d: Square matrix expected.\n"
166msgstr ""
167"%s: помилкова розмірність вхідного параметра №%d: слід використовувати "
168"квадратну матрицю.\n"
169
170#, c-format
171msgid "%s: Wrong type for input argument #%d.\n"
172msgstr "%s: помилковий тип вхідного параметра №%d.\n"
173
174#, c-format
175msgid "%s: Wrong type for input argument #%d: Column vector expected.\n"
176msgstr ""
177"%s: помилковий тип вхідного параметра №%d: слід використовувати тип вектора-"
178"стовпчика.\n"
179
180#, c-format
181msgid ""
182"%s: Wrong type for input argument #%d: Same size as input argument #%d "
183"expected.\n"
184msgstr ""
185"%s: помилковий тип вхідного параметра №%d: розмірність має збігатися з "
186"розмірністю вхідного параметра №%d.\n"
187
188#, c-format
189msgid ""
190"%s: Wrong type for input argument #%d: Same size as the input argument #%d "
191"expected.\n"
192msgstr ""
193"%s: помилковий тип вхідного параметра №%d: розмірність має збігатися з "
194"розмірністю вхідного параметра №%d.\n"
195
196#, c-format
197msgid "%s: Wrong type for input argument #%d: Scalar expected.\n"
198msgstr ""
199"%s: помилковий тип вхідного параметра №%d: слід використовувати скалярний "
200"тип.\n"
201
202#, c-format
203msgid "%s: Wrong type for input argument #%d: Square matrix expected.\n"
204msgstr ""
205"%s: помилковий тип вхідного параметра №%d: слід використовувати квадратну "
206"матрицю.\n"
207
208#, c-format
209msgid ""
210"%s: Wrong type for input argument #%d: Transpose of the function %s "
211"expected.\n"
212msgstr ""
213"%s: помилковий тип вхідного параметра №%d: мала бути функція, транспонована "
214"щодо %s.\n"
215
216#, c-format
217msgid "%s: Wrong value for input argument #%d: Column vector expected.\n"
218msgstr ""
219"%s: помилкове значення вхідного параметра №%d: слід використовувати тип "
220"вектора-стовпчика.\n"
221
222#, c-format
223msgid ""
224"%s: Wrong value for input argument #%d: Transpose of the function %s "
225"expected.\n"
226msgstr ""
227"%s: помилкове значення тип вхідного параметра №%d: мала бути функція, "
228"транспонована щодо %s.\n"
229
230#, c-format
231msgid "%s: Wrong value for input argument #%d: Vector expected.\n"
232msgstr ""
233"%s: помилкове значення вхідного параметра №%d: слід використовувати тип "
234"вектора.\n"
235
236#, c-format
237msgid "Algorithm fails\n"
238msgstr "Збій алгоритму\n"
239
240#, c-format
241msgid "Algorithm pass\n"
242msgstr "Алгоритм пройдено\n"
243
244#, c-format
245msgid "Arguments:\n"
246msgstr "Параметри:\n"
247
248#, c-format
249msgid "Columns %1d to %1d.\n"
250msgstr "Стовпчики від %1d до %1d.\n"
251
252#, c-format
253msgid "Final residual = %s > tol =%s\n"
254msgstr "Остаточна нев’язка = %s > припустиму похибку =%s\n"
255
256#, c-format
257msgid ""
258"MATRIX SUMMARY\n"
259"\n"
260msgstr ""
261"РЕЗЮМЕ МАТРИЦІ\n"
262"\n"
263
264#, c-format
265msgid "Matrix after factorization:\n"
266msgstr "Матриця після факторизації:\n"
267
268#, c-format
269msgid "Matrix before factorization:\n"
270msgstr "Матриця до факторизації:\n"
271
272#, c-format
273msgid "Matrix has been reordered.\n"
274msgstr "Матрицю було перевпорядковано.\n"
275
276#, c-format
277msgid "Matrix has not been factored.\n"
278msgstr "Матрицю не було факторизовано.\n"
279
280#, c-format
281msgid "Matrix is complex.\n"
282msgstr "Матриця є комплексною.\n"
283
284#, c-format
285msgid "Matrix is real.\n"
286msgstr "Матриця є дійсною.\n"
287
288#, c-format
289msgid "Norm of right-hand side : %s\n"
290msgstr "Норма правої частини: %s\n"
291
292#, c-format
293msgid "Number of fill-ins = %1d.\n"
294msgstr "Кількість ненульових елементів = %1d.\n"
295
296#, c-format
297msgid "Operation count for inner loop of factorization = %d.\n"
298msgstr "Кількість операцій для прямого циклу факторизації = %d.\n"
299
300#, c-format
301msgid "Pivot found at %1d,%1d using "
302msgstr "Знайдено опорний елемент у позиції %1d,%1d, використання "
303
304#, c-format
305msgid "Reordering, Step = %1d\n"
306msgstr "Перевпорядкування, крок = %1d\n"
307
308#, c-format
309msgid "Size of matrix = %1u x %1u.\n"
310msgstr "Розмірність матриці = %1u x %1u.\n"
311
312#, c-format
313msgid "Smallest diagonal element = %-1.4lg.\n"
314msgstr "Найменший діагональний елемент = %-1.4lg.\n"
315
316#, c-format
317msgid "Smallest element in matrix = %-1.4lg.\n"
318msgstr "Найменший елемент матриці = %-1.4lg.\n"
319
320#, c-format
321msgid "Smallest pivot element = %-1.4lg.\n"
322msgstr "Найменший опорний елемент = %-1.4lg.\n"
323
324#, c-format
325msgid "Special processing where the right-hand side is zero.\n"
326msgstr "Особлива обробка для матриць з нульовою правою частиною.\n"
327
328#, c-format
329msgid "Warning : The following matrix is factored in to LU form.\n"
330msgstr "Попередження: наведену нижче матрицю факторизовано за формулою LU.\n"
331
332#, c-format
333msgid "sparse: panic in file `%s' at line %d.\n"
334msgstr "sparse: помилка у файлі «%s», рядок %d.\n"
335
336#, c-format
337msgid "||| Starting new matrix |||\n"
338msgstr "||| Початок нової матриці |||\n"
diff --git a/scilab/modules/sparse/src/fortran/spextr.f b/scilab/modules/sparse/src/fortran/spextr.f
index f8db9d7..d7715b1 100644
--- a/scilab/modules/sparse/src/fortran/spextr.f
+++ b/scilab/modules/sparse/src/fortran/spextr.f
@@ -16,7 +16,7 @@
16* 16*
17* CAUTION 17* CAUTION
18* nel_max is the maximum non zeros elements authorized 18* nel_max is the maximum non zeros elements authorized
19* for B => if this limit is not enought the error 19* for B => if this limit is not enough the error
20* indicator ierr is set to -1 (else 0) 20* indicator ierr is set to -1 (else 0)
21* 21*
22* AUTHOR 22* AUTHOR
@@ -71,7 +71,7 @@
71 if ( A_mnel(ia) .gt. 0 ) then 71 if ( A_mnel(ia) .gt. 0 ) then
72 72
73 if (allcol) then 73 if (allcol) then
74 if ( kb+A_mnel(ia) .ge. nel_max ) then ! not enought memory 74 if ( kb+A_mnel(ia) .ge. nel_max ) then ! not enough memory
75 ierr = -1 75 ierr = -1
76 return 76 return
77 endif 77 endif
@@ -89,7 +89,7 @@
89 ja = A_icol(ka) 89 ja = A_icol(ka)
90 k = dicho_search(ja, j, nj) 90 k = dicho_search(ja, j, nj)
91 if ( k .ne. 0 ) then ! we have found (the smallest) k such that ja = j(k) 91 if ( k .ne. 0 ) then ! we have found (the smallest) k such that ja = j(k)
92 100 if (kb .gt. nel_max) then ! not enought memory 92 100 if (kb .gt. nel_max) then ! not enough memory
93 ierr = -1 93 ierr = -1
94 return 94 return
95 endif 95 endif
@@ -114,7 +114,7 @@
114 ja = A_icol(ka) 114 ja = A_icol(ka)
115 k = dicho_search_bis(ja, j, p, nj) 115 k = dicho_search_bis(ja, j, p, nj)
116 if ( k .ne. 0 ) then ! we have found (the smallest) k such that ja = j(p(k)) 116 if ( k .ne. 0 ) then ! we have found (the smallest) k such that ja = j(p(k))
117 200 if (kb .gt. nel_max) then ! not enought memory 117 200 if (kb .gt. nel_max) then ! not enough memory
118 ierr = -1 118 ierr = -1
119 return 119 return
120 endif 120 endif
@@ -135,7 +135,7 @@
135 kk = dicho_search(j(k), A_icol(ptr(ia)), A_mnel(ia)) 135 kk = dicho_search(j(k), A_icol(ptr(ia)), A_mnel(ia))
136 if ( kk .ne. 0 ) then ! we have found kk such that j(k) = A_icol(ptr(ia)-1+kk) 136 if ( kk .ne. 0 ) then ! we have found kk such that j(k) = A_icol(ptr(ia)-1+kk)
137 ka = kk + ptr(ia) - 1 137 ka = kk + ptr(ia) - 1
138 if (kb .gt. nel_max) then ! not enought memory 138 if (kb .gt. nel_max) then ! not enough memory
139 ierr = -1 139 ierr = -1
140 return 140 return
141 endif 141 endif
diff --git a/scilab/modules/sparse/src/fortran/spextr1.f b/scilab/modules/sparse/src/fortran/spextr1.f
index 137d5ba..570c062 100644
--- a/scilab/modules/sparse/src/fortran/spextr1.f
+++ b/scilab/modules/sparse/src/fortran/spextr1.f
@@ -19,7 +19,7 @@
19* 19*
20* CAUTION 20* CAUTION
21* nel_max is the maximum non zeros elements authorized 21* nel_max is the maximum non zeros elements authorized
22* for B => if this limit is not enought the error 22* for B => if this limit is not enough the error
23* indicator ierr is set to -1 (else 0) 23* indicator ierr is set to -1 (else 0)
24* 24*
25* AUTHOR 25* AUTHOR
@@ -63,7 +63,7 @@
63 B_mnel(1) = kb - 1 63 B_mnel(1) = kb - 1
64 64
65 else 65 else
66 call sz2ptr(A_mnel, A_m-1, ptr) ! need ptr to acces fastly at the beginning of a row 66 call sz2ptr(A_mnel, A_m-1, ptr) ! need ptr to access fastly at the beginning of a row
67 67
68 if (A_n .gt. 1) then 68 if (A_n .gt. 1) then
69 do k = 1, ni 69 do k = 1, ni