| 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 |
330 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
367 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
371 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
375 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
379 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
384 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
418 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
431 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
450 |
GAD_ADVECTION |
& *( af(i+1,j)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
458 |
GAD_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
492 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
521 |
GAD_ADVECTION |
af(i,j) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
536 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
540 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
544 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
548 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
553 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
587 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
600 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
619 |
GAD_ADVECTION |
& *( af(i,j+1)-af(i,j) |
|
./pkg/generic_advdiff/gad_advection.F |
627 |
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 |
254 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
261 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
267 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
334 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
339 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
343 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
345 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
347 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_Y(bi,bj,k,vTrans,locABT,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
351 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
359 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
363 |
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 |
376 |
GAD_CALC_RHS |
fMer(i,j) = fMer(i,j) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
382 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
451 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
456 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
460 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
462 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
464 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R(bi,bj,k,rTrans,TracAB,af,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
468 |
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 |
480 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
486 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
494 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
500 |
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 |
296 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
336 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
338 |
THSICE_ADVECTION |
& 'ICE_adv: xFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
339 |
THSICE_ADVECTION |
& uTrans(idb,jdb), af(idb,jdb)/uTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
343 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
347 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
351 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
392 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
405 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
416 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
429 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
438 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
445 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
462 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
475 |
THSICE_ADVECTION |
& *( af(i+1,j)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
483 |
THSICE_ADVECTION |
afx(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
511 |
THSICE_ADVECTION |
af(i,j) = 0. |
|
./pkg/thsice/thsice_advection.F |
551 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
553 |
THSICE_ADVECTION |
& 'ICE_adv: yFx=', af(idb,jdb), iceFld(idb,jdb), |
|
./pkg/thsice/thsice_advection.F |
554 |
THSICE_ADVECTION |
& vTrans(idb,jdb), af(idb,jdb)/vTrans(idb,jdb) |
|
./pkg/thsice/thsice_advection.F |
558 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
562 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
566 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
606 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
619 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
630 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
643 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
652 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
659 |
THSICE_ADVECTION |
afy(i,j) = af(i,j) |
|
./pkg/thsice/thsice_advection.F |
676 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
689 |
THSICE_ADVECTION |
& *( af(i,j+1)-af(i,j) ) |
|
./pkg/thsice/thsice_advection.F |
697 |
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) |