~ubuntu-branches/ubuntu/hoary/scilab/hoary

« back to all changes in this revision

Viewing changes to macros/mtlb/mtlb_zeros.sci

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Werner
  • Date: 2005-01-09 22:58:21 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050109225821-473xr8vhgugxxx5j
Tags: 3.0-12
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
function r=mtlb_zeros(a)
2
2
// Copyright INRIA
3
 
if size(a)==[1 1] then
 
3
// Emulation function for zeros() Matlab function
 
4
// V.C.
 
5
 
 
6
if and(size(a)==[1 1]) then
4
7
  r=zeros(a,a)
5
8
else
6
 
  r=zeros(a(1),a(2))
 
9
  tmp=list()
 
10
  for k=1:size(a,"*")
 
11
    tmp(k)=a(k)
 
12
  end
 
13
  r=zeros(tmp(1:$))
7
14
end
 
15
endfunction