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

« back to all changes in this revision

Viewing changes to macros/m2sci/sci_maxi.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
 
function [stk,txt,top]=sci_maxi()
2
 
// Copyright INRIA
3
 
txt=[]
4
 
if rhs==1 then
5
 
  if stk(top)(3)=='1'|stk(top)(4)=='1' then
6
 
    r=list('max('+stk(top)(1)+')','0','1','1','1')
7
 
  else
8
 
    r=list('mtlb_max('+stk(top)(1)+')','0','?','?','1')
9
 
  end
10
 
else
11
 
  r=list('max('+stk(top-1)(1)+','+stk(top)(1)+')','0','?','?','1')
12
 
end
13
 
 
14
 
if lhs==1 then
15
 
  stk=r
16
 
else
17
 
  r(2)='-1'
18
 
  stk=list(r,r)
19
 
end
20