t_warper.cpp

Go to the documentation of this file.

/*****************************************************************************\
*                                                                             *
*  Name   : test_rectangle_warper                                             *
*  Author : Chris Koeritz                                                     *
*                                                                             *
*  Purpose:                                                                   *
*                                                                             *
*    Tests the rectangle warper class.                                        *
*                                                                             *
*******************************************************************************
* Copyright (c) 1993-$now By Author.  This program is free software; you can  *
* redistribute it and/or modify it under the terms of the GNU General Public  *
* License as published by the Free Software Foundation; either version 2 of   *
* the License or (at your option) any later version.  This is online at:      *
*     http://www.fsf.org/copyleft/gpl.html                                    *
* Please send any updates to: fred@gruntose.com                               *
\*****************************************************************************/

#include <basis/function.h>
#include <basis/guards.h>
#include <geometric/warper.cpp>
#include <data_struct/static_memory_gremlin.h>

#include <stdio.h>

HOOPLE_STARTUP_CODE;

using namespace geometric;

int main(int formal(argc), char *formal(argv)[])
{
  rectangle<double> inner(-20, 0, -60, 30);
  rectangle<double> outer(20, 30, 0, 0);
  rectangle_warper<double> ito(inner, outer, rectangle_warper<double>::TOP_LEFT,
      rectangle_warper<double>::BOTTOM_RIGHT);
//LOG(istring("inner to outer warper is: " + ito.text_form()));

  rectangle<double> warped_inner(ito.to_system_2(inner));
//LOG(istring("warped inner becomes ") + warped_inner.text_form());
  rectangle<double> warped_outer(ito.to_system_1(outer));
//LOG(istring(" and outer becomes ") + warped_outer.text_form());
  if ( (warped_inner != outer) || (warped_outer != inner) )
    deadly_error("t_rectangle_warper", "main",
        "systems do not warp to each other correctly");

  point<double> in_center(inner.center());
  point<double> warp_in_center(ito.to_system_2(in_center));
  point<double> out_center(outer.center());
  point<double> warp_out_center(ito.to_system_1(out_center));
  if ( (warp_out_center != inner.center())
      || (warp_in_center != outer.center()) )
    deadly_error("t_rectangle_warper", "main",
        "centers do not warp to each other");
  printf("rectangle_warper:: works for those functions tested.\n");
  return 0;
}

---