| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_cost_areasst.F |
20 |
SEAICE_COST_AREASST |
& nnzobs, localobsfile, localobs, mult_local, |
|
./pkg/seaice/seaice_cost_areasst.F |
87 |
SEAICE_COST_AREASST |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/seaice/seaice_cost_concentration.F |
163 |
SEAICE_COST_CONCENTRATION |
if ( .NOT. ( localobsfile.EQ.' ' ) ) then |
|
./pkg/seaice/seaice_cost_concentration.F |
192 |
SEAICE_COST_CONCENTRATION |
print *,'localobsfile: ', localobsfile |
|
./pkg/seaice/seaice_cost_concentration.F |
20 |
SEAICE_COST_CONCENTRATION |
& nnzobs, localobsfile, localobs, mult_local, |
|
./pkg/seaice/seaice_cost_concentration.F |
227 |
SEAICE_COST_CONCENTRATION |
il=ilnblnk(localobsfile) |
|
./pkg/seaice/seaice_cost_concentration.F |
229 |
SEAICE_COST_CONCENTRATION |
& localobsfile(1:il), '_', yday |
|
./pkg/seaice/seaice_cost_concentration.F |
236 |
SEAICE_COST_CONCENTRATION |
write(fname2(1:128),'(a)') localobsfile(1:il) |
|
./pkg/seaice/seaice_cost_concentration.F |
82 |
SEAICE_COST_CONCENTRATION |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/seaice/seaice_cost_sss.F |
168 |
SEAICE_COST_SSS |
if ( .NOT. ( localobsfile.EQ.' ' ) ) then |
|
./pkg/seaice/seaice_cost_sss.F |
207 |
SEAICE_COST_SSS |
print *,'areaobsfile: ', localobsfile |
|
./pkg/seaice/seaice_cost_sss.F |
20 |
SEAICE_COST_SSS |
& nnzobs, localobsfile, localobs, mult_local, |
|
./pkg/seaice/seaice_cost_sss.F |
242 |
SEAICE_COST_SSS |
il=ilnblnk(localobsfile) |
|
./pkg/seaice/seaice_cost_sss.F |
244 |
SEAICE_COST_SSS |
& localobsfile(1:il), '_', yday |
|
./pkg/seaice/seaice_cost_sss.F |
251 |
SEAICE_COST_SSS |
write(fname2(1:128),'(a)') localobsfile(1:il) |
|
./pkg/seaice/seaice_cost_sss.F |
80 |
SEAICE_COST_SSS |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/seaice/seaice_cost_sst.F |
169 |
SEAICE_COST_SST |
if ( .NOT. ( localobsfile.EQ.' ' ) ) then |
|
./pkg/seaice/seaice_cost_sst.F |
18 |
SEAICE_COST_SST |
& nnzobs, localobsfile, localobs, mult_local, |
|
./pkg/seaice/seaice_cost_sst.F |
207 |
SEAICE_COST_SST |
print *,'areaobsfile: ', localobsfile |
|
./pkg/seaice/seaice_cost_sst.F |
242 |
SEAICE_COST_SST |
il=ilnblnk(localobsfile) |
|
./pkg/seaice/seaice_cost_sst.F |
244 |
SEAICE_COST_SST |
& localobsfile(1:il), '_', yday |
|
./pkg/seaice/seaice_cost_sst.F |
251 |
SEAICE_COST_SST |
write(fname2(1:128),'(a)') localobsfile(1:il) |
|
./pkg/seaice/seaice_cost_sst.F |
78 |
SEAICE_COST_SST |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/cost_bp_read.F |
109 |
COST_BP_READ |
il=ilnblnk(localobsfile) |
|
./pkg/ecco/cost_bp_read.F |
111 |
COST_BP_READ |
& localobsfile(1:il), '_', iyear |
|
./pkg/ecco/cost_bp_read.F |
114 |
COST_BP_READ |
write(fnametmp(1:80),'(a)') localobsfile(1:il) |
|
./pkg/ecco/cost_bp_read.F |
42 |
COST_BP_READ |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/cost_bp_read.F |
8 |
COST_BP_READ |
I localobsfile, localstartdate, |
|
./pkg/ecco/cost_gencal.F |
119 |
COST_GENCAL |
il=ilnblnk(localobsfile) |
|
./pkg/ecco/cost_gencal.F |
11 |
COST_GENCAL |
I localbarfile, localobsfile, |
|
./pkg/ecco/cost_gencal.F |
121 |
COST_GENCAL |
& localobsfile(1:il), '_', yday |
|
./pkg/ecco/cost_gencal.F |
125 |
COST_GENCAL |
write(fname2(1:128),'(a)') localobsfile(1:il) |
|
./pkg/ecco/cost_gencal.F |
46 |
COST_GENCAL |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/cost_gencost_seaicev4.F |
160 |
COST_GENCOST_SEAICEV4 |
localobsfile=gencost_datafile(igen_conc) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
193 |
COST_GENCOST_SEAICEV4 |
if ( .NOT. ( localobsfile.EQ.' ' ) ) then |
|
./pkg/ecco/cost_gencost_seaicev4.F |
68 |
COST_GENCOST_SEAICEV4 |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/cost_generic.F |
118 |
COST_GENERIC |
if ( (.NOT. ( localobsfile.EQ.' ' ) ) |
|
./pkg/ecco/cost_generic.F |
123 |
COST_GENERIC |
& nnzobs, localobsfile, localerrfile, |
|
./pkg/ecco/cost_generic.F |
12 |
COST_GENERIC |
& nnzobs, localobsfile, localerrfile, |
|
./pkg/ecco/cost_generic.F |
136 |
COST_GENERIC |
if ((.NOT.(localobsfile.EQ.' ')).AND.(.NOT.domean)) then |
|
./pkg/ecco/cost_generic.F |
140 |
COST_GENERIC |
& nnzobs, localobsfile, localerrfile, |
|
./pkg/ecco/cost_generic.F |
161 |
COST_GENLOOP |
& nnzobs, localobsfile, localerrfile, |
|
./pkg/ecco/cost_generic.F |
220 |
COST_GENLOOP |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/cost_generic.F |
346 |
COST_GENLOOP |
call COST_GENCAL(localbarfile, localobsfile, |
|
./pkg/ecco/cost_generic.F |
71 |
COST_GENERIC |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/ecco_check.F |
682 |
ECCO_CHECK_FILES |
I localname, localobsfile, localstartdate1, |
|
./pkg/ecco/ecco_check.F |
706 |
ECCO_CHECK_FILES |
character*(MAX_LEN_FNAM) localobsfile |
|
./pkg/ecco/ecco_check.F |
729 |
ECCO_CHECK_FILES |
IF ( (using_cost_local).AND.(localobsfile.EQ.' ') ) THEN |
|
./pkg/ecco/ecco_check.F |
742 |
ECCO_CHECK_FILES |
inquire( file=localobsfile, exist=exst ) |
|
./pkg/ecco/ecco_check.F |
755 |
ECCO_CHECK_FILES |
il=ilnblnk(localobsfile) |
|
./pkg/ecco/ecco_check.F |
757 |
ECCO_CHECK_FILES |
& localobsfile(1:il), '_', yday |