Commit d36bddda authored by Andreas Marek's avatar Andreas Marek

Apply patch for test program qr_decomposition

Michael Bankd (debian) provided a patch, which allows
to run the qr-decomposition test programs with smaller matrices, and
thus allows testing in reasonable time on limited hardware (e.g. arm
devices)

In order to make the patch work, also Makefile.am was updated
parent 716b7f7f
......@@ -316,11 +316,10 @@ TESTS = $(check_SCRIPTS)
echo '$(wrapper)./$^ $$TEST_FLAGS' > $@
chmod +x $@
# this one does not want any arguments
elpa2_test_real_default_kernel_qr_decomposition@SUFFIX@.sh:
echo '$(wrapper)./elpa2_test_real_default_kernel_qr_decomposition@SUFFIX@' > $@
chmod +x $@
## this one does not want any arguments
#elpa2_test_real_default_kernel_qr_decomposition@SUFFIX@.sh:
# echo '$(wrapper)./elpa2_test_real_default_kernel_qr_decomposition@SUFFIX@' > $@
# chmod +x $@
# Preprocessed files (just used for manual inspection)
elpa2_utilities.i: $(top_srcdir)/src/elpa2_utilities.F90
......
......@@ -135,15 +135,26 @@ program test_real2
integer(kind=ik) :: j
success = .true.
!write_to_file = .false.
if (COMMAND_ARGUMENT_COUNT() /= 0) then
write(error_unit,*) "This program does not support any command-line arguments"
stop 1
endif
! if (COMMAND_ARGUMENT_COUNT() /= 0) then
! write(error_unit,*) "This program does not support any command-line arguments"
! stop 1
! endif
! override nblk
nblk = 2
na = 4000
nev = 1500
! na = 4000
! nev = 1500
! make sure na is even
if (mod(na,nblk) .ne. 0) then
na = na - 1
endif
! make sure na is at least 34
if (na .lt. 34) then
na = 34
endif
!-------------------------------------------------------------------------------
! MPI Initialization
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment