Symbol Description Uses
pc 20



File Line number Procedure Code
./pkg/fizhi/fizhi_lwrad.F 2517 TABLUP
      _RL x1,x2,x3,we,pe,fw,fp,pa,pb,pc,ax,ba,bb,t1,ca,cb,t2
./pkg/fizhi/fizhi_lwrad.F 2553 TABLUP
        pc = coef1(ip,iw+1,nn)*(1.-fp)+coef1(ip+1,iw+1,nn)*fp
./pkg/fizhi/fizhi_lwrad.F 2557 TABLUP
        ax = (-pa*(1.-fw)+pc*(1.+fw)) *fw*0.5 + pb*(1.-fw*fw)
./pkg/streamice/STREAMICE_PETSC.h 19 NO PROCEDURE
     & pc
./pkg/streamice/STREAMICE_PETSC.h 20 NO PROCEDURE
      PC  pc
./pkg/streamice/streamice_cg_solve_petsc.F 347 STREAMICE_CG_SOLVE_PETSC
      call KSPGETPC(ksp, pc, ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 356 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc, PCBJACOBI, ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 358 STREAMICE_CG_SOLVE_PETSC
       call PCBJACOBIGETSUBKSP (pc,PETSC_NULL_INTEGER,
./pkg/streamice/streamice_cg_solve_petsc.F 366 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc, PCJACOBI, ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 369 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc, PCILU, ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 373 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc, PCGAMG, ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 374 STREAMICE_CG_SOLVE_PETSC
       call PCGAMGSETCOARSEEQLIM(pc,10000,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 375 STREAMICE_CG_SOLVE_PETSC
       call PCGAMGSETSYMGRAPH(pc, PETSC_TRUE,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 376 STREAMICE_CG_SOLVE_PETSC
       call PCGAMGSETNSMOOTHS(pc, 0,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 377 STREAMICE_CG_SOLVE_PETSC
       call PCGAMGSETTHRESHOLD(pc, .001,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 383 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc,PCLU,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 384 STREAMICE_CG_SOLVE_PETSC
       call PCFACTORSETMATSOLVERPACKAGE(pc,MATSOLVERMUMPS,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 385 STREAMICE_CG_SOLVE_PETSC
       call PCFACTORSETUPMATSOLVERPACKAGE(pc,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 386 STREAMICE_CG_SOLVE_PETSC
       call PCFACTORGETMATRIX(pc,mumpsFac,ierr)
./pkg/streamice/streamice_cg_solve_petsc.F 394 STREAMICE_CG_SOLVE_PETSC
       call PCSETTYPE(pc, PCBJACOBI, ierr)