?? param_2dconv_e.m
字號:
function E= param_2dconv_E(Bml1, Bml2)% function E= param_2dconv_b2(Bml1, Bml2)% This file is part of the TFPM toolbox v1.0 (c)% michael.jachan@tuwien.ac.at and underlies the GPL.% % Generates the TBT matrix of E.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%if(0)% TEST TEST TEST TEST TEST TEST TEST TEST TEST TEST%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%clear;tfpm;MAR = 7;LAR = 5;MMA = 5;LMA = 3;N = 128;re_im= 'i';mo_no= 'n';tfpm_file_gen;%-------------beta= -1/2;Bml1= Aml;Bml2= Bml;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%end;% TEST TEST TEST TEST TEST TEST TEST TEST TEST TEST%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Dimensions:[M1, L1]= param_dim(Bml1);[M2, L2]= param_dim(Bml2);M= M1+M2;L= L1+L2;E= zeros((M+1)*(2*L+1), (M1+1)*(2*L1+1));% Compute B2for m= 0:M for l= -L:L for mp= 0:M1 for lp= -L1:L1 E((m*(2*L+1))+l+L+1, mp*(2*L1+1)+lp+L1+1)= param_get(Bml2, m-mp, l-lp); end; end; end;end;%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%if(0)% TEST TEST TEST TEST TEST TEST TEST TEST TEST TEST%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% Test E:norm(param_destack_ml(E*param_stack_ml(Bml1), M, L)-conv2(Bml1, Bml2))%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%end;% TEST TEST TEST TEST TEST TEST TEST TEST TEST TEST%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -