| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_advection.F |
134 |
GAD_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_advection.F |
340 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
381 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
385 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
389 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
393 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
398 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
431 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
444 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
463 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
471 |
GAD_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
503 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
536 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
551 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
555 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
559 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
563 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
568 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
601 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
614 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
633 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
641 |
GAD_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
136 |
GAD_CALC_RHS |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
219 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
224 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
228 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
230 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
232 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_X(bi,bj,k,uTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
236 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
244 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
248 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
253 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
259 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
265 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
332 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
337 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
341 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
343 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
345 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
349 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
357 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
361 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
366 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
372 |
GAD_CALC_RHS |
fMer(i,j) = fMer(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
378 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
447 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
452 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
456 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
458 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
460 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
464 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
472 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
476 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
481 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
488 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
494 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_advection.F |
124 |
SEAICE_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/seaice_advection.F |
320 |
SEAICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/seaice/seaice_advection.F |
344 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
348 |
SEAICE_ADVECTION |
WRITE(6,'(A,1P4E14.6)') 'ICE_adv: xFx=', af(i+1,j), |
|
./pkg/seaice/seaice_advection.F |
349 |
SEAICE_ADVECTION |
& localTij(i,j), uTrans(i+1,j), af(i+1,j)/uTrans(i+1,j) |
|
./pkg/seaice/seaice_advection.F |
354 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
358 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
362 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
367 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
402 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
412 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
424 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
434 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
444 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
451 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
468 |
SEAICE_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
478 |
SEAICE_ADVECTION |
& *( (af(i+1,j)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
487 |
SEAICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
519 |
SEAICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/seaice/seaice_advection.F |
543 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
547 |
SEAICE_ADVECTION |
WRITE(6,'(A,1P4E14.6)') 'ICE_adv: yFx=', af(i,j+1), |
|
./pkg/seaice/seaice_advection.F |
548 |
SEAICE_ADVECTION |
& localTij(i,j), vTrans(i,j+1), af(i,j+1)/vTrans(i,j+1) |
|
./pkg/seaice/seaice_advection.F |
553 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
557 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
561 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
566 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
601 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
611 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
623 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
633 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
643 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
650 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/seaice/seaice_advection.F |
667 |
SEAICE_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/seaice/seaice_advection.F |
677 |
SEAICE_ADVECTION |
& *( (af(i,j+1)-af(i,j)) |
|
./pkg/seaice/seaice_advection.F |
686 |
SEAICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
130 |
THSICE_ADVECTION |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_advection.F |
295 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
335 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
337 |
THSICE_ADVECTION |
& 'ICE_adv: xFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
338 |
THSICE_ADVECTION |
& uTrans(idb,jdb), af(idb,jdb)/uTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
342 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
346 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
350 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
391 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
404 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
415 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
428 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
437 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
444 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
461 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
474 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
482 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
509 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
549 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
551 |
THSICE_ADVECTION |
& 'ICE_adv: yFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
552 |
THSICE_ADVECTION |
& vTrans(idb,jdb), af(idb,jdb)/vTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
556 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
560 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
564 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
604 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
617 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
628 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
641 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
650 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
657 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
674 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
687 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
695 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/cd_code/cd_code_scheme.F |
113 |
CD_CODE_SCHEME |
af(i,j) = |
|
./pkg/cd_code/cd_code_scheme.F |
124 |
CD_CODE_SCHEME |
& ( (af(i,j)+af(i-1,j+1)) |
|
./pkg/cd_code/cd_code_scheme.F |
125 |
CD_CODE_SCHEME |
& +(af(i-1,j)+af(i,j+1)) )*0.25 _d 0 |
|
./pkg/cd_code/cd_code_scheme.F |
172 |
CD_CODE_SCHEME |
af(i,j) = |
|
./pkg/cd_code/cd_code_scheme.F |
183 |
CD_CODE_SCHEME |
& ( (af(i,j)+af(i+1,j-1)) |
|
./pkg/cd_code/cd_code_scheme.F |
184 |
CD_CODE_SCHEME |
& +(af(i+1,j)+af(i,j-1)) )*0.25 _d 0 |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
115 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_X(bi,bj,uVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
118 |
GAD_2D_CALC_RHS |
fZon(i,j) = fZon(i,j) + af(i,j) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
147 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_Y(bi,bj,vVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
150 |
GAD_2D_CALC_RHS |
fMer(i,j) = fMer(i,j) + af(i,j) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
86 |
GAD_2D_CALC_RHS |
_RL af (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |