Mercurial > octave-antonio
view doc/interpreter/images.awk @ 20170:af2b7695f1c4 draft default tip @
gallery.m: clean and vectorize part of qmult.
* scripts/special-matrix/gallery.m: make qmult() follow Octave guidelines, vectorize last for loop in qmult().
author | Antonio Pino Robles <data.script93@gmail.com> |
---|---|
date | Thu, 28 May 2015 18:32:47 +0200 |
parents | 4f6ae6b94abe |
children |
line wrap: on
line source
BEGIN { print "## DO NOT EDIT -- generated from module-files by config-module.awk"; print ""; exts[1] = "eps"; exts[2] = "pdf"; exts[3] = "png"; exts[4] = "txt"; printf ("IMAGES_SRC =\n"); for (i = 1; i <= 4; i++) { printf ("IMAGES_%s =\n", toupper (exts[i])); } } { script = $1; basename = script; sub (/\.m$/, "", basename); ubasename = toupper (basename); printf ("IMAGES_SRC += %s\n", script); for (i = 1; i <= 4; i++) { ext = exts[i]; uext = toupper (ext); printf ("%s_%s =", ubasename, uext); for (j = 2; j <= NF; j++) printf (" %s.%s", $j, ext); printf ("\n"); printf ("IMAGES_%s += $(%s_%s)\n", uext, ubasename, uext); for (j = 2; j <= NF; j++) { printf ("%s.%s: %s\n", $j, ext, script); printf ("\t$(AM_V_GEN)$(top_builddir)/run-octave -f -q -H -p $(srcdir) --eval \"%s ('%s', '%s');\"\n", basename, $j, ext); } } }