## Friday, June 23, 2017

### HP Prime and Casio fx-CG50: Trapezoid Midsegment, Height, Area

HP Prime and Casio fx-CG50:  Trapezoid Midsegment, Height, Area

The program TRAPEZ calculates the following:

Midsegment length:  M = (A + B)/2

Height:  H = √( (-A+B+C+D)(A-B+C+D)(A-B+C-D)(A-B-C+D) )/(2 * abs(B-A))

Area:  K = M * H

HP Prime Program TRAPEZ

EXPORT TRAPEZ()
BEGIN
// trapezoid
// 2017-06-23 EWS

INPUT({A,B,C,D},
"Trapezoid",
{"a: ","b: ","c: ","d: "},
{"Top","Bottom","Left","Right"});

M:=(A+B)/2;
I:=(−A+B+C+D)*(A-B+C+D)*(A-B+C-D)*
(A-B-C+D);
IF I≤0 THEN
PRINT();
PRINT("Invalid Trapezoid");
ELSE
H:=√(I)/(2*ABS(B-A));
K:=H*M;
PRINT();
PRINT("Midlength = "+M);
PRINT("Height = "+H);
PRINT("Area = "+K);
END;

END;

Casio fx-CG50 Program TRAPEZ

"TOP"?->A
"BOTTOM"?->B
"LEFT"?->C
"BOTTOM"?->D
(A+B)/2->M
((-)A+B+C+D)(A-B+C+D)(A-B+C-D)(A-B-C+D)->I
If I<=0
Then
"INVALID TRAPEZIOD"DispsElse
√I/(2Abs (B-A))->H
M*H->K
ClrText
Locate 1,1,"MIDLENGTH="
Locate 1,2,M
Locate 1,3,"HEIGHT="
Locate 1,4,H
Locate 1,5,"AREA="
Locate 1,6,K
IfEnd

Example

A = 13, B = 23, C = 6, D = 7
Results:
Midlength, M = 18
Height, H = 4.139493194
Area, A = 74.3848775

Source:
“Trapezoid”  Wikipedia.  Edited July 7, 2014.  Retrieved July 8, 2014

Eddie

This blog is property of Edward Shore, 2017.

### HP Prime and Casio fx-CG 50: Phase of the Moon, C++ Translations to Calculator

HP Prime and Casio fx-CG 50: Phase of the Moon, C++ Translations to Calculator

Moon Phase Program

The following program calculates the approximate phase of the moon.  Calculation is based on the following:

1.  A base date of August 11, 1999 is used, which was a New Moon.
2.  The phases of the moon cycles approximately 29.530588853 days

The results is a phase indicator from 0 to 1.

If the indicator is close to 0 or 1, we have a New Moon.
If the indicator above 0 but below 0.5, it’s the Waxing Crescent Moon.
If the indicator is about or exactly 0.5, we have a Full Moon.
Finally, for an indicator from 0.5 to 1, it’s the Waning Crescent Moon.

Examples:
June 23, 2017:  the indicator is 0.991190947
June 24, 2017:  the indicator is 0.025054136

Values are approximate.

HP Prime Program:  MOONPHASE

Input:  MOONPHASE(yyyy.mmdd)

EXPORT MOONPHASE(d)
BEGIN
// Moon phase
// 0,1: New; 0.5: Full
LOCAL t,p;
t:=DDAYS(1999.0811,d);
p:=FP(t/29.530588853);
RETURN p;
END;

Casio Program:  MOONPHSE

"EWS 2017-06-23"
"MONTH"?->M
"DAY"?->D
"YEAR"?->Y
Days_Prd(8,11,1999,M,D,Y)->T
Frac (T/29.530588853)->P

ClrText
Locate 1,1,"PHASE %:"
Locate 1,2,"0,1: NEW,0.5: FULL"
Locate 1,3,P

Source:  “Moon Phase”  voidware.  http://voidware.com/moon_phase.htm

Bonus:  From C to Calculator

The program presented on the source is written in C (C++?).  Translating from C to calculator language took a little research (confession: I’m not a C expert).

var++  increment variable by 1.  (var + 1 → var)
var--  decrement variable by 1.  (var – 1 → var)
+=  storage addition (STO+,  var + value → var)
-=   storage subtraction (STO-, var – value → var)
*=  storage multiplication (STO*, var * value → var)
/=  storage division  (STO/,  var/value → var)
&   and
||  or
%  mod
‘! not

Source:  “C – Operators” Tutorials Point  - Simple Easy Learning https://www.tutorialspoint.com/cprogramming/c_operators.htm  Retrieved June 23, 2017

Eddie

This blog is property of Edward Shore, 2017

## Wednesday, June 21, 2017

### HP Prime and Casio fx-CG50: Basic Spreadsheet Comparison

HP Prime and Casio fx-CG50:  Basic Spreadsheet Comparison

Do you use the spreadsheet mode on your calculator?  Check it out if you have not done so.

Happy First Days of Summer (Northern Hemisphere)/Winter (Southern Hemisphere)!

Eddie

This blog is property of Edward Shore, 2017

## Saturday, June 17, 2017

### Casio fx-CG50 Review (updated 3/2/2018)

Casio fx-CG50 Review

Company:  Casio
Type: Scientific/Graphing
Battery: 4 AAAs
Memory: 60 KB RAM, 14 MB Flash
Colors:  Can display up to 65,536 colors, graphing and text can be use up to 8 colors

I’m going to focus more on the new and updates in this review.

 2017 fx-CG50 on the left, 2011 fx-CG10 on the right

Keyboard

The fx-CG50 is an update of the popular 2011 Casio Prizm (model fx-CG10 or fx-CG20).  The fx-CG50 has an updated keyboard, in the style of the new fx-260 SOLAR and Casio FX-991 ES.  As a result, the keys are easier to read, more consistent to the touch and size.  In the previous keyboard (fx-CG10/20), the number keys were large but the function keys were very small.

The Screen

Like the previous fx-CG10/20, the diagonal of the screen is 3.17 inches.  However, the screen of the fx-CG50 is brighter.

Processing Speed

Although I wasn’t able to find anything about the chip or its speed, the fx-CG50 seems to operate faster in accounts.

I tested a sample program:

For 1 → A To 1000
ClrText
Locate 2,1,A
Next

On the fx-CG10, the program took 1 minute, 24.83 seconds to complete.  With the fx-CG50, the program took just 34.87 seconds, a reduction of 58.89%.

General Features

* Financial Solver: Time Value of Money, Days between Dates, Bonds
* Recursive, Polar, Function, Parametric, Inequality, and Conic Section Graphing
* General Function Solver
* Polynomial Solver: up to the 6th degree, coefficients must be real, but roots can be complex numbers
* Simultaneous Equation Solver:  up to 6 x 6 linear equations, can include complex numbers
* Number of Statistic Regressions (curve fitting): 12

Also textbook entry, calculus, and full complex number (yes that includes exponential, logarithms, and trigonometric functions of complex numbers – yes I’m happy about this!**).  Base calculations include binary, octal, decimal, and hexadecimal integers.

** As of OS 3.10, trig functions no longer accept complex numbers.  Why Casio why?  (3/2/2018)

Additional modes include Geometry, Conversion, and Spreadsheet.  3D graphing is new to the fx-CG50.

Graphs can be used in one of 8 colors: black, blue, red, magenta, green, cyan, yellow, and white.  This palette is the same of the SECAM palette shown on certain Atari 2600 machines.  (Link:  https://en.wikipedia.org/wiki/List_of_video_game_console_palettes#Atari_2600 )

3D Graphing

The 3D graphing mode offers one of four possible types: line, plane, sphere, and cylinder.  Each of the types offer various formats to enter coefficients.  Keep in mind these are the only four types of 3D graphs offered.  The graph has full zoom features and it is pretty snappy with regards to rotation.

Physium

Physium is included with the fx-CG50.  There are two features with the Physium:  Periodic Table and Physical Constants.

Periodic Table:  an underrated feature.  You can display the entire table, or zoom in to a portion of the table.  The atomic weight of each element can be stored in a variable (A through Z).

Physical Constants:  Choose between 39 physical constants from five categories: Universal (speed of light, electric constant, Newton’s constant of gravitational, etc.), Electromagnetic constants, Atomic & Nuclear constants, Physico-Chemical constants (Avogardo constant, molar gas constant, etc), and three Adopted Values (Josephson constant, Klitzing constant, standard acceleration of gravity).  Units are in SI.

Verdict

If you don’t have a Casio fx-CG10/20 and are interested in getting the updated version, go for it.  I also think getting the update is worth it primarily for the faster processing speed, brighter screen, and much better keyboard as far as contrast on the labels and key size.  Obviously Casio is very consistent with the programming language, so if you are upgrading from a previous non-color or three-color version, you should feel right at home with the fx-CG50.  The one thing I wish the fx-CG50 had was more RAM instead of only the 60KB from fx-CG10.  It’s not terrible, but given the TI-84 Plus CE has 128K RAM, Casio should have at least matched that amount.

Eddie

This blog is property of Edward Shore, 2017

## Monday, June 12, 2017

### HP Prime and Casio fx-9860GII/Prizm: Angular Distance Between Stars

HP Prime and Casio fx-9860GII/Prizm:  Angular Distance Between Stars

Given the right ascension (Î±) and declination (Î´) of two stars of the same epoch (J2000.0 is the most current), the distance between the stars are:

d = acos( sin Î´1 * sin Î´2 + cos Î´1 * cos Î´2 * cos (Î±1 – Î±2) )

The distance is usually given in decimal degrees.

Enter Î± in terms of hours, minutes, seconds (standard notation) and Î´ in terms of degrees, minutes, seconds (standard notation).

HP Prime Program:   ANGSTAR

EXPORT ANGSTAR(Î±1,Î´1,Î±2,Î´2)
BEGIN
// 2017-06-08 EWS
// Angular Angle

// Degrees
HAngle:=1;

LOCAL d;

Î±1:=15*Î±1;
Î±2:=15*Î±2;

d:=ACOS(SIN(Î´1)*SIN(Î´2)+
COS(Î´1)*COS(Î´2)*COS(Î±1-Î±2));

RETURN →HMS(d);
END;

Casio fx-9860GII/Prizm Program:  ANGSTAR

Deg
“RA 1: “?→A
“DEC1: “?→B
15A→A
“RA 2: “?→C
“DEC2: “?→D
15C→C
cos¯¹ (sin B * sin D + cos B * cos D * cos (A-C))→E
E>DMS

Example

Distance between Regulus (A) in Leo and Sadalmelik in Aquarius:

(data via Wikipedia)
Regulus:  Î± = 10h8m23.11s,  Î´ = +11°58’01.95”

Sadamelik:  Î± = 22h5m47.03593s, Î´ = -0°19’11.4568”

Distance:  168°20’05.1793”

Source:
Meeus, Jean.  Astronomical Algorithms  William-Bell, Inc.  Richmond, VA 1991.  ISBN 0-943396-35-2

Please stay safe, happy, and sane. Happy computing,

Eddie

I hope to have the new Casio Prizm FX-CG50 soon for review as I ordered one last Friday.

This blog is property of Edward Shore, 2017.

## Sunday, June 11, 2017

### HP 12C Minimum and Maximum

HP 12C Minimum and Maximum

HP 12C: Minimum of a Set

Instructions:
1. Enter the initial point in R1.  Press [ f ] (CLEAR PRGM).
2. For each point: enter the data point, press [R/S].
3. When you are finished, press RCL 1.

Program:
 STEP CODE KEY 01 44, 0 STO 0 02 45, 1 RCL 1 03 34 x<>y 04 43, 34 x≤y 05 44, 1 STO 1 06 43, 33, 00 GTO 00

Example:
9 [ST0] 1, [ f ] (CLEAR PRGM)
3 [R/S], 6 [R/S], 5 [R/S], 7 [R/S], 2 [R/S], 4 [R/S]
[RCL] 1 returns 2

HP 12: Maximum of a Set

Instructions:
1. Enter the initial point in R2.  Press [ f ] (CLEAR PRGM).
2. For each point: enter the data point, press [R/S].
3. When you are finished, press RCL 2.

Program:
 STEP CODE KEY 01 44, 0 STO 0 02 45, 2 RCL 2 03 43, 34 x≤y 04 34 x<>y 05 44, 2 STO 2 06 43, 33, 00 GTO 00

Example:
9 [ST0] 2, [ f ] (CLEAR PRGM)
3 [R/S], 6 [R/S], 5 [R/S], 7 [R/S], 2 [R/S], 4 [R/S]
[RCL] 2 returns 9

Nice pair of programs to have.  Yes, they can be incorporated in more complex routines.

Eddie

This blog is property of Edward Shore, 2017.

### HP 42S/DM42: Height of a Fire, Time to Clear a Corridor

HP 42S/DM42:  Height of a Fire, Time to Clear a Corridor HP 42S/DM42/Free42 Program:  FIREHGT The program FHGT approximates the height of a...