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

« back to all changes in this revision

Viewing changes to routines/scicos/sinblk.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
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
9
9
      integer nipar,nu,ny
10
10
 
11
11
c
12
 
      common /dbcos/ idb
13
 
c
14
 
      if(idb.eq.1) then
15
 
         write(6,'(''Sinblk     t='',e10.3,'' flag='',i1)') t,flag
16
 
      endif
17
12
c     
18
13
      do 15 i=1,nu
19
14
         y(i)=sin(u(i))