-63 11 10 ;

$ Example data file for -63 (-Area LineSwing) 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 11 10;

$ 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 to shift point 10 
$   with -63 command
  -63 11 10   ; 


$ 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 "";