function [u] = uinlet(y)

condif_params;

if (y > h),
  u = Uhot;
elseif (y > 0),
  u = Ucool;
elseif (y < -tw),
  u = Ucool;
else,
  u = 0.0;
end