| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/streamice_cg_functions.F |
126 |
STREAMICE_CG_ACTION |
if (jnode.eq.jq) jlq = 2 |
|
./pkg/streamice/streamice_cg_functions.F |
241 |
STREAMICE_CG_MAKE_A |
INTEGER iq, jq, inodx, inody, i, j, bi, bj, ilqx, ilqy, m_i, n |
|
./pkg/streamice/streamice_cg_functions.F |
281 |
STREAMICE_CG_MAKE_A |
DO jq = 1,2 |
|
./pkg/streamice/streamice_cg_functions.F |
283 |
STREAMICE_CG_MAKE_A |
n = 2*(jq-1)+iq |
|
./pkg/streamice/streamice_cg_functions.F |
298 |
STREAMICE_CG_MAKE_A |
if (inody.eq.jq) ilqy = 2 |
|
./pkg/streamice/streamice_cg_functions.F |
312 |
STREAMICE_CG_MAKE_A |
if (jnody.eq.jq) ilqy = 2 |
|
./pkg/streamice/streamice_cg_functions.F |
65 |
STREAMICE_CG_ACTION |
INTEGER iq, jq, inode, jnode, i, j, bi, bj, ilq, jlq, m, n,Gi,Gj |
|
./pkg/streamice/streamice_cg_functions.F |
720 |
STREAMICE_CG_ADIAG |
INTEGER iq, jq, inode, jnode, i, j, bi, bj, ilq, jlq, m, n |
|
./pkg/streamice/streamice_cg_functions.F |
736 |
STREAMICE_CG_ADIAG |
DO jq = 1,2 |
|
./pkg/streamice/streamice_cg_functions.F |
738 |
STREAMICE_CG_ADIAG |
n = 2*(jq-1)+iq |
|
./pkg/streamice/streamice_cg_functions.F |
753 |
STREAMICE_CG_ADIAG |
if (jnode.eq.jq) jlq = 2 |
|
./pkg/streamice/streamice_cg_functions.F |
85 |
STREAMICE_CG_ACTION |
DO jq = 1,2 |
|
./pkg/streamice/streamice_cg_functions.F |
87 |
STREAMICE_CG_ACTION |
n = 2*(jq-1)+iq |
|
./pkg/streamice/streamice_cg_functions.F |
888 |
STREAMICE_CG_BOUND_VALS |
INTEGER iq, jq, inode, jnode, i, j, bi, bj, ilq, jlq, m, n |
|
./pkg/streamice/streamice_cg_functions.F |
90 |
STREAMICE_CG_ACTION |
uq = u(i,j,bi,bj) * Xquad(3-iq) * Xquad(3-jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
913 |
STREAMICE_CG_BOUND_VALS |
DO jq = 1,2 |
|
./pkg/streamice/streamice_cg_functions.F |
915 |
STREAMICE_CG_BOUND_VALS |
n = 2*(jq-1)+iq |
|
./pkg/streamice/streamice_cg_functions.F |
917 |
STREAMICE_CG_BOUND_VALS |
uq = u_bdry_values_SI(i,j,bi,bj)*Xquad(3-iq)*Xquad(3-jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
918 |
STREAMICE_CG_BOUND_VALS |
& u_bdry_values_SI(i+1,j,bi,bj)*Xquad(iq)*Xquad(3-jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
919 |
STREAMICE_CG_BOUND_VALS |
& u_bdry_values_SI(i,j+1,bi,bj)*Xquad(3-iq)*Xquad(jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
91 |
STREAMICE_CG_ACTION |
& u(i+1,j,bi,bj) * Xquad(iq) * Xquad(3-jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
920 |
STREAMICE_CG_BOUND_VALS |
& u_bdry_values_SI(i+1,j+1,bi,bj)*Xquad(iq)*Xquad(jq) |
|
./pkg/streamice/streamice_cg_functions.F |
921 |
STREAMICE_CG_BOUND_VALS |
vq = v_bdry_values_SI(i,j,bi,bj)*Xquad(3-iq)*Xquad(3-jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
922 |
STREAMICE_CG_BOUND_VALS |
& v_bdry_values_SI(i+1,j,bi,bj)*Xquad(iq)*Xquad(3-jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
923 |
STREAMICE_CG_BOUND_VALS |
& v_bdry_values_SI(i,j+1,bi,bj)*Xquad(3-iq)*Xquad(jq)+ |
|
./pkg/streamice/streamice_cg_functions.F |
924 |
STREAMICE_CG_BOUND_VALS |
& v_bdry_values_SI(i+1,j+1,bi,bj)*Xquad(iq)*Xquad(jq) |
|
./pkg/streamice/streamice_cg_functions.F |
92 |
STREAMICE_CG_ACTION |
& u(i,j+1,bi,bj) * Xquad(3-iq) * Xquad(jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
93 |
STREAMICE_CG_ACTION |
& u(i+1,j+1,bi,bj) * Xquad(iq) * Xquad(jq) |
|
./pkg/streamice/streamice_cg_functions.F |
94 |
STREAMICE_CG_ACTION |
vq = v(i,j,bi,bj) * Xquad(3-iq) * Xquad(3-jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
954 |
STREAMICE_CG_BOUND_VALS |
if (jnode.eq.jq) jlq = 2 |
|
./pkg/streamice/streamice_cg_functions.F |
95 |
STREAMICE_CG_ACTION |
& v(i+1,j,bi,bj) * Xquad(iq) * Xquad(3-jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
96 |
STREAMICE_CG_ACTION |
& v(i,j+1,bi,bj) * Xquad(3-iq) * Xquad(jq) + |
|
./pkg/streamice/streamice_cg_functions.F |
97 |
STREAMICE_CG_ACTION |
& v(i+1,j+1,bi,bj) * Xquad(iq) * Xquad(jq) |