LS_DFT.m
上传用户:look542
上传日期:2009-06-04
资源大小:784k
文件大小:1k
源码类别:

传真(Fax)编程

开发平台:

Matlab

  1. function [H]=LS_DFT(N_subc,H,L_delay) 
  2. time_domain =  ifft(fftshift(H,1)) * sqrt(N_subc);
  3.         
  4.         % 保留一段时域样点
  5.          
  6.             leakage = 0;       % 能量泄漏的子载波数
  7.             % 保留时域能量集中的L_delay个样点
  8.             time_cut( 1: L_delay,: ,:) = time_domain( 1: L_delay,:,: );
  9.             % 保留能量泄漏的leakage个样点
  10.             time_cut( N_subc - leakage : N_subc,: ,:) = time_domain( N_subc - leakage : N_subc,: ,:);
  11.             
  12.   
  13.         % 变换到频域
  14.         H = fftshift(fft(time_cut) * 1/sqrt(N_subc),1);
  15.