19 December  2023  10:16:28.047 PM      
 
sparse_display_test():
  Fortran77 version
  Test sparse_display().
 
TEST01
  SPY_GE generates a sparsity plot for a matrix stored
  in general (GE) format.
 
  Created sparsity data file "wathen_ge_data.txt".
  Created graphics command file "wathen_ge_commands.txt".
 
TEST02
  SPY_FILE generates a sparsity plot for a matrix for
  which there exists a file containing all the pairs
  (I,J) corresponding to nonzero entries.
  Created graphics command file "before_commands.txt".
  Created graphics command file "after_commands.txt".
 
TEST03
  SPY_GE generates a sparsity plot for a matrix stored
  in general (GE) format.
  To orient ourselves, generate an upper triangular matrix.
 
  Created sparsity data file "20x30_data.txt".
  Created graphics command file "20x30_commands.txt".
 
sparse_display_test():
  Normal end of execution.
 
19 December  2023  10:16:28.057 PM