mirror of https://github.com/PentHertz/srsLTE.git
17 lines
453 B
Matlab
17 lines
453 B
Matlab
function [ out ] = write_c_struct_complex( filename, varname, x)
|
|
|
|
[tidin msg]=fopen(filename,'wt');
|
|
if (tidin==-1)
|
|
fprintf('error opening %s: %s\n',filename, msg);
|
|
out=[];
|
|
return
|
|
end
|
|
fprintf(tidin, 'float %s[%d]={%.9g,%.9g',varname,2*length(x),real(x(1)),imag(x(1)));
|
|
for i=2:length(x)
|
|
fprintf(tidin, ',\n %.9g,%.9g',real(x(i)),imag(x(i)));
|
|
end
|
|
fprintf(tidin, '};\n');
|
|
fclose(tidin);
|
|
end
|
|
|