Script started on Wed Sep 20 16:50:10 2000
[phys410@vnfe1 ex2]$ cat Makefile

.IGNORE:

F77_COMPILE  = $(F77) $(F77FLAGS) $(F77CFLAGS)
F77_LOAD     = $(F77) $(F77FLAGS) $(F77LFLAGS)

.f.o:
	$(F77_COMPILE) $*.f

EXECUTABLES = fdemo1 

all: $(EXECUTABLES)

fdemo1: fdemo1.o
	$(F77_LOAD) fdemo1.o -o fdemo1

clean:
	rm *.o
	rm $(EXECUTABLES)
[phys410@vnfe1 ex2]$ env | grep F77

RNPL_F77=f77 -O2
RNPL_F77LOAD=f77 -O2 -L/home/matt/lib
RNPL_F77PP=touch
F77FLAGS=-g
F77=f77
F77CFLAGS=-c
F77LFLAGS=-L/usr/local/lib
F77PP=f77pp
F77_TRANSFORM=f77pp
[phys410@vnfe1 ex2]$ make

f77 -g -c fdemo1.f
f77 -g -L/usr/local/lib fdemo1.o -o fdemo1
[phys410@vnfe1 ex2]$ head -10 INPUT

q
q
q
q
q
q
q
q
q
q
[phys410@vnfe1 ex2]$ fdemo1 < INPUT

 a =   0.025 b =  -1.234E-16
  c =   1. i =  3000 switch =  T
 Through scalar assignment
 Enter any non-blank character & enter to continue
 res1 =   5. res2 =   13.
  res3 =   3.60555128
 Through real*8 arithmetic expressions
 Enter any non-blank character & enter to continue
 ires1 =  5 ires2 =  0
 ires3 =  512 ires4 =  64
 Through integer arithmetic expressions
 Enter any non-blank character & enter to continue
 res1 =   5. res2 =   0.
  res3 =   0.75
 Through mixed-mode arithmetic
 Enter any non-blank character & enter to continue
 Loop 1: i =  1
 Loop 1: i =  2
 Loop 1: i =  3
 Through loop 1
 Enter any non-blank character & enter to continue
 Loop 2: i =  1
 Loop 2: i =  2
 Loop 2: i =  3
 Through loop 2
 Enter any non-blank character & enter to continue
 Loop 3: i =  1
 Loop 3: i =  3
 Loop 3: i =  5
 Loop 3: i =  7
 Through loop 3
 Enter any non-blank character & enter to continue
 Loop 4: i =  3
 Loop 4: i =  2
 Loop 4: i =  1
 Through loop 4
 Enter any non-blank character & enter to continue
 Loop 5: i, j =  1 1
 Loop 5: i, j =  1 2
 Loop 5: i, j =  2 1
 Loop 5: i, j =  2 2
 Loop 5: i, j =  3 1
 Loop 5: i, j =  3 2
 Through loop 5
 Enter any non-blank character & enter to continue
 Loop 6: i =  2
 Loop 6: i =  4
 Loop 6: i =  6
 Through loop 6
 Enter any non-blank character & enter to continue
 lres1 =  T lres2 =  T lres3 =  F
 Through basic conditionals
 Enter any non-blank character & enter to continue
  25. >   12.
 Through if 1
 Enter any non-blank character & enter to continue
  25. >   12.
 Through if 2
 Enter any non-blank character & enter to continue
  25. >   24.
 Through nested if
 Enter any non-blank character & enter to continue
 Case 1
 Case 2
 Case 3
 Default case
 Through case via if
 Enter any non-blank character & enter to continue
 Do while loop: b =   0.
 Do while loop: b =   0.1
 Do while loop: b =   0.2
 Do while loop: b =   0.3
 Do while loop: b =   0.4
 Do while loop: b =   0.5
 Do while loop: b =   0.6
 Do while loop: b =   0.7
 Do while loop: b =   0.8
 Do while loop: b =   0.9
 Do while loop: b =   1.
 Through while loop
 Enter any non-blank character & enter to continue
 res1 =   0.809016994 res2 =   0.587785252
 res3 =   1. res4 =   1.
 Through built-in fcn 1
 Enter any non-blank character & enter to continue
 res1 =   0.785398163
 Through built-in fcn 2
 Enter any non-blank character & enter to continue
 min(3.0d0,2.0d0) =   2.
 min(1,-3,5,0) =  -3
 Through built-in fcn 3
 Enter any non-blank character & enter to continue
 i =  0
 i =  100
 i =  200
 i =  300
 i =  400
 i =  500
 i =  600
 i =  700
 i =  800
 i =  900
 i =  1000
 Through built-in fcn 4
 Enter any non-blank character & enter to continue
 Through fdemo1
 Enter any non-blank character & enter to continue
[phys410@vnfe1 ex2]$ exit

exit

Script done on Wed Sep 20 16:50:30 2000