Mercurial > hg > nnls-chroma

diff nnls.f @ 25:6d9e1ee7b35a matthiasm-plugin

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* OK, let's revert to a C version (after discovering that the FORTRAN compiler isn't standard on the Mac)
author Chris Cannam
date Thu, 21 Oct 2010 14:38:02 +0100
parents 444c344681f3
children
line wrap: on
line diff
--- a/nnls.f	Thu Oct 21 12:21:41 2010 +0100
+++ b/nnls.f	Thu Oct 21 14:38:02 2010 +0100
@@ -345,7 +345,7 @@
       ITER=ITER+1   
       IF (ITER .gt. ITMAX) then
          MODE=3
-         write (*,'(/a)') ' NNLS quitting on iteration count.'
+c         write (*,'(/a)') ' NNLS quitting on iteration count.'
          GO TO 350 
       endif
 C