diff options
author | Francois Delebecque <Francois.Delebecque@inria.fr> | 2004-09-23 12:43:03 +0000 |
---|---|---|
committer | Francois Delebecque <Francois.Delebecque@inria.fr> | 2004-09-23 12:43:03 +0000 |
commit | 67a5b5327624c912a40eb96b0c3d4c00f7bf5957 (patch) | |
tree | 333dc0a7cf5e0740fcca84b50f658b48ca4b714a /scilab_doc | |
parent | bb9c215b0841f621c3d032eefbce828db8c3c4aa (diff) | |
download | scilab-67a5b5327624c912a40eb96b0c3d4c00f7bf5957.zip scilab-67a5b5327624c912a40eb96b0c3d4c00f7bf5957.tar.gz |
rm
Diffstat (limited to 'scilab_doc')
-rwxr-xr-x | scilab_doc/intro/diary/d8.1.code | 5 | ||||
-rwxr-xr-x | scilab_doc/intro/fort/Makefile | 18 | ||||
-rwxr-xr-x | scilab_doc/intro/fort/fibb.f | 16 |
3 files changed, 0 insertions, 39 deletions
diff --git a/scilab_doc/intro/diary/d8.1.code b/scilab_doc/intro/diary/d8.1.code deleted file mode 100755 index 7a18922..0000000 --- a/scilab_doc/intro/diary/d8.1.code +++ /dev/null | |||
@@ -1,5 +0,0 @@ | |||
1 | host("cd ../fort; make fibb.o"); | ||
2 | link('../fort/fibb.o','fibb') | ||
3 | n=6 | ||
4 | fn=fort('fibb',n,2,'i','sort',[1,1],1,'r') | ||
5 | host("cd ../fort; rm fibb.o"); | ||
diff --git a/scilab_doc/intro/fort/Makefile b/scilab_doc/intro/fort/Makefile deleted file mode 100755 index 1efe1a4..0000000 --- a/scilab_doc/intro/fort/Makefile +++ /dev/null | |||
@@ -1,18 +0,0 @@ | |||
1 | SHELL = /bin/sh | ||
2 | |||
3 | #include ../../../Path.incl | ||
4 | #include ../../../Version.incl | ||
5 | include ../../../Makefile.incl | ||
6 | |||
7 | OBJS = /tmp/fibb.o | ||
8 | |||
9 | all:: $(OBJS) | ||
10 | |||
11 | /tmp/fibb.o: fibb.f | ||
12 | $(FC) $(FFLAGS) -c fibb.f -o /tmp/fibb.o | ||
13 | |||
14 | clean:: | ||
15 | $(RM) /tmp/fibb.o | ||
16 | distclean:: | ||
17 | $(RM) /tmp/fibb.o | ||
18 | |||
diff --git a/scilab_doc/intro/fort/fibb.f b/scilab_doc/intro/fort/fibb.f deleted file mode 100755 index fa6d671..0000000 --- a/scilab_doc/intro/fort/fibb.f +++ /dev/null | |||
@@ -1,16 +0,0 @@ | |||
1 | subroutine fibb(fn,n) | ||
2 | |||
3 | c Copyright INRIA | ||
4 | n0=0 | ||
5 | n1=1 | ||
6 | if(n.ge.3)then | ||
7 | do 10 k=1,n-2 | ||
8 | fn=n0+n1 | ||
9 | n0=n1 | ||
10 | n1=fn | ||
11 | 10 continue | ||
12 | else | ||
13 | fn=n-1 | ||
14 | endif | ||
15 | return | ||
16 | end | ||