>long</span> <span class="string">g</span>
</pre><p>Calculate SVD using ZGESVD:</p><pre class="codeinput">[U,S,V,err] = svd_lapack(A,[],<span class="string">'gesvd'</span>)
</pre><pre class="codeoutput">
U =

  Columns 1 through 3

         0.707106781186547     -2.77555756156289e-17         0.707106781186547
         0.707106781186547      2.77555756156289e-17        -0.707106781186547
                         0                         1      3.92523114670944e-17
                         0      6.162975822