MATLAB m-file translation

Question

I'm a MATLAB user trying to get excited about using HiQ. Thanks to the fact
that HiQ is free to MATLAB users, I spent my Christmas vacation trying to
port my existing MATLAB files into HiQ. HiQ has a nice feature that allows
me to import MATLAB m-files into HiQ scripts. HiQ also has an Object Browser
to the left of the screen called the Explorer Window. As HiQ scripts are
run, objects (scalars, matrices, etc) are added to the list as the script
creates them. By double clicking on the object name an object listing appears
in a window. Unfortunately the spreadsheet-like display format is 7 characters
wide while the default numeric format is 8 characters. The window column
widths can be changed to 8 characters wide, but it should not be necessary
to do.
If the user double clicks on a word and presses CTRL-F to activate the Find
Dialog, then the selected word should appear in the Find what: textbox like
MS Word.
Need to fix the "positioning objects" documentation in the Help file on how
to reposition objects in a notebook. Change "holding down the key"
to "holding down the key".
In the Help file Contents under HiQ-Script Reference for MATLAB Users the
word "comparison" is misspelled.
When there is a runtime error, a window opens with the suspect script and
you can make edits, but the line number that you are on does not show up
in the status bar.
The Find function does not always work. It seems to be a problem when you
check the "Match whole word only" checkbox.
Every time you change the contents of a script with a function used by another
script you need to Run or Compile it so that the calling script uses the
new version. No warning is given.
In the Help file under Function Syntax, the word "One" should be "Once".
I have had some problems with the translation of my MATLAB m-files to HiQ
scripts. The error message that I have not been able to understand is as
follows:
Script: _M2HiQ_
Error: Line 7004 - In "subrange", The matrix representing the righthand
side of the assignment is not the correct dimensions.
The subrange requires a 1 x 1 matrix while a 80001 x 1 matrix was provided.
Refer to subrange in the On-Line Help for more information.
The script _M2HiQ_ is not mine and must be something that HiQ imports during
the translation process. HiQ translates most of the MATLAB built-in function
calls to "M__" function calls. These function calls are not described in
the Help files, but appear to be replacements for the MATLAB function calls
without the "M__" in front. By the way, when you copy the above error message
into Microsoft Word 2000 you get a couple of grammar error indications.
The 80001 x 1 matrix referred to in the error message is the "t" matrix that
I create as a timebase. For some reason HiQ decides to pass it to a function
within the _M2HiQ_ script which expects a 1 x 1 matrix. The Log Window lists
the error trail that points to the line in the new HiQ script that causes
the error (line 268). The problem statement is:
timeShift(:,index) = time(:,index) - time(1,index)+ firstSymOffset/symbolRate(index);
Below is the complete MATLAB m-file:
function [y, lastSym, lastSymFrac, syms, nsyms] = MPAM( time, symbolRate,
mAry, symbolShift, firstSym)
%MPAM: M-ary PAM signal generation.
% HARRIS COPYRIGHT
% DESCRIPTION:
% Generate a random M-ary PAM signal sequence at the
% symbol rate.
% CALLING SYNTAX:
% [y, lastSym, lastSymFrac, syms, nsyms]= ...
% MPAM( time, symbolRate, mAry, ...
% symbolShift, firstSym)
% The first input variable is required; the other
% four are optional.
% INPUTS:
% time Time matrix in seconds each column
% represents a time vector. REQUIRED.
% symbolRate A row vector. Repetition rate in Hz.
% Each column value will be used for
% the corresponding column time vector.
% If one value is input, it will be used
% for all time vectors.
% DEFAULT= 1.
% mAry M-ary PAM. Number of symbols.
% The minimum M is 2. For 2-ary
% PSK use the 2-ary PAM function.
% DEFAULT= 2.
% symbolShift A row vector that represents the
% symbol shift occurs toward
% decreasing time. symbolShift=0.25
% means that 25% of a symbol will
% have transpired at zero seconds.
% Negative symbol shifts are legal.
% Each column value will be used for
% the corresponding column time vector.
% If one value is input, it will be used
% for all time vectors.
% DEFAULT= 0.
% firstSym A row vector. The voltage level of
% the first symbol. If one value is input,
% it will be used for all time vectors
% DEFAULT= determined randomly.
% OUTPUTS:
% y Matrix with same dimensions as time.
% lastSym Row vector with the voltage level of
% very last symbol transmitted for each
% column.
% lastSymFrac Row vector with the fraction of symbol
% period by which the last symbol was
% completed. Value of zero means
% none of the last symbol was
% transmitted.
% syms The transmit symbol matrix. Useful
% for adaptive filter training and
% bit-error-rate estimation. It
% has the same orientation as
% the time vector.
% nsyms Row vector consisting of the number
% of valid 'syms' in each column.
% EXAMPLES:
% (1) t= (0:1/16:1)';
% y= MPAM( t, 4);
% [t y]
% plot( t, y)
% (2) t= (-1.75:1/16:1)';
% y= MPAM( t, 2, 4);
% [t y]
% plot( t, y)
% REVISIONS:
% Mark Webster Dec. 5, 1992 Inception.
% Beth Findley Jan. 26, 1993 Added multiple
% channel/phase capabilities
% Process defaults and keyword information.
% Sacrifice file size for clarity.
if nargin == 1 % time matrix only.
symbolRate= 1.; % 1 Hz.
mAry= 2; % Bi-level.
symbolShift= 0.; % No shift.
firstSymF= 0; % Clear firstSym flag.
elseif nargin == 2 % time and symbolRate.
mAry= 2;
symbolShift= 0.;
firstSymF= 0;
elseif nargin == 3 % time, symbolRate and mAry.
symbolShift= 0.;
firstSymF= 0;
elseif nargin == 4 % time, symbolRate, mAry, symbolShift.
firstSymF= 0;
elseif nargin == 5 % Everything.
firstSymF = 1;
end
% Check mAry value.
if mAry < 2
text1= 'ERROR in MPAM: ';
text2= 'mAry must be greater than 1.';
error( [text1 text2]);
end
% Determine # samples.
[m,n]= size( time);
if m==1 % Time is a row vector.
nSamples= n;
time = time'; % Convert to column.
TimeRowF = 1; % Set flag.
n = m; % Set # columns = 1.
else % time has column orientation
TimeRowF = 0;
nSamples = m;
end
if nSamples < 2
text1= 'ERROR in MPAM: ';
text2= 'nSamples < 2.';
error( [text1 text2]);
end
% Generate symbolShift
% vector if is not
% correct size.
[u,v] = size(symbolShift);
if u==1 % symbolShift is a row vector
if v < n
for index = v+1:n
symbolShift(index) = symbolShift(v);
end
end
elseif v==1 % symbolShift is a column vector
if u < n
for index = u+1:n
symbolShift(index) = symbolShift(u);
end
end
else
text1= 'ERROR in MPAM: ';
text2= 'symbolShift must be a vector.';
error( [text1 text2]);
end
% Generate symbolRate
% vector if is not
% correct size.
[u,v] = size(symbolRate);
if u==1 % symbolRate is a row vector
if v < n
for index = v+1:n
symbolRate(index) = symbolRate(v);
end
end
elseif v==1 % symbolRate is a column vector
if u < n
for index = u+1:n
symbolRate(index) = symbolRate(u);
end
end
else
text1= 'ERROR in MPAM: ';
text2= 'symbolRate must be a vector.';
error( [text1 text2]);
end
% How many symbols are needed?
% Generate an upper bound.
for index = 1:n
nSymbols(index) = ceil( 1 + ( time(nSamples,index) - time(1,index))*symbolRate(index));
end
maxSymbols = max(nSymbols);
% Create random symbol matrix.
symbols = NaNmatrix(maxSymbols, n);
for index = 1:n
symbols(1:nSymbols(index),index)= 2*floor(mAry*rand(nSymbols(index),1))-
mAry + 1; % Offset correction.
end
% Overide first symbol?
if firstSymF == 1
[u,v] = size(firstSym);
if u==1 % firstSym is a row vector
if v < n
for index = v+1:n
firstSym(index) = firstSym(v);
end
end
elseif v==1 % firstSym is a column vector
if u < n
for index = u+1:n
firstSym(index) = firstSym(u);
end
end
else
text1= 'ERROR in MPAM: ';
text2= 'firstSym must be a vector.';
error( [text1 text2]);
end
% Overide first symbol.
for index = 1:n
symbols(1,index) = firstSym(index);
end
end
% Generate output information by column
% vectors (n = # columns).
syms = NaNmatrix(maxSymbols, n);
for index = 1:n
% Determine symbol offset for each
% column
firstSymOffset = rem( time(1)*symbolRate(index)+ symbolShift(index), 1);
if firstSymOffset < 0 % Prevent negative vector index.
firstSymOffset = firstSymOffset + 1;
end
% Generate time shift vector, and
% determine last symbol completion
% fraction.
timeShift(:,index) = time(:,index) - time(1,index)+ firstSymOffset/symbolRate(index);
a = timeShift(nSamples,index)*symbolRate(index);
lastSymFrac(index) = a - floor( a) + eps; % Required eps order?
% Generate M-ary PAM samples.
y(:,index)= symbols(floor(timeShift(:,index)*symbolRate(index)+ 1),index);
% Output the last symbol.
lastSym(index) = y(nSamples,index);
% Output symbol array?
if nargout>=4
nsyms(index)=floor(timeShift(nSamples,index)*symbolRate(index)+ 1);
syms(1:nsyms(index),index) = symbols(1:nsyms(index),index);
end
end
% Output 'y' as a row
% vector if time was
% a row vector.
if TimeRowF==1
y = y';
end

Answer 1

Let me clarify,
I have pasted my matlab code into the matlab scrip node.
In this code, I have called a subfunction that I have created.
Example
k(n)=k_c(T(n))
where
k_c is a subfunction I have created.
How do I get my code in the node to sucessfully read the subfunction k_c?