| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_utils.F |
335 |
QSAT |
w = (40.0 + t)/40.0 |
|
./pkg/fizhi/fizhi_utils.F |
336 |
QSAT |
qx = w *(aw0+T*(aw1+T*(aw2+T*(aw3+T*(aw4+T*(aw5+T*aw6)))))) |
|
./pkg/fizhi/fizhi_utils.F |
337 |
QSAT |
. + (1.-w)*(ai0+T*(ai1+T*(ai2+T*(ai3+T*(ai4+T*(ai5+T*ai6)))))) |
|
./pkg/fizhi/fizhi_utils.F |
339 |
QSAT |
dqx = w *(bw0+T*(bw1+T*(bw2+T*(bw3+T*(bw4+T*(bw5+T*bw6)))))) |
|
./pkg/fizhi/fizhi_utils.F |
340 |
QSAT |
. + (1.-w)*(bi0+T*(bi1+T*(bi2+T*(bi3+T*(bi4+T*(bi5+T*bi6)))))) |
|
./pkg/seaice/seaice_fgmres.F |
202 |
SEAICE_FGMRES |
U sol,i,its,vv,w,wk1,wk2, |
|
./pkg/seaice/seaice_fgmres.F |
240 |
SEAICE_FGMRES |
_RL vv(n,im+1,nSx,nSy), w(n,im,nSx,nSy) |
|
./pkg/seaice/seaice_fgmres.F |
430 |
SEAICE_FGMRES |
w(k,i,bi,bj) = wk2(k,bi,bj) |
|
./pkg/seaice/seaice_fgmres.F |
566 |
SEAICE_FGMRES |
sol(k,bi,bj) = sol(k,bi,bj) + t*w(k,j,bi,bj) |
|
./pkg/seaice/seaice_jfnk.F |
114 |
SEAICE_JFNK |
_RL vv(nVec,im+1,nSx,nSy), w(nVec,im,nSx,nSy) |
|
./pkg/seaice/seaice_jfnk.F |
263 |
SEAICE_JFNK |
U vv,w,wk1,wk2, |
|
./pkg/seaice/seaice_krylov.F |
106 |
SEAICE_KRYLOV |
_RL vv(nVec,im+1,nSx,nSy), w(nVec,im,nSx,nSy) |
|
./pkg/seaice/seaice_krylov.F |
324 |
SEAICE_KRYLOV |
U vv,w,wk1,wk2, |