copyright (C) 2001 MSC-RPN COMM %%%MC2%%% * logical diagres,endsoll integer maxite,endsoli real hsolvpre,endsolr common /solverl/ diagres,endsoll common /solveri/ maxite,endsoli common /solverr/ hsolvpre,endsolr * character*8 precond,endsolc common /solverc/ precond,endsolc *