← Back to branch summary

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

« back to all changes in this revision

Viewing changes to routines/calelm/ddpow1.f

  • 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
http://bugs.debian.org/255869
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
routines/calelm/ddpow1.f
27
27
c Serge Steer INRIA 1996
28
28
c!
29
29
c     Copyright INRIA
30
 
      integer n,iv,ierr
 
30
      integer n,iv,ierr,ierr1
31
31
      double precision v(*),p(*),rr(*),ri(*)
32
32
c
33
33
      ierr=0
38
38
      iip=1
39
39
      iir=1
40
40
      do 20 i=1,n
41
 
         call ddpowe(v(ii),p(iip),rr(iir),ri(iir),ierr,isc)
 
41
         call ddpowe(v(ii),p(iip),rr(iir),ri(iir),ierr1,isc)
 
42
         ierr=max(ierr,ierr1)
42
43
c         if(ierr.ne.0) return
43
44
         iscmpl=max(iscmpl,isc)
44
45
         ii=ii+iv