comparison scripts/sparse/ilu.m @ 32002:939e5d952675

Use upper/lower in preference to toupper/tolower to match Matlab. * mappers.cc (Fupper, Flower): Functions renamed from toupper/tolower and now use "DEFUN" macro. Change DEFALIAS to correctly map toXXX to XXX. Update all BIST tests. * func.txi, strings.txi: Update manual. * cellfun.cc, utils.cc, Map.m, idivide.m, integral.m, integral2.m, integral3.m, interp1.m, quad2d.m, quadgk.m, rng.m, griddata.m, griddatan.m, listdlg.m, movegui.m, __file_filter__.m, uigetfile.m, uisetfont.m, __unimplemented__.m, colormap.m, imformats.m, imshow.m, __imread__.m, __imwrite__.m, rgbplot.m, javaclasspath.m, genvarname.m, edit.m, inputParser.m, license.m, open.m, parseparams.m, unpack.m, validateattributes.m, __all_opts__.m, get_description.m, get_forge_pkg.m, camorbit.m, daspect.m, datetick.m, pbaspect.m, __tickangle__.m, rticks.m, thetaticks.m, xticks.m, yticks.m, zticks.m, camlight.m, colorbar.m, isocaps.m, isosurface.m, __add_datasource__.m, __patch__.m, __scatter__.m, reducepatch.m, smooth3.m, surfl.m, hgload.m, hold.m, openfig.m, __add_default_menu__.m, __print_parse_opts__.m, refreshdata.m, saveas.m, struct2hdl.m, movfun.m, stft.m, eigs.m, ichol.m, ilu.m, gammainc.m, gallery.m, corrcoef.m, iqr.m, normalize.m, base2dec.m, index.m, regexptranslate.m, strsplit.m, datestr.m, mk-sparse-tst.sh: Replace toupper/tolower with upper/lower in Octave code.
author Rik <rik@octave.org>
date Wed, 12 Apr 2023 15:34:43 -0700
parents 597f3ee61a48
children 2e484f9f1f18
comparison
equal deleted inserted replaced
32001:51b503f5ca3a 32002:939e5d952675
188 188
189 ## Parse input options 189 ## Parse input options
190 if (! isfield (opts, "type")) 190 if (! isfield (opts, "type"))
191 opts.type = "nofill"; # set default 191 opts.type = "nofill"; # set default
192 else 192 else
193 type = tolower (getfield (opts, "type")); 193 type = lower (getfield (opts, "type"));
194 if (! any (strcmp (type, {"nofill", "crout", "ilutp"}))) 194 if (! any (strcmp (type, {"nofill", "crout", "ilutp"})))
195 error ("ilu: invalid TYPE specified"); 195 error ("ilu: invalid TYPE specified");
196 endif 196 endif
197 opts.type = type; 197 opts.type = type;
198 endif 198 endif
207 endif 207 endif
208 208
209 if (! isfield (opts, "milu")) 209 if (! isfield (opts, "milu"))
210 opts.milu = "off"; # set default 210 opts.milu = "off"; # set default
211 else 211 else
212 milu = tolower (getfield (opts, "milu")); 212 milu = lower (getfield (opts, "milu"));
213 if (! any (strcmp (milu, {"off", "col", "row"}))) 213 if (! any (strcmp (milu, {"off", "col", "row"})))
214 error ('ilu: MILU must be one of "off", "col", or "row"'); 214 error ('ilu: MILU must be one of "off", "col", or "row"');
215 endif 215 endif
216 opts.milu = milu; 216 opts.milu = milu;
217 endif 217 endif