| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_advection.F |
138 |
GAD_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_advection.F |
361 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
389 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
403 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
407 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
411 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
415 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
420 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
431 |
GAD_ADVECTION |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
469 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i+1,j) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
480 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
492 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i+1,j) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
503 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
521 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i+1,j) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
532 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
541 |
GAD_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
558 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
586 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
600 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
604 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
608 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
612 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
617 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
628 |
GAD_ADVECTION |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
666 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i,j+1) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
677 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
689 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i,j+1) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
700 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
718 |
GAD_ADVECTION |
& -deltaTLev(k)*( af(i,j+1) - af(i,j) ) |
|
./pkg/generic_advdiff/gad_advection.F |
729 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
738 |
GAD_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
141 |
GAD_CALC_RHS |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
217 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_X( bi,bj,k, uTrans, locABT, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
222 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
236 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
239 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
242 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
255 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
259 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
264 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
276 |
GAD_CALC_RHS |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
281 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
287 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
350 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_Y( bi,bj,k, vTrans, locABT, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
355 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
369 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
372 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
375 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
388 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
392 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
397 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
409 |
GAD_CALC_RHS |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
414 |
GAD_CALC_RHS |
fMer(i,j) = fMer(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
420 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
486 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
491 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
495 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
497 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
499 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
512 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
516 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
521 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
529 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
534 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
538 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
540 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
542 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
555 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
559 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
564 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
573 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j)*maskInC(i,j,bi,bj) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
579 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
401 |
GAD_IMPLICIT_R |
af(i,j) = flx(i,j) - df(i,j) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
405 |
GAD_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
94 |
GAD_IMPLICIT_R |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_advection.F |
129 |
SEAICE_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_advection.F |
343 |
SEAICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/seaice/seaice_advection.F |
367 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
371 |
SEAICE_ADVECTION |
WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: xFx=', af(i+1,j), |
|
./pkg/seaice/seaice_advection.F |
372 |
SEAICE_ADVECTION |
& localTij(i,j), uTrans(i+1,j), af(i+1,j)/uTrans(i+1,j) |
|
./pkg/seaice/seaice_advection.F |
377 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
381 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
385 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
390 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
428 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
438 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
450 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
460 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
470 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
477 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
494 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
504 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
513 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
545 |
SEAICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/seaice/seaice_advection.F |
569 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
573 |
SEAICE_ADVECTION |
WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: yFx=', af(i,j+1), |
|
./pkg/seaice/seaice_advection.F |
574 |
SEAICE_ADVECTION |
& localTij(i,j), vTrans(i,j+1), af(i,j+1)/vTrans(i,j+1) |
|
./pkg/seaice/seaice_advection.F |
579 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
583 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
587 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
592 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
630 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
640 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
652 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
662 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
672 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
679 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
696 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
706 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
715 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
133 |
THSICE_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_advection.F |
321 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
361 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
364 |
THSICE_ADVECTION |
& 'ICE_adv: xFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
365 |
THSICE_ADVECTION |
& uTrans(idb,jdb), af(idb,jdb)/uTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
370 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
374 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
378 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
420 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
433 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
441 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
453 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
466 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
474 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
492 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
505 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
513 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
541 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
581 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
584 |
THSICE_ADVECTION |
& 'ICE_adv: yFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
585 |
THSICE_ADVECTION |
& vTrans(idb,jdb), af(idb,jdb)/vTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
590 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
594 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
598 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
639 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
652 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
660 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
672 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
685 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
693 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
711 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
724 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
732 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/cd_code/cd_code_scheme.F |
118 |
CD_CODE_SCHEME |
af(i,j) = |
|
./pkg/cd_code/cd_code_scheme.F |
132 |
CD_CODE_SCHEME |
& ( (af(i,j)+af(i-1,j+1)) |
|
./pkg/cd_code/cd_code_scheme.F |
133 |
CD_CODE_SCHEME |
& +(af(i-1,j)+af(i,j+1)) )*0.25 _d 0 |
|
./pkg/cd_code/cd_code_scheme.F |
180 |
CD_CODE_SCHEME |
af(i,j) = |
|
./pkg/cd_code/cd_code_scheme.F |
194 |
CD_CODE_SCHEME |
& ( (af(i,j)+af(i+1,j-1)) |
|
./pkg/cd_code/cd_code_scheme.F |
195 |
CD_CODE_SCHEME |
& +(af(i+1,j)+af(i,j-1)) )*0.25 _d 0 |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
102 |
GAD_2D_CALC_RHS |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
137 |
GAD_2D_CALC_RHS |
af(i,j) = 0. _d 0 |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
176 |
GAD_2D_CALC_RHS |
O af, |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
179 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_X(bi,bj,uVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
184 |
GAD_2D_CALC_RHS |
fZon(i,j)=fZon(i,j)+af(i,j) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
231 |
GAD_2D_CALC_RHS |
af(i,j) = 0. _d 0 |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
273 |
GAD_2D_CALC_RHS |
O af, |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
276 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_Y(bi,bj,vVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
281 |
GAD_2D_CALC_RHS |
fMer(i,j) = fMer(i,j) + af(i,j) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
306 |
GAD_2D_CALC_RHS |
af(i,j) = 0. _d 0 |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
318 |
GAD_2D_CALC_RHS |
O af, |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
325 |
GAD_2D_CALC_RHS |
O af, |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
331 |
GAD_2D_CALC_RHS |
fVer(i,j) = fVer(i,j) + af(i,j) |