Differences From Artifact [7743bb793c]:

To Artifact [c4fc3a116e]:


11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

  if N<M
    error("A_v must have at least as many rows as columns");
  endif
  
  n = N/M;			# Number of matrix elements in A_v

  if round(n)<>n
    error("A_v must be a column vector of square matrices");
  endif
  
  A_m = [];
  for i = 1:n
    A_m = ppp_aug(A_m,ppp_extract(A_v,i));
  endfor







|







11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

  if N<M
    error("A_v must have at least as many rows as columns");
  endif
  
  n = N/M;			# Number of matrix elements in A_v

  if round(n)!=n
    error("A_v must be a column vector of square matrices");
  endif
  
  A_m = [];
  for i = 1:n
    A_m = ppp_aug(A_m,ppp_extract(A_v,i));
  endfor

MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]