Overview
Comment:More sanity checks
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: cecb9f2c69a18e91f8798f3c89fe3cdf696cee9dcfc7cf5599ee860f7a16a880
User & Date: gawthrop@users.sourceforge.net on 2003-08-19 16:20:33
Other Links: branch diff | manifest | tags
Context
2003-08-19
16:21:58
Added ; to prevent output check-in: aefed16f8f user: gawthrop@users.sourceforge.net tags: origin/master, trunk
16:20:33
More sanity checks check-in: cecb9f2c69 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
16:19:53
Covenverst U* to a c-header file check-in: 0bc57f4c26 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/lib/control/PPP/ppp_ystar.m from [d942259424] to [3f67f08f6f].

41
42
43
44
45
46
47





48
49
50
51
52
53
54
  if n_u>0
    if n_u!=length(U)/n_U
      error("U must be a column vector with n_u*n_U components");
    endif
  else
    n_u = length(U)/n_U;	# Deduce n_u from U if no system
  endif





  

  [n,m]=size(tau);
  if (n != 1 )
    error("tau must be a row vector of times");
  endif
  







>
>
>
>
>







41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
  if n_u>0
    if n_u!=length(U)/n_U
      error("U must be a column vector with n_u*n_U components");
    endif
  else
    n_u = length(U)/n_U;	# Deduce n_u from U if no system
  endif
  
  [n_x0,m_x0] = size(x_0);
  if n_x0<>n_x
    error(sprintf("x_0 must be a column with length %i", n_x));
  endif
  

  [n,m]=size(tau);
  if (n != 1 )
    error("tau must be a row vector of times");
  endif
  


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