function a = sin_exp2 ( m, n )
%% sin_exp2.m
  u = zeros ( m, 1 );
  for i = 1 : m
    u(i) = sin ( i * pi / m );
  end
  v = zeros ( n, 1 );
  for j = 1 : n
    v(j) = exp ( j * pi / n );
  end
  for i = 1 : m
    for j = 1 : n
      a(i,j) = u(i) * v(j);
    end
  end
  return
end
