clabel function for Octave
"Tim King" <[email protected]> Tue, 20 Jan 2009 17:06:34 +0200
| Newsgroups | gmane.comp.gnu.octave.sources |
|---|---|
| Message-ID | <[email protected]> |
------=_Part_31215_23836742.1232463994082 Content-Type: multipart/alternative; boundary="----=_Part_31216_16203996.1232463994083" ------=_Part_31216_16203996.1232463994083 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Hi There, I've attached the clabel function that I wrote for Octave. It doesn't do everything that the MATLAB version does but it'll do the basics. Constructive criticism is welcome. Hope it helps, Tim King ------=_Part_31216_16203996.1232463994083 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Hi There,<br><br>I've attached the clabel function that I wrote for Octave. It doesn't do everything that the MATLAB version does but it'll do the basics.<br>Constructive criticism is welcome.<br><br>Hope it helps,<br> Tim King<br> ------=_Part_31216_16203996.1232463994083-- ------=_Part_31215_23836742.1232463994082 Content-Type: application/octet-stream; name=clabel.m Content-Transfer-Encoding: base64 X-Attachment-Id: f_fq6p180v0 Content-Disposition: attachment; filename=clabel.m ZnVuY3Rpb24gY2xhYmVsKHZhcmFyZ2luKQolIGNsYWJlbChDKQolIGNsYWJlbChDLFAxLFYxLi4u KQolIFBsYWNlcyBsYWJlbHMgb24gYSBjb250b3VyIHBsb3Qgc3RhaW5nIHRoZSB2YWx1ZSBvZiBl YWNoIGNvbnRvdXIuCiUgQyBpcyBhIG1hdHJpeCBwcm9kdWNlZCBieSBjb250b3VyYy4KJSBQMSxW MSBhcmUgcHJvcGVydHksIHZhbHVlIHBhaXJzIGFzIHVzZWQgaW4gdGV4dCh4LHksTEFCRUwsUDEs VjEsLi4uKS4KCiVUZXN0IEZvciBJbnB1dAppZiBuYXJnaW4gPT0gMAogICBlcnJvcignTm8gaW5w dXRzIHRvIGNsYWJlbCcpCmVuZAoKJUluaXRpYWxpc2UgVmFyaWFibGVzCkMgPSB2YXJhcmdpbnsx fTsKbiA9IDE7CnIgPSAwOwpjb3VudCA9IDA7Cgp0cnkKICAgeGwgPSBkaWZmKGdldChnZXQoZ2Nm KS5jdXJyZW50YXhlcykueGxpbSk7CiAgIHlsID0gZGlmZihnZXQoZ2V0KGdjZikuY3VycmVudGF4 ZXMpLnlsaW0pOwpjYXRjaAogICBlcnJvcignTm8gZmlndXJlIHRvIHBsYWNlIGxhYmVscyBvbiEn KQogICBjbG9zZTsKZW5kCgolUGxhY2UgTGFiZWxzIG9uIEZpZ3VyZQp3aGlsZSBuIDwgc2l6ZShD LDIpOwoKICAgbGV2ID0gQygxLG4pOwogICBsZW4gPSBDKDIsbik7LgogICAKICAgJXJhbmRvbWx5 IHNlbGVjdCBhIHBvaW50IG9uIHRoZSBjb250b3VyCiAgIHIgPSBjZWlsKHJhbmQuKihsZW4tMSkp K247CiAgIAogICAlQ2FsY3VsYXRlIHdoZXJlIHRvIHBsYWNlIGxhYmVsCiAgIHggPSAwLjUqKEMo MSxyKzEpK0MoMSxyKSk7CiAgIHkgPSAwLjUqKEMoMixyKzEpK0MoMixyKSk7CiAgIAogICAlQ2Fs Y3VsYXRlIHRleHQgcm90YXRpb24KICAgcm90ID0gYXRhbmQoKEMoMixyKzEpLUMoMixyKSkuLyhD KDEscisxKS1DKDEscikpLiooeGwuL3lsKSk7CiAgIAogICAlUmVqZWN0IHBvaW50cyB0aGF0IGFy ZSB0b28gY2xvc2UgdG9nZXRoZXIuCiAgIGlmIHNxcnQoKChDKDEscisxKS1DKDEscikpLi94bCku XjIrKChDKDIscisxKS1DKDIscikpLi95bCkuXjIpID4gMC4wMDEgJSBUaGUgdmFsdWUgMC4wMDEg aXMgYSB0aHVtYiBzdWNrLCB0aGVyZSBpcyBwcm9iYWJseSBhIGJldHRlciB3YXkgb2YgZG9pbmcg dGhpcy4KICAgICAgdGV4dCh4LHksWycgJyxudW0yc3RyKGxldildLCdyb3RhdGlvbicscm90LHZh cmFyZ2luezI6ZW5kfSk7CiAgICAgIG4gPSBuK2xlbisxOwogICAgICBjb3VudCA9IDA7CiAgIGVs c2UgJVRyeSBhZ2FpbiBmb3IgYSBiZXR0ZXIgcGxhY2UgZm9yIHRoZSBsYWJlbAogICAgICBjb3Vu dCA9IGNvdW50KzE7CiAgICAgIGlmIGNvdW50ID09IDEwOyUgMTAgaXMgYWxzbyBhIHRodW1iIHN1 Y2suIFRoZXJlIGlzIHByb2JhYmx5IGEgYmV0dGVyIHdheSBvZiBkb2luZyB0aGlzIGFsc28uCiAg ICAgICAgIG4gPSBuK2xlbisxOwogICAgICAgICBjb3VudCA9IDA7CiAgICAgIGVuZAogICBlbmQK ZW5kCg== ------=_Part_31215_23836742.1232463994082 Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Octave-sources mailing list [email protected] https://www-old.cae.wisc.edu/mailman/listinfo/octave-sources ------=_Part_31215_23836742.1232463994082--