Renamed pargen sample.

README

@@ -29,8 +29,8 @@ The library has been tested on an IBM SP5, with XLC and XLF
 version 10.1 and the IBM ESSL/PESSL versions of the BLAS and the
 BLACS. 
 The  setting 
- F90=xlf90 -qsuffix=f=f90
+F90=xlf95 -qsuffix=f=f90:cpp=F90
-in Make.inc.sp5 takes care of the f90 extension. 
+in Make.inc.sp5 takes care of the f90/F90 extensions. 
 
 
 UTILITIES
@@ -41,7 +41,7 @@ Harwell-Boeing and MatrixMarket file formats.
 DOCUMENTATION
 
 See userguide.pdf 
-Please consult the sample programs, especially test/pargen/ppde90.f90. 
+Please consult the sample programs, especially test/pargen/ppde.f90. 
 
 
 OTHER SOFTWARE CREDITS 

test/pargen/Makefile

@@ -15,22 +15,16 @@ FINCLUDES=$(FMFLAG)$(LIBDIR) $(FMFLAG).
 EXEDIR=./runs
 
 
-ppde90: ppde90.o  
+ppde: ppde.o  
-	$(F90LINK) ppde90.o  -o ppde90 $(PSBLAS_LIB) $(LDLIBS)
+	$(F90LINK) ppde.o  -o ppde $(PSBLAS_LIB) $(LDLIBS)
-	/bin/mv ppde90 $(EXEDIR)
+	/bin/mv ppde $(EXEDIR)
-
-
-thsrt: thsrt.o  
-	$(F90LINK) thsrt.o  -o thsrt $(PSBLAS_LIB) $(LDLIBS)
-	/bin/mv thsrt $(EXEDIR)
-
 
 .f90.o:
 	$(MPF90) $(F90COPT) $(FINCLUDES) $(FDEFINES) -c $<
 
 
 clean: 
-	/bin/rm -f ppde90.o   $(EXEDIR)/ppde90 
+	/bin/rm -f ppde.o   $(EXEDIR)/ppde 
 verycleanlib: 
 	(cd ../..; make veryclean)
 lib:

test/pargen/ppde.f90

@@ -28,9 +28,9 @@
 !!$  POSSIBILITY OF SUCH DAMAGE.
 !!$ 
 !!$  
-! File: ppde90.f90
+! File: ppde.f90
 !
-! Program: ppde90
+! Program: ppde
 ! This sample program shows how to build and solve a sparse linear
 !
 ! The program  solves a linear system based on the partial differential
@@ -70,7 +70,7 @@
 !
 !   u(x,y) = rhs(x,y)
 !
-program pde90
+program ppde
   use psb_base_mod
   use psb_prec_mod
   use psb_krylov_mod
@@ -622,7 +622,7 @@ contains
     end if
     return
   end subroutine create_matrix
-end program pde90
+end program ppde
 !
 ! functions parametrizing the differential equation 
 !