author | A.M. Thurnherr <athurnherr@yahoo.com> |
Wed, 17 Jan 2018 12:19:54 -0500 | |
changeset 20 | 61b92f8fb463 |
parent 2 | ec6b10ba8a34 |
permissions | -rw-r--r-- |
2 | 1 |
%====================================================================== |
2 |
% I M A G N A N . M |
|
3 |
% doc: Fri Jan 6 11:31:23 2012 |
|
4 |
% dlm: Fri Jan 6 11:33:24 2012 |
|
5 |
% (c) 2012 A.M. Thurnherr |
|
6 |
% uE-Info: 10 48 NIL 0 0 72 0 2 8 NIL ofnI |
|
7 |
%====================================================================== |
|
8 |
||
9 |
% HISTORY: |
|
10 |
% Jan 6, 2012: - created for version IX_8gamma |
|
11 |
||
12 |
function I = imagnan(C) |
|
13 |
I = imag(C); |
|
14 |
I(find(isnan(real(C)))) = nan; |