Exploring Analyic Geometry with Mathematica®

Home Contents Commands Packages Explorations Reference
Tour Lines Circles Conics Analysis Tangents

Area of Triangle Configurations

triarea.html

Exploration

"triarea_1.gif"

Graphics saved as "triare01.eps".

For the triangle illustrated in the figure, show that the area, "triarea_2.gif", associated with the AAS (angle-angle-side) configuration whose parameters are "triarea_3.gif", "triarea_4.gif" and "triarea_5.gif" is given by

"triarea_6.gif".

Show that the area, "triarea_7.gif", associated with the ASA (angle-side-angle) configuration whose parameters are "triarea_8.gif", "triarea_9.gif" and "triarea_10.gif" is given by

"triarea_11.gif".

Show that the area, "triarea_12.gif", associated with the SAS (side-angle-side) configuration whose parameters are "triarea_13.gif", "triarea_14.gif" and "triarea_15.gif" is given by

"triarea_16.gif".

Approach

Construct the triangle associated with each configuration, and then compute the expression for the area and simplify.

Initialize

To initialize Descarta2D, select the input cell bracket and press SHIFT-Enter.

This initialization assumes that the Descarta2D software has been copied into one of the standard directories for AddOns which are on the Mathematica search path, $Path.

<<Descarta2D`

Solution

Construct the triangle for the AAS configuration.

Clear[a1,a2,a3,s1,s2,s3];
T1=(Triangle2D[{{s1,Null,Null},{a1,a2,Null}}] //FullSimplify) //.
      Sqrt[s1^2*Sin[a2]^2]->s1*Sin[a2]

"triarea_17.gif"

Compute the area for the AAS configuration and simplify.  The sine function is introduced to prevent simplification back to the cosecant form.

A1=Area2D[T1] //. Csc[a1]->1/sine[a1]

"triarea_18.gif"

Construct the triangle for the ASA configuration.

Clear[a1,a2,a3,s1,s2,s3];
T2=(Triangle2D[{{Null,Null,s3},{a1,a2,Null}}] //FullSimplify) //.
      Sqrt[s3^2*Csc[a1+a2]^2*Sin[a1]^2*Sin[a2]^2]->
      s3*Csc[a1+a2]*Sin[a1]*Sin[s2]

"triarea_19.gif"

Compute the area for the ASA configuration and simplify.  The sine function is transformed to lower case to prevent simplification back to the cosecant form.

A2=Area2D[T2] //. Csc[a1+a2]->1/sine[a1+a2]

"triarea_20.gif"

Construct the triangle for the SAS configuration.

Clear[a1,a2,a3,s1,s2,s3];
T3=(Triangle2D[{{s1,Null,s3},{Null,a2,Null}}] //FullSimplify) //.
      Sqrt[a1^2*Sin[a2]^2]->s1*Sin[a2]

"triarea_21.gif"

Compute the area for the SAS configuration and simplify.

A3=Area2D[T3] //. Sqrt[s1^2*Sin[a2]^2]->s1*Sin[a2]

"triarea_22.gif"


Copyright © 1999-2007 Donald L. Vossler, Descarta2D Publishing
www.Descarta2D.com