function [Pt2,Tt2,m2]=kanal_przep(Pt1,Tt1,m1,s_kp)
  
%OPIS DOROBIĆ
%

Tt2=Tt1;
Pt2=Pt1*s_kp;
m2=m1;
end