Mercurial > mxe-octave

annotate src/of-tisean-3-octave-9-compat.patch @ 6532:74666bb9cc46

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
of-tisean: Fix compatibility with Octave 9. * src/of-tisean-3-octave-9-compat.patch: Add patch that replaces functions that have been deprecated in Octave 7 and removed from Octave 9. * dist-files.mk: Add new file to list.
author Markus Mützel <markus.muetzel@gmx.de>
date Fri, 18 Nov 2022 19:02:02 +0100
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6532
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
1 The function "set_warning_state" was moved to the "octave" namespace in Octave 7
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
2 and the function was finally removed from the global namespace in Octave 9.
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
3 Replace "fortran_vec" on const objects with "data".
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
4
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
5 --- tisean-0.2.3/src/__lyap_spec__.cc.orig 2022-11-18 18:34:30.819911000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
6 +++ tisean-0.2.3/src/__lyap_spec__.cc 2022-11-18 18:36:51.153582045 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
7 @@ -413,8 +413,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
8 // end old indexes = make_multi_index();
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
9
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
10 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
11 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
12 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
13 + octave::set_warning_state ("Octave:nearly-singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
14 + octave::set_warning_state ("Octave:singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
15
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
16 // Prepare data for running first time
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
17 if (count == 0)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
18
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
19 --- tisean-0.2.3/src/__polynom__.cc.orig 2022-11-18 18:39:15.855558000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
20 +++ tisean-0.2.3/src/__polynom__.cc 2022-11-18 18:42:04.850651947 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
21 @@ -223,8 +223,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
22 octave_idx_type *coding = coding_vec.data();
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
23
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
24 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
25 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
26 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
27 + octave::set_warning_state ("Octave:nearly-singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
28 + octave::set_warning_state ("Octave:singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
29
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
30 // Make the fit
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
31 make_fit (series, coding, results, INSAMPLE, N, DIM, DELAY,
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
32
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
33 --- tisean-0.2.3/src/__rbf__.cc.orig 2022-11-18 18:39:15.855558000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
34 +++ tisean-0.2.3/src/__rbf__.cc 2022-11-18 18:43:54.393150501 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
35 @@ -153,8 +153,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
36 center[i][j]=series[(DIM-1)*DELAY-j*DELAY+(i*cstep)/(CENTER-1)];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
37
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
38 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
39 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
40 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
41 + octave::set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
42 + octave::set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
43
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
44 // Calculate coefficients
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
45 if (setdrift)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
46
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
47 --- tisean-0.2.3/src/__lfo_run__.cc.orig 2022-11-18 18:39:15.851560000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
48 +++ tisean-0.2.3/src/__lfo_run__.cc 2022-11-18 18:45:31.538549956 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
49 @@ -324,8 +324,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
50 cast[i][j]=series[j][LENGTH-hdim+i];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
51
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
52 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
53 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
54 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
55 + octave::set_warning_state ("Octave:nearly-singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
56 + octave::set_warning_state ("Octave:singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
57
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
58 // Calculate the maximum epsilon that makes sense
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
59 // On the basis of 'i' and 'j' from put_in_boxes ()
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
60
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
61 --- tisean-0.2.3/src/__lfo_test__.cc.orig 2022-11-18 18:39:15.851560000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
62 +++ tisean-0.2.3/src/__lfo_test__.cc 2022-11-18 18:47:34.600170403 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
63 @@ -326,8 +326,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
64 error_array[i]=0.0;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
65
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
66 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
67 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
68 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
69 + octave::set_warning_state ("Octave:nearly-singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
70 + octave::set_warning_state ("Octave:singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
71
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
72 // Calculate the maximum epsilon that makes sense
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
73 // On the basis of 'i' and 'j' from put_in_boxes ()
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
74
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
75
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
76 --- tisean-0.2.3/src/__lfo_ar__.cc.orig 2022-11-18 18:39:15.851560000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
77 +++ tisean-0.2.3/src/__lfo_ar__.cc 2022-11-18 18:49:18.465577481 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
78 @@ -257,8 +257,8 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
79 octave_idx_type clength=(CLENGTH <= LENGTH) ? CLENGTH-STEP : LENGTH-STEP;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
80
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
81 // Promote warnings connected with singular matrixes to errors
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
82 - set_warning_state ("Octave:nearly-singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
83 - set_warning_state ("Octave:singular-matrix","error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
84 + octave::set_warning_state ("Octave:nearly-singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
85 + octave::set_warning_state ("Octave:singular-matrix", "error");
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
86
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
87 // Estimate maximum possible output size
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
88 octave_idx_type output_rows = (octave_idx_type)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
89
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
90 --- tisean-0.2.3/src/__lzo_test__.cc.orig 2022-11-18 18:39:15.855558000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
91 +++ tisean-0.2.3/src/__lzo_test__.cc 2022-11-18 18:51:05.883219045 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
92 @@ -81,7 +81,7 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
93 {
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
94 casted=0.0;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
95 // old help=series[j]+istep;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
96 - help=series.fortran_vec()+j*len+istep;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
97 + help = series.data () + j * len + istep;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
98 for (octave_idx_type i=0;i<number;i++)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
99 casted += help[found[i]];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
100 casted /= (double)number;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
101
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
102 --- tisean-0.2.3/src/__lzo_gm__.cc.orig 2022-11-18 18:53:07.380654000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
103 +++ tisean-0.2.3/src/__lzo_gm__.cc 2022-11-18 18:53:27.705430278 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
104 @@ -42,7 +42,7 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
105 octave_idx_type LENGTH = series.rows ();
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
106 for (octave_idx_type i=0;i<dim;i++)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
107 {
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
108 - const double *si = series.fortran_vec() + LENGTH * i;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
109 + const double *si = series.data () + LENGTH * i;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
110 double cast=si[found[0]+STEP];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
111 for (octave_idx_type j=1;j<number;j++)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
112 cast += si[found[j]+STEP];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
113
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
114 --- tisean-0.2.3/src/__lzo_run__.cc.orig 2022-11-18 18:39:15.855558000 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
115 +++ tisean-0.2.3/src/__lzo_run__.cc 2022-11-18 18:55:01.719648553 +0100
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
116 @@ -136,7 +136,7 @@
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
117 for (octave_idx_type d=0;d<dim;d++) {
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
118 newcast[d]=0.0;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
119 // old sd=series[d]+1;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
120 - const double *sd = series.fortran_vec() + d*len + 1;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
121 + const double *sd = series.data () + d * len + 1;
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
122 for (octave_idx_type i=0;i<number;i++)
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
123 newcast[d] += sd[found[i]];
74666bb9cc46 of-tisean: Fix compatibility with Octave 9.
Markus Mützel <markus.muetzel@gmx.de>
parents:
diff changeset
124 newcast[d] /= (double)number;