anchor.diff:      NREST     = hecmw_mat_get_nrest(hecMAT)
       ITERlog= hecmw_mat_get_iterlog(hecMAT)
       TIMElog= hecmw_mat_get_timelog(hecMAT)
  -    
  +
       SELECT CASE(METHOD)
         CASE (1)  !--CG
           msg_method="CG"
         CASE (2)  !--BiCGSTAB
  -        msg_method="BiCGSTAB"     
  +        msg_method="BiCGSTAB"
         CASE (3)  !--GMRES
           msg_method="GMRES"
  -      CASE (4)  !--GPBiCG 
  -        msg_method="GPBiCG"        
  +      CASE (4)  !--GPBiCG
  +        msg_method="GPBiCG"
         CASE DEFAULT
           msg_method="Unlabeled"
       END SELECT
  +
       SELECT CASE(PRECOND)
  -      CASE(2)
  +      CASE(1,2)
           msg_precond="SSOR"
         CASE(3)
           msg_precond="DIAG"
         CASE(5)
           msg_precond="ML"
         CASE(7)
  -        msg_precond="DirectMUMPS"
  +        msg_precond="Direct MUMPS"
         CASE(10,11,12)
           write(msg_precond,"(a,i0,a)") "ILU(",PRECOND-10,")"
         CASE(20)
  
positive.code:       SELECT CASE(hecmw_mat_get_mpc_method(hecMAT))
          CASE(1) ! "1: MPC Method: Penalty"
            call hecmw_mat_ass_equation ( hecMESH, hecMAT )
            hecTKT => hecMAT        
          CASE(2) ! "2: MPC Method: MPC-CG"
            call hecmw_matvec_set_mpcmatvec_flg (.true.)
            allocate(Btmp(hecMAT%NP * hecMAT%NDOF))
  
negative.code:     endif
  
    end subroutine hecmw_solve_iterative
  
    subroutine hecmw_solve_check_zerodiag (hecMESH, hecMAT)
      use hecmw_util
      use hecmw_matrix_misc
  