diff --git a/MMatrixOfStructure.m b/MMatrixOfStructure.m
index 42ea45b..48bf652 100644
--- a/MMatrixOfStructure.m
+++ b/MMatrixOfStructure.m
@@ -1,5 +1,5 @@
 function [M, tetta2] = MMatrixOfStructure(tetta0, lambda, varargin)
-% return M matrix of structure
+%MMatrixOfStructure return M matrix of structure
 % tetta0 - angle of incident
 % lambda - wavelength
 % varargin: couples of refractive indexes and thiknesses of films
diff --git a/MReflectance.m b/MReflectance.m
index ad55a52..9b3b028 100644
--- a/MReflectance.m
+++ b/MReflectance.m
@@ -1,5 +1,10 @@
 function [M ,tetta2]= MReflectance(N1, N2, tetta1)
 %MReflectance return M matrix of border between 2 mediums
+% N1 - complex refractive index of first medium
+% N2- complex refractive index of second medium
+% tetta1 - angle of incident
+% tetta2 - angle of refraction
+% M - M-matrix
 [S, tetta2]  = SReflectance(N1, N2, tetta1);
 M = SMMatrixConverter(S);
 end
diff --git a/MTransmittance.m b/MTransmittance.m
index 52dd2b4..84b14cf 100644
--- a/MTransmittance.m
+++ b/MTransmittance.m
@@ -1,5 +1,9 @@
 function M = MTransmittance(N, d, lambda, tetta)
-% return S matrix of simple film
+%MTransmittance return S matrix of simple film
+% N - complex refractive index
+% d - thikness
+% lambda - wavelength
+% tetta - angle of propagation
 M = SMMatrixConverter(STransmittance(N, d, lambda, tetta));
 end
 
diff --git a/SMMatrixConverter.m b/SMMatrixConverter.m
index 3ea9487..4572338 100644
--- a/SMMatrixConverter.m
+++ b/SMMatrixConverter.m
@@ -1,5 +1,5 @@
 function B = SMMatrixConverter(A)
-% Convert S matrix to M matrix and M matrix to S matrix
+%SMMatrixConverter Convert S matrix to M matrix and M matrix to S matrix
 B = [A(1,1) * A(2,2) - A(2,1)* A(1,2), A(1,2); -A(2,1), 1] / A(2,2);
 end
 
diff --git a/SMatrixOfStructure.m b/SMatrixOfStructure.m
index bac2572..1f1b861 100644
--- a/SMatrixOfStructure.m
+++ b/SMatrixOfStructure.m
@@ -1,5 +1,5 @@
 function [S, tetta2] = SMatrixOfStructure(tetta0, lambda, varargin)
-% return S matrix of structure
+%SMatrixOfStructure return S matrix of structure
 % tetta0 - angle of incident
 % lambda - wavelength
 % varargin: couples of refractive indexes and thiknesses of films
diff --git a/SReflectance.m b/SReflectance.m
index ce2b012..a82c9c3 100644
--- a/SReflectance.m
+++ b/SReflectance.m
@@ -1,5 +1,10 @@
 function [S, tetta2]  = SReflectance(N1, N2, tetta1)
-% return S matrix of border between 2 mediums
+%SReflectance return S matrix of border between 2 mediums
+% N1 - complex refractive index of first medium
+% N2- complex refractive index of second medium
+% tetta1 - angle of incident
+% S - s-matrix
+% tetta2 - angle of refraction
 Tetta1 = @(n0, n1, tetta0)...
     asin(real(n0) ./ real(n1) * sin(tetta0)); % Snell's law
 
diff --git a/STransmittance.m b/STransmittance.m
index a936c8a..7fbff07 100644
--- a/STransmittance.m
+++ b/STransmittance.m
@@ -1,5 +1,5 @@
 function S = STransmittance(N, d, lambda, tetta)
-%STransmittance return S matrix of simple film
+%STransmittance return S matrix of transmittance of simple film
 %N - complex rafractive index
 %d  - thickness
 %lambda - wavelength