f_func.m

Hierarchical－QAM的程序

function [eval] = F_func(snr, arg)

%%% This function evaluates the PAWULA F(.) function
%global ALPHA;
alpha_cons = -1*sin(arg)*sin(arg)*snr;
my_func=inline( 'exp(alpha_cons./(sin(x).*sin(x)))' );
eval = -sign(arg)*my_integrate( my_func,0.0000001, pi-abs(arg), alpha_cons)/(6.2832);