| File |
Line number |
Procedure |
Code |
|
./pkg/atm2d/atm2d_finish.F |
31 |
ATM2D_FINISH |
INTEGER rc |
|
./pkg/atm2d/atm2d_finish.F |
41 |
ATM2D_FINISH |
CALL MPI_BARRIER( MPI_COMM_WORLD, rc ) |
|
./pkg/atm2d/atm2d_finish.F |
42 |
ATM2D_FINISH |
CALL MPI_FINALIZE(rc) |
|
./pkg/atm_ocn_coupler/coupler.F |
32 |
NO PROCEDURE |
INTEGER rc |
|
./pkg/atm_ocn_coupler/coupler.F |
67 |
NO PROCEDURE |
CALL MPI_BARRIER( MPI_COMM_WORLD, rc ) |
|
./pkg/atm_ocn_coupler/coupler.F |
68 |
NO PROCEDURE |
CALL MPI_FINALIZE(rc) |
|
./pkg/ecco/cost_argo_theta.F |
174 |
COST_ARGO_THETA |
$ argotobs(i,j,k,bi,bj),ztop*rc(k),rl_0) |
|
./pkg/ecco/cost_xbt.F |
186 |
COST_XBT |
$ xbtobs(i,j,k,bi,bj),ztop*rc(k),rl_0) |