/*

    ......... 2015 Ivan Mahonin

    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 3 of the License, or

    (at your option) any later version.

    This program is distributed in the hope that it will be useful,

    but WITHOUT ANY WARRANTY; without even the implied warranty of

    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License

    along with this program.  If not, see <http://www.gnu.org/licenses/>.

*/

{

	name:

		(Two squares)

	a:

		(  ( ((0, 0), (200, 0), (200, 200), (0, 200)) )  )

	b:

		((((100, 100), (300, 100), (300, 300), (100, 300))))

	add:

		((((0, 0), (200, 0), (200, 100), (300, 100), (300, 300), (100, 300), (100, 200), (0, 200))))

	subtract:

		((((0, 0), (200, 0), (200, 100), (100, 100), (100, 200), (0, 200))))

	intersection:

		((((100, 100), (200, 100), (200, 200), (100, 200))))

	xor:

		( (((0, 0), (200, 0), (200, 100), (100, 100), (100, 200), (0, 200))),

	  	  (((200, 200), (200, 100), (300, 100), (300, 300), (100, 300), (100, 200))) )

}

{

	name:

		(Self touch)

	a:

		((( (100, 100), (200, 0), (400, 0), (400, 300), (0, 300), (0, 200),

		    (100, 100), (100, 200), (200, 200), (200, 100) )))

	b:

		( (( (100, 0), (200, 0), (200, 300), (100, 300) )),

		  (( (250, 100), (350, 100), (350, 200), (250, 200) )) )

	add:

		((( (100, 100), (100, 0), (400, 0), (400, 300), (0, 300), (0, 200) )))

	subtract:

		( ( ( (100, 100), (100, 300), (0, 300), (0, 200) ) ),

		  ( ( (200, 0), (400, 0), (400, 300), (200, 300) ),

		    ( (250, 100), (250, 200), (350, 200), (350, 100) ) ) )

	intersection:

		( (( (100, 100), (200, 0), (200, 100) )),

		  (( (100, 200), (200, 200), (200, 300), (100, 300) )),

		  (( (250, 100), (350, 100), (350, 200), (250, 200) )) )

	xor:

		( ( ( (100, 0), (200, 0), (100, 100) ) ),

		  ( ( (100, 100), (200, 100), (200, 0), (400, 0), (400, 300), (200, 300), (200, 200), (100, 200), (100, 300), (0, 300), (0, 200) ),

		    ( (250, 100), (250, 200), (350, 200), (350, 100) ) ) )

}

{

	name:

		(Bad contours - cross)

	badA:

		((( (0, 0), (0, 100), (200, 0), (200, 100) )))

	a:

		( (( (0, 0), (100, 50), (0, 100) )),

		  (( (200, 0), (200, 100), (100, 50) )) )

}

{

	name:

		(Bad contours - hole)

	badA:

		( (( (0, 0), (300, 0), (300, 300), (0, 300) )),

		  (( (100, 100), (200, 100), (200, 200), (100, 200) )) )

	a:

		(( ( (0, 0), (300, 0), (300, 300), (0, 300) ),

		   ( (100, 100), (100, 200), (200, 200), (200, 100) ) ))

}