function order = triangle_ijk_order ( t, ijk )

%*****************************************************************************80
%
%% triangle_ijk_order() returns the order of an IJK in a triangle list.
%
%  Discussion:
%
%    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).
%
%    The order of a given ijk triangle is its location in the triangle list.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    11 November 2020
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    integer T(TN,3), the IJK parallelogram triangle coordinates of the 
%    triangles making up the polyiamond.  
%
%    integer IJK(3), the IJK parallelogram coordinates of a triangle.
%
%  Output:
%
%    integer ORDER: the row index of IJK in T.  
%    If IJK does not occur in T, then 0 is returned.
%
  [ lia, order ] = ismember ( ijk, t, 'rows' );

  return
end

