iPOGO V5 Users Group - Help Manual

*Methodology*
Command:	62
Alpha Alias:	Area LineShift
Description:	Computes exact area of a figure by shifting trial line parallel or radially and prints results
Data Format:	62 Line-of-Division {Radius-Pt} ;
Problem:	Given the boundary of a tract of land defined by points numbered 1 through 9 and the trial location of a line of division numbered 10 and 11 separating Parcels One and Two. Relocate the line of division radial to point 2 to produce an area of exactly three acres for Parcel One.
Solution:	62 10 11 2 ;

Data Description

Command	62	Computes the exact area of a figure by shifting the trial line of division either parallel to its initial location or radially to a given curve center. Uses the area definition from the previously executed 61 or -61 command. Produces automatic printout of coordinates, bearings, distances, curve data and the area of the figure in the same format as the 7 command.
Line-of-Division	10, 11	Defines the trial line with two point numbers. The order in which you enter the two values is not significant.
{Radius-PT}	2	Optional point number of a previously computed curve center. Enter this value when you want to shift the trial line of division so that an extension of the line passes through this point. Note: If the line of division is to be shifted parallel to its initial location, this data item must be omitted, or else the line will be computed radial to the curve center.
End Command	;	All commands end with a semi-colon.

Example Command File

$ Example data file for 62 (Area LineShift) command

$ set known coordinates of outside boundary
  0 1 4885.752 4606.923
    5 4513.931 4888.633
    6 4547.858 4694.840
    7 4611.204 4479.838
    8 4737.959 4471.475
    9 4907.536 4509.325 ;

$ set curve radius point
  1 2 1 1 9 9e9 425 ES;

$ set point 4 on known bearing at 375' from point 5
  1 4 5 -1 50 15 22 375;

$ set point 3 on line from radius point 2 to point 4
  1 3 2 2 4 425;

$ set trial point 10 on curve with left delta angle
  2 10 2 2 1 -29 -50 -8 425;

$ define point 2 as a radius point
  14 2 1e9 1 2 0;

$ set trial point 11 on line from 5 to 4 at 100'
  1 11 5 5 4 100;

100 Total boundary;
   -7 1 1 2.1 10 2.1 3 4 11 5 -9 1;

100 Trial division line;
    7 1 10 11;

$ define trial boundary for 3 acres 
$   exact calculation
  61 -3     1 2.1 10 11 5 -9 1 ;    $ using acres
$ 61 130680 1 2.1 10 11 5 -9 1 ;    $ using sf

$ trial line defined for radial shift with the 62 command
  62 10 11 2 ;

$ define feature codes for plotting
  15.1 LOT1 LOT1 1 1 1;
  15.1 LOT2 LOT2 3 1 1;

$ Turn plot on
  91 ; 

$ define a repeating feature description
  15.2 "Closure Lot" ;

$ activate the LOT1 feature code
  15 LOT1 ;
     7,1 1 2.1 10 11 5 -9 1;

$ activate the LOT2 feature code
  15 LOT2 ;
     -7,2 10 2.1 3 4 11 10;

$ reset the repeating feature description
  15.2 "";

Help for this command was last updated: 06/28/2000 12:23:38 AM

iPOGO V5 Help Manual On-Line

Group:Command:

60) Special Areas62 or Area LineShift

Group:
Command:

60) Special Areas
62 or Area LineShift