;----------------------------------------------------------------- ; Adj.pro ; ; written by Andreas Reigber ;------------------------------------------------------------------ ; Calculates the adjoint (complex conjugate traspose) of an array ;------------------------------------------------------------------ ; This software has been released under the terms of the GNU Public ; license. See http://www.gnu.org/copyleft/gpl.html for details. ;------------------------------------------------------------------ function adj,arr return,transpose(conj(arr)) end