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) |