Example of MISO solver for WP 34s
05-22-2018, 05:40 PM (This post was last modified: 05-22-2018 05:41 PM by Dieter.)
Post: #2
 Dieter Senior Member Posts: 2,397 Joined: Dec 2013
RE: Example of MISO solver for WP 34s
(05-22-2018 09:29 AM)gomefun2 Wrote:  I will show an example of how to program a MISO (multiple input single output) solver mapped to a single button press for an equation.

I'll be glad to look at the program and see how it can be improved, but...
sorry, in my humble opinion this is completely unreadable.

There is no need to comment each and every line. If there is a line with a "+" it is not required to explain this is an addition, or if there is a "1" noone needs to know that this puts a "1" into X. This is obvious, so please comment only the essential things. For instance you could add the equation that is solved here.

Maybe you can provide a new listing, completely uncommented, and with a fixed-width font. Try the "code" box in the message editor. Maybe you can also add line numbers so that everyone who wants to comment on a specific piece of code can do so by referring to the respective line number. Here's a tip: type the program in Excel, add the line numbers in the column left of the code and then copy the result.

I hope you do not mind these suggestions, but the way it is now the program is extremely hard to oversee and understand. The pure listing – along with a few explanations after (!) the code – would be very helpful.

Edit: Ok, Ok, I did it myself:

Code:
001  LBL A 002  CLα 003  1 004  STO 00 005  α's' 006  XEQ'VAR' 007  α'Pe' 008  XEQ'VAR' 009  α'Pwf' 010  XEQ'VAR' 011  α'q' 012  XEQ'VAR' 013  α'Bo' 014  XEQ'VAR' 015  α'u' 016  XEQ'VAR' 017  α'k' 018  XEQ'VAR' 019  α'h' 020  XEQ'VAR' 021  α're' 022  XEQ'VAR' 023  α'rw' 024  XEQ'VAR' 025  RCL 99 026  STO 00 027  SLV'SSR' 028  RTN 029  LBL 'SSR' 030  STO->00 031  RCL 07 032  RCL 08 033  * 034  RCL 02 035  RCL 03 036  - 037  * 038  #002 039  SDR 001 040  #141 041  + 042  RCL 06 043  * 044  RCL 05 045  * 046  RCL 09 047  RCL 10 048  / 049  LN 050  RCL 01 051  + 052  * 053  / 054  RCL 04 055  - 056  RTN 057  LBL'VAR' 058  α'?' 059  RCL->00 060  PROMPT 061  STO->00 062  x<0? 063  XEQ'UNK' 064  INC 00 065  CLα 066  RTN 067  LBL'UNK' 068  RCL 00 069  STO 99 070  RTN

By the way: SLV works as a test. If no solution is found the next line is skipped! This way you can add your own error handler.
And SLV expects two initial guesses in X and Y. How does your program handle this?

Dieter
 « Next Oldest | Next Newest »

 Messages In This Thread Example of MISO solver for WP 34s - gomefun2 - 05-22-2018, 09:29 AM RE: Example of MISO solver for WP 34s - Dieter - 05-22-2018 05:40 PM RE: Example of MISO solver for WP 34s - Dieter - 05-22-2018, 07:43 PM RE: Example of MISO solver for WP 34s - burkhard - 05-23-2018, 05:47 PM RE: Example of MISO solver for WP 34s - Dieter - 05-23-2018, 07:36 PM RE: Example of MISO solver for WP 34s - Dieter - 05-24-2018, 06:17 PM RE: Example of MISO solver for WP 34s - gomefun2 - 05-23-2018, 09:57 PM

User(s) browsing this thread: 1 Guest(s)