Ignore:
Timestamp:
11/27/06 21:20:53 (6 years ago)
Author:
eero <eero@…>
Branches:
master, external, fix-prolong, refactor, refactor-ext, refactor-subsolvers
Children:
bb6b7a9
Parents:
77fced2
git-author:
eero <eero@…> (11/27/06 21:20:53)
git-committer:
eero <eero@…> (11/27/06 21:20:53)
Message:

Enhanced rough aggregation strategy and known precalculated RHS with
known answer chosen in case of no explicit RHS file

git-svn-id:  svn://dougdevel.org/doug/trunk@187 146eac83-2b0f-0410-9363-9ebcc3d868b9

File:
1 edited

Legend:

Unmodified
Added
Removed

  • src/solvers/pcg.F90

    r3360430 re365c5b  
    810810      call CalculateEigenvalues(it,dd,ee,alpha,beta,maxit) 
    811811      cond_num=dd(it)/dd(1) 
    812       write(stream,'(a,i3,a,f10.4)') '#it:',it,' Cond#: ',cond_num 
     812      write(stream,'(a,i3,a,e10.4)') '#it:',it,' Cond#: ',cond_num 
    813813    endif 
    814814    !deallocate(beta) 
Note: See TracChangeset for help on using the changeset viewer.