| 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_cg_solve_petsc.F |
325 |
STREAMICE_CG_SOLVE_PETSC |
call KSPGETPC(ksp, pc, ierr) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
334 |
STREAMICE_CG_SOLVE_PETSC |
call PCSETTYPE(pc, PCBJACOBI, ierr) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
337 |
STREAMICE_CG_SOLVE_PETSC |
call PCSETTYPE(pc, PCJACOBI, ierr) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
340 |
STREAMICE_CG_SOLVE_PETSC |
call PCSETTYPE(pc, PCILU, ierr) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
343 |
STREAMICE_CG_SOLVE_PETSC |
call PCSETTYPE(pc, PCBJACOBI, ierr) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
85 |
STREAMICE_CG_SOLVE_PETSC |
PC pc |