--- a/extra/nurbs/inst/nrbpermute.m	Mon Sep 01 15:36:45 2014 +0000
+++ b/extra/nurbs/inst/nrbpermute.m	Mon Sep 01 16:15:19 2014 +0000
@@ -54,4 +54,19 @@
 %! vol.coefs(1,:,:) = vol.coefs(1,:,:) + 2;
 %! vol = nrbpermute(vol,[2 3 1]);
 %! nrbplot(vol,[5 10 20]);
-%! hold off
\ No newline at end of file
+%! hold off
+
+%!test
+%! vol = nrbrevolve (nrb4surf ([1 0], [2 0], [1 1], [2 1]), [0 0 0], [0 1 0], pi/8);
+%! perm1 = [1 3 2];
+%! perm2 = [2 1 3];
+%! vol2 = nrbpermute (vol, perm1);
+%! vol3 = nrbpermute (vol, perm2);
+%! assert (vol.number(perm1), vol2.number)
+%! assert (vol.order(perm1), vol2.order)
+%! assert ({vol.knots{perm1}}, vol2.knots)
+%! assert (permute(vol.coefs, [1, perm1+1]), vol2.coefs)
+%! assert (vol.number(perm2), vol3.number)
+%! assert (vol.order(perm2), vol3.order)
+%! assert ({vol.knots{perm2}}, vol3.knots)
+%! assert (permute(vol.coefs, [1, perm2+1]), vol3.coefs)

--- a/extra/nurbs/inst/nrbreverse.m	Mon Sep 01 15:36:45 2014 +0000
+++ b/extra/nurbs/inst/nrbreverse.m	Mon Sep 01 16:15:19 2014 +0000
@@ -78,4 +78,23 @@
 %! hold on
 %! nrbplot(crv2,100)
 %! title('The curve and its reverse are the same')
-%! hold off
\ No newline at end of file
+%! hold off
+
+%!test
+%! srf  = nrbrevolve(nrbline([1 0],[2 0]), [0 0 0], [0 0 1], pi/2);
+%! srf  = nrbkntins (srf, {0.3, 0.6});
+%! srf2 = nrbreverse (srf);
+%! assert (srf.knots, cellfun(@(x) sort(1-x), srf2.knots, 'UniformOutput', false), 1e-15)
+%! assert (srf.coefs, srf2.coefs(:,end:-1:1,end:-1:1))
+
+%!test
+%! srf  = nrbrevolve(nrbline([1 0],[2 0]), [0 0 0], [0 0 1], pi/2);
+%! srf  = nrbkntins (srf, {0.3, 0.6});
+%! srf2 = nrbreverse (srf, 1);
+%! knt{1} = sort(1-srf2.knots{1}); knt{2} = srf2.knots{2};
+%! assert (srf.knots, knt, 1e-15)
+%! assert (srf.coefs, srf2.coefs(:,end:-1:1,:))
+%! srf2 = nrbreverse (srf, 2);
+%! knt{1} = srf2.knots{1}; knt{2} = sort(1-srf2.knots{2});
+%! assert (srf.knots, knt, 1e-15)
+%! assert (srf.coefs, srf2.coefs(:,:,end:-1:1))

--- a/extra/nurbs/inst/nrbtransp.m	Mon Sep 01 15:36:45 2014 +0000
+++ b/extra/nurbs/inst/nrbtransp.m	Mon Sep 01 16:15:19 2014 +0000
@@ -52,4 +52,12 @@
 %! srf.coefs(3,:,:) = srf.coefs(3,:,:) + 10;
 %! srf = nrbtransp(srf);
 %! nrbplot(srf,[20 5]);
-%! hold off
\ No newline at end of file
+%! hold off
+
+%!test
+%! srf  = nrbrevolve(nrbline([1 0],[2 0]), [0 0 0], [0 0 1], pi/2);
+%! srft = nrbtransp(srf);
+%! assert (srf.number, fliplr(srft.number));
+%! assert (srf.order, fliplr(srft.order));
+%! assert (srf.knots, fliplr(srft.knots));
+%! assert (srf.coefs, permute(srft.coefs, [1 3 2]));
\ No newline at end of file