function t = triangle_gort ( )

%*****************************************************************************80
%
%% triangle_gort() describes the gort polyiamond using ijk triangles.
%
%  Discussion:
%
%    5           x x x x-x x
%                 /|  / /
%    4         x-x x x x x
%             /    |/ /
%    3       x-x x x x x
%              |    /
%    2     x x x x x x
%             /    |
%    1   x-x-x x x x
%       /         /
%    0 x-x-x-x-x-x
%
%      0 1 2 3 4 5
%
%    The triangle list is a list of the IJK parallelogram triangles
%    that constitute the polyiamond.
%    If k = 0, the "ijk" triangle has vertices
%      (i-1,j-1), (i,j-1), (i-1,j).
%    If k = 1, the "ijk" triangle has vertices
%      (i,j), (i-1,j), (i,j-1).
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    05 November 2010
%
%  Author:
%
%    John Burkardt
%
%  Output:
%
%    integer T(TN,3): a matrix that describes the shape.
%
  t = [ ... 
    1, 1, 0; ...
    1, 1, 1; ...
    2, 1, 0; ...
    2, 1, 1; ...
    3, 1, 0; ...
    3, 1, 1; ...
    4, 1, 0; ...
    4, 1, 1; ...
    5, 1, 0; ...
    5, 1, 1; ...
    3, 2, 0; ...
    3, 2, 1; ...
    4, 2, 0; ...
    4, 2, 1; ...
    5, 2, 0; ...
    2, 3, 1; ...
    3, 3, 0; ...
    3, 3, 1; ...
    4, 3, 0; ...
    4, 3, 1; ...
    1, 4, 0; ...
    1, 4, 1; ...
    2, 4, 0; ...
    2, 4, 1; ...
    3, 4, 0; ...
    4, 4, 0; ...
    4, 4, 1; ...
    2, 5, 0; ...
    4, 5, 0; ...
    4, 5, 1 ];

  return
end

