/************************************************************
FileName: im_array_mul.cpp
Author: Version : 1.0.0 Date:2012.6.15
Description: 给出一虚数列向量,与其转置向量相乘后,求出各元模值,存入
Rxy矩阵。
Version: 1.0.0
Function List:
1. -------
Historline:
<author> <time> <version > <desc>
David 12/06/15 1.0 build this moudle
***********************************************************/
#include<stdio.h>
#include<math.h>
#include <stdlib.h>
#define length 16/*定义虚数向量维数*/
/**********************************************************
Function: *im_array_mul
Description:
Input:R[length][2] 虚数列向量(逻辑上的列向量)
Output:Rxy[length][length] 虚数列向量与其转置向量相乘后,所得
矩阵元值求模,得到该矩阵。
Calls:
Called Bline:
Return:*Rxy 返回指针,指针指向Rxy[length][length]首元素
Others:
***********************************************************/
float *im_array_mul(float R[length][2])/*二维数组表征复数向量,其中R[length][0]存放实部,R[length][1]存放虚部*/
{
int i,j;/*局部循环变量*/
float Rxy[length][length];/*R[][]矩阵存放复值相乘后的模*/
for(i=0;i<length;i++)
{
for(j=0;j<length;j++)
{
Rxy[i][j]=(float)sqrt((double)((R[i][0]*R[j][0]-R[i][1]*R[j][1])*(R[i][0]*R[j][0]-R[i][1]*R[j][1])+
(R[i][1]*R[j][0]+R[i][0]*R[j][1])*(R[i][1]*R[j][0]+R[i][0]*R[j][1])));
}
}
return *Rxy;/*模值矩阵头元素指针*/
}