| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_cost_weights.F |
111 |
SEAICE_COST_WEIGHTS |
& *frame(i,j)*_hFacC(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
122 |
SEAICE_COST_WEIGHTS |
& *frame(i,j)*_hFacC(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_cost_weights.F |
77 |
SEAICE_COST_WEIGHTS |
frame(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_cost_weights.F |
79 |
SEAICE_COST_WEIGHTS |
frame(i,j) = 1. _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
192 |
ECCO_COST_WEIGHTS |
frame(i,j) = 0. _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
194 |
ECCO_COST_WEIGHTS |
frame(i,j) = 1. _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
212 |
ECCO_COST_WEIGHTS |
cosphi(i,j,bi,bj) = frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
327 |
ECCO_COST_WEIGHTS |
wsaltLev(i,j,k,bi,bj)=frame(i,j)/ |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
342 |
ECCO_COST_WEIGHTS |
$ *wsalt(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
366 |
ECCO_COST_WEIGHTS |
wthetaLev(i,j,k,bi,bj)=frame(i,j)/ |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
381 |
ECCO_COST_WEIGHTS |
$ *wtheta(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
411 |
ECCO_COST_WEIGHTS |
wsalt2(i,j,k,bi,bj)=frame(i,j)/( |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
426 |
ECCO_COST_WEIGHTS |
$ *wsalt(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
454 |
ECCO_COST_WEIGHTS |
wtheta2(i,j,k,bi,bj)=frame(i,j)/( |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
472 |
ECCO_COST_WEIGHTS |
$ *wtheta(k,bi,bj))*frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
494 |
ECCO_COST_WEIGHTS |
wsst(i,j,bi,bj) = wtheta(k,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
495 |
ECCO_COST_WEIGHTS |
wsss(i,j,bi,bj) = wsalt(k,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
512 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = wp(i,j,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
544 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
571 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
573 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
575 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
639 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
656 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
683 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
689 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
728 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
762 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
802 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
836 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
868 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
870 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
904 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
936 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
938 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
972 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
190 |
ECCO_COST_WEIGHTS |
frame(i,j) = 0. _d 0 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
192 |
ECCO_COST_WEIGHTS |
frame(i,j) = 1. _d 0 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
210 |
ECCO_COST_WEIGHTS |
cosphi(i,j,bi,bj) = frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
325 |
ECCO_COST_WEIGHTS |
wsaltLev(i,j,k,bi,bj)=frame(i,j)/ |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
340 |
ECCO_COST_WEIGHTS |
$ *wsalt(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
364 |
ECCO_COST_WEIGHTS |
wthetaLev(i,j,k,bi,bj)=frame(i,j)/ |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
379 |
ECCO_COST_WEIGHTS |
$ *wtheta(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
409 |
ECCO_COST_WEIGHTS |
wsalt2(i,j,k,bi,bj)=frame(i,j)/( |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
424 |
ECCO_COST_WEIGHTS |
$ *wsalt(k,bi,bj)) *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
452 |
ECCO_COST_WEIGHTS |
wtheta2(i,j,k,bi,bj)=frame(i,j)/( |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
470 |
ECCO_COST_WEIGHTS |
$ *wtheta(k,bi,bj))*frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
492 |
ECCO_COST_WEIGHTS |
wsst(i,j,bi,bj) = wtheta(k,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
493 |
ECCO_COST_WEIGHTS |
wsss(i,j,bi,bj) = wsalt(k,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
510 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = wp(i,j,bi,bj)*frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
542 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
568 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
571 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
635 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
652 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
679 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
685 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
724 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
758 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
798 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
832 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
864 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
866 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
900 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
932 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
934 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
968 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/cost_readers.F |
149 |
COST_READERS |
ersmask(i,j,bi,bj) = ersmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readgfo.F |
147 |
COST_READGFO |
gfomask(i,j,bi,bj) = gfomask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readscatxfields.F |
138 |
COST_READSCATXFIELDS |
scatxmask(i,j,bi,bj) = scatxmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readscatyfields.F |
136 |
COST_READSCATYFIELDS |
scatymask(i,j,bi,bj) = scatymask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readtopex.F |
145 |
COST_READTOPEX |
tpmask(i,j,bi,bj) = tpmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_readtopexmean.F |
94 |
COST_READTOPEXMEAN |
tpmeanmask(i,j,bi,bj) = tpmeanmask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_sla_read.F |
154 |
COST_SLA_READ |
sla_mask(i,j,bi,bj) = sla_mask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/cost_sla_read_yd.F |
139 |
COST_SLA_READ_YD |
sla_mask(i,j,bi,bj) = sla_mask(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/ecco_cost.h |
1009 |
NO PROCEDURE |
& frame, |
|
./pkg/ecco/ecco_cost.h |
1034 |
NO PROCEDURE |
_RL frame (1-olx:snx+olx,1-oly:sny+oly ) |
|
./pkg/ecco/ecco_cost_weights.F |
1001 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1033 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1035 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1037 |
ECCO_COST_WEIGHTS |
whflux2(i,j,bi,bj) = whflux0*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1068 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1102 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1104 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1106 |
ECCO_COST_WEIGHTS |
wsflux2(i,j,bi,bj) = wsflux0*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1137 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1169 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1201 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1233 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1265 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1297 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1330 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1362 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1395 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1427 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
1855 |
ECCO_COST_WEIGHTS |
wdiffkr2(i,j,k,bi,bj) = frame(i,j)/ |
|
./pkg/ecco/ecco_cost_weights.F |
1863 |
ECCO_COST_WEIGHTS |
wkapgm2(i,j,k,bi,bj) = frame(i,j)/ |
|
./pkg/ecco/ecco_cost_weights.F |
1871 |
ECCO_COST_WEIGHTS |
wkapredi2(i,j,k,bi,bj) = frame(i,j)/ |
|
./pkg/ecco/ecco_cost_weights.F |
1879 |
ECCO_COST_WEIGHTS |
wedtaux2(i,j,k,bi,bj) = frame(i,j)/ |
|
./pkg/ecco/ecco_cost_weights.F |
1887 |
ECCO_COST_WEIGHTS |
wedtauy2(i,j,k,bi,bj) = frame(i,j)/ |
|
./pkg/ecco/ecco_cost_weights.F |
229 |
ECCO_COST_WEIGHTS |
frame(i,j) = 1. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
247 |
ECCO_COST_WEIGHTS |
cosphi(i,j,bi,bj) = frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
353 |
ECCO_COST_WEIGHTS |
wsaltLev(i,j,k,bi,bj)=frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
368 |
ECCO_COST_WEIGHTS |
$ wsalt(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
394 |
ECCO_COST_WEIGHTS |
wthetaLev(i,j,k,bi,bj)=frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
409 |
ECCO_COST_WEIGHTS |
$ wtheta(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
441 |
ECCO_COST_WEIGHTS |
wsalt2(i,j,k,bi,bj)=frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
456 |
ECCO_COST_WEIGHTS |
$ wsalt(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
488 |
ECCO_COST_WEIGHTS |
wtheta2(i,j,k,bi,bj)= frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
506 |
ECCO_COST_WEIGHTS |
$ wtheta(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
540 |
ECCO_COST_WEIGHTS |
& wsst(i,j,bi,bj)= frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
550 |
ECCO_COST_WEIGHTS |
& wtheta(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
559 |
ECCO_COST_WEIGHTS |
& wsss(i,j,bi,bj)= frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
570 |
ECCO_COST_WEIGHTS |
& wsalt(k,bi,bj)*frame(i,j)*maskC(i,j,k,bi,bj) |
|
./pkg/ecco/ecco_cost_weights.F |
598 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = wp(i,j,bi,bj)*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
616 |
ECCO_COST_WEIGHTS |
wp(i,j,bi,bj) = frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
644 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
646 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
685 |
ECCO_COST_WEIGHTS |
wtp (i,j,bi,bj) = wtp (i,j,bi,bj) * 0.01 * frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
691 |
ECCO_COST_WEIGHTS |
wers(i,j,bi,bj) = wers(i,j,bi,bj) * 0.01 * frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
693 |
ECCO_COST_WEIGHTS |
& wers(i,j,bi,bj) = 0.1 * frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
696 |
ECCO_COST_WEIGHTS |
wgfo(i,j,bi,bj) = wgfo(i,j,bi,bj) * 0.01 * frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
698 |
ECCO_COST_WEIGHTS |
& wgfo(i,j,bi,bj) = 0.1 * frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
764 |
ECCO_COST_WEIGHTS |
wsshv4tmp(i,j,bi,bj)= frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
790 |
ECCO_COST_WEIGHTS |
& wbp(i,j,bi,bj)= frame(i,j)*maskC(i,j,k,bi,bj)/ |
|
./pkg/ecco/ecco_cost_weights.F |
822 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
829 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
856 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
862 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
893 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
895 |
ECCO_COST_WEIGHTS |
wtauu2(i,j,bi,bj) = wtau0*maskW(i,j,k,bi,bj)*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
899 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
900 |
ECCO_COST_WEIGHTS |
wtauu2(i,j,bi,bj) = wtau0*maskc(i,j,k,bi,bj)*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
931 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
963 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
965 |
ECCO_COST_WEIGHTS |
wtauv2(i,j,bi,bj) = wtau0*maskS(i,j,k,bi,bj)*frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
969 |
ECCO_COST_WEIGHTS |
& *frame(i,j) |
|
./pkg/ecco/ecco_cost_weights.F |
970 |
ECCO_COST_WEIGHTS |
wtauv2(i,j,bi,bj) = wtau0*maskc(i,j,k,bi,bj)*frame(i,j) |