File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_ssh_mean.F |
174 |
COST_SSH_MEAN |
ipx = 1 + mpicrd(1) |
./pkg/ecco/cost_ssh_mean.F |
177 |
COST_SSH_MEAN |
ipx = 1 |
./pkg/ecco/cost_ssh_mean.F |
187 |
COST_SSH_MEAN |
iglobe = i + sNx*(bi-1) + sNx*nSx*(ipx-1) |
./pkg/ecco/cost_ssh_mean.F |
189 |
COST_SSH_MEAN |
diffearth(iglobe,jglobe) = misfitgl(i,j,bi,bj,ipx,ipy) |
./pkg/ecco/cost_ssh_mean.F |
86 |
COST_SSH_MEAN |
integer ipx, ipy |
./pkg/sphere/exch_all_2d_rl.F |
42 |
EXCH_ALLGATHER_2D_RL |
integer ipx, ipy |
./pkg/sphere/exch_all_2d_rl.F |
81 |
EXCH_ALLGATHER_2D_RL |
ipx = 1 + mpicrd(1) |
./pkg/sphere/exch_all_2d_rl.F |
88 |
EXCH_ALLGATHER_2D_RL |
full(i,j,bi,bj,ipx,ipy) = recvbuf(i,j,bi,bj,iproc) |