**Cost Price, Markup, Discount, & Profit and eTCL demo example slot calculator, numerical analysis**

This page is under development. Comments are welcome, but please load any comments in the comments section at the bottom of the page. Please include your wiki MONIKER  in your comment with the same courtesy that I will give you. Its very hard to reply intelligibly without some background of the correspondent. Thanks,[gold]
----

<<TOC>>

**Introduction**

[gold] Here is some eTCL starter  code for  Cost Price and  Markup in calculator shell. 

----
**Pseudocode Section**
======
       # using pseudocode 
       # possible problem instances,  
      initialize algorithm_result = 1.
      check algorithm 
      f(solution) =? initial product
      check_sum = a+b+c+d+e  
      set answers and printout with resulting values 
      pseudocode: need test cases > small,medium, giant 
      pseudocode: need testcases within range of expected operation.
      pseudocode: are there any cases too small or large to be solved?
======
***Testcases Section***  

In planning any software, it is advisable to gather a number of testcases to check the results of the program. The math for the testcases can be checked by pasting statements in the TCL console. Aside from the TCL calculator display, when one presses the report button on the calculator, one will have console show access to the   capacity  functions (subroutines). 

**** Testcase 1 ****

**** Testcase 2 ****
**** Testcase 3 ****

----
***Screenshots Section***
****figure 1.****
[Babylonian Combined Work Norm Algorithm and eTCL Slot Calculator screenshot ] 
---- 
***References:***
   * [Oneliner's Pie in the Sky] 
   * [One Liners] 
   * [Category Algorithm]
   * [Babylonian Number Series and eTCL demo example calculator]
   * [Brahmagupta Area of Cyclic Quadrilateral and eTCL demo example calculator]
   * [Gauss Approximate Number of Primes and eTCL demo example calculator]
   * Taking a Weighted Average, Dr Math, mathforum.org/dr.math, dated 03/20/2003 
   * google <Weighted Average, Dr Math>, mathforum.org/dr.math
   * Using Weighted Criteria to Make Decisions, Dr Math>, mathforum.org/dr.math, dated 07/18/2008 
   * google <Weighted sum product model Decision >
   * harmonic mean discussed in [Additional math functions]
   * harmonic mean discussed in [Tcl Normalized Extended Benchmarks]
   * see  arithmetic mean on tcl-wiki [Stats] 2011-05-22, [RLE]
   * see similar 1/(1/nth) terms method used in 
   * [Babylonian Combined Market Rates and eTCL demo example calculator, numerical analysis ] 

**Appendix Code**

***appendix TCL programs and scripts ***

======
   
======
----
*** Pushbutton Operation***

For the push buttons, the recommended procedure is push testcase and fill frame, change first three entries etc, push solve, and then push report. Report allows copy and paste from console. 

For  testcases in a computer session, the eTCL calculator increments a new testcase number internally, eg. TC(1), TC(2) , TC(3) , TC(N). The testcase number is internal to the calculator and will not be printed until the report button is pushed for the current result numbers. The current result numbers will be cleared on the next solve button.   The command { calculate; reportx  } or { calculate ; reportx; clearx  } can be added or changed to report automatically. Another wrinkle would be to print out the current text,  delimiters,  and numbers in a TCL wiki style table as

======
  puts " %| testcase $testcase_number | value| units |comment |%"
  puts " &| volume| $volume| cubic meters |based on length $side1 and width $side2   |&"  
======
----
----
**Snippet Pseudocode formula**
======
     #Pseudocode
      weighted mean3 formula   =( norm1  +  norm2 ) / ( norm1 / rate1  + norm2 / rate2 )
     set weighted_mean3 [ expr {(norm1+norm2)/((norm1/rate1)+(norm2/rate2)) }]
     set weighted_mean3 [/ [+ norm1 norm2 ] [+ [/ norm1 rate1 ] [/ norm2 rate2 ]]] 
     set weighted_mean3 [/ [+ $norm1 $norm2 ] [+ [/ $norm1 $rate1 ] [/ $norm2 $rate2 ]]] 
     same result as ( delta quantity)  / (delta time)
     set weighted_mean4 [ expr { ( $norm2-$norm1 )/(( $norm1/$rate1 )+( $norm2/$rate2 )) } ] 
======
----
[gold] This page is copyrighted under the TCL/TK license terms, [http://tcl.tk/software/tcltk/license.html%|%this license]. 

**Comments Section**

<<discussion>>
Please place any comments here, Thanks.

                              
<<categories>> Numerical Analysis | Toys | Calculator | Mathematics| Example| Toys and Games | Games | Application | GUI
----
<<categories>> Development | Concept| Algorithm | Statistics.