diff --git a/StructFieldCat.m b/StructFieldCat.m
new file mode 100644
index 0000000000000000000000000000000000000000..a2ba43e596b3ad1796d25b3b441b2140e36931c6
--- /dev/null
+++ b/StructFieldCat.m
@@ -0,0 +1,12 @@
+function S = StructFieldCat(S, T, dim)
+if nargin<3 || isempty(dim)
+    dim=1;
+end
+for i=1:size(T,2)
+    fields = fieldnames(S);
+    for k = 1:numel(fields)
+        aField     = fields{k}; % EDIT: changed to {}
+        
+        S.(aField) = cat(dim, S.(aField), T(i).(aField));
+    end
+end
\ No newline at end of file