| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_sshv4.F |
125 |
COST_GENCOST_SSHV4 |
_RL anom_psMslaobs_NUM (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ecco/cost_gencost_sshv4.F |
743 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
796 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_gencost_sshv4.F |
797 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
810 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_gencost_sshv4.F |
811 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
824 |
COST_GENCOST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_gencost_sshv4.F |
825 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_gencost_sshv4.F |
841 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
|
./pkg/ecco/cost_gencost_sshv4.F |
846 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
849 |
COST_GENCOST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_gencost_sshv4.F |
870 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
|
./pkg/ecco/cost_gencost_sshv4.F |
914 |
COST_GENCOST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
|
./pkg/ecco/cost_sshv4.F |
124 |
COST_SSHV4 |
_RL anom_psMslaobs_NUM (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/ecco/cost_sshv4.F |
660 |
COST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_sshv4.F |
716 |
COST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_sshv4.F |
717 |
COST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_sshv4.F |
733 |
COST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_sshv4.F |
734 |
COST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_sshv4.F |
750 |
COST_SSHV4 |
anom_psMslaobs_NUM(i,j,bi,bj)= |
|
./pkg/ecco/cost_sshv4.F |
751 |
COST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj)+1. _d 0 |
|
./pkg/ecco/cost_sshv4.F |
786 |
COST_SSHV4 |
if ( ( anom_psMslaobs_NUM(i,j,bi,bj) .NE. 0. ).AND. |
|
./pkg/ecco/cost_sshv4.F |
790 |
COST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
793 |
COST_SSHV4 |
& anom_psMslaobs_NUM(i,j,bi,bj) |
|
./pkg/ecco/cost_sshv4.F |
853 |
COST_SSHV4 |
& (anom_psMslaobs_NUM(i,j,bi,bj).GT.0.).AND. |