| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/cost_profiles.F |
133 |
COST_PROFILES |
fid=fiddata(num_file,bi,bj) |
|
./pkg/profiles/cost_profiles.F |
412 |
COST_PROFILES |
fid=fiddata(num_file,bi,bj) |
|
./pkg/profiles/profiles.h |
36 |
NO PROCEDURE |
integer fiddata(NFILESPROFMAX,nsx,nsy) |
|
./pkg/profiles/profiles.h |
91 |
NO PROCEDURE |
& fidforward, fidadjoint, fidtangent, fiddata, |
|
./pkg/profiles/profiles_init_fixed.F |
188 |
PROFILES_INIT_FIXED |
err = NF_OPEN(fnamedatanc, 0, fiddata(num_file,bi,bj)) |
|
./pkg/profiles/profiles_init_fixed.F |
191 |
PROFILES_INIT_FIXED |
fid=fiddata(num_file,bi,bj) |
|
./pkg/profiles/profiles_init_fixed.F |
684 |
PROFILES_INIT_FIXED |
& fiddata(num_file,bi,bj),fnameequinc, |
|
./pkg/profiles/profiles_init_fixed.F |
694 |
PROFILES_INIT_FIXED |
call PROFILES_INIT_NCFILE(num_file,fiddata(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
717 |
PROFILES_INIT_FIXED |
call PROFILES_INIT_NCFILE(num_file,fiddata(num_file,bi,bj), |
|
./pkg/profiles/profiles_init_fixed.F |
734 |
PROFILES_INIT_FIXED |
call PROFILES_INIT_NCFILE(num_file,fiddata(num_file,bi,bj), |
|
./pkg/profiles/profiles_readvector.F |
48 |
PROFILES_READVECTOR |
err = NF_INQ_DIMID(fiddata(fNb,bi,bj),'iPROF', varid1) |
|
./pkg/profiles/profiles_readvector.F |
49 |
PROFILES_READVECTOR |
err = NF_INQ_DIMLEN(fiddata(fNb,bi,bj), varid1, tmpprofno) |
|
./pkg/profiles/profiles_readvector.F |
84 |
PROFILES_READVECTOR |
err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_names(fNb,kkk), |
|
./pkg/profiles/profiles_readvector.F |
86 |
PROFILES_READVECTOR |
err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start, |
|
./pkg/profiles/profiles_readvector.F |
88 |
PROFILES_READVECTOR |
err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_namesweight(fNb,kkk) |
|
./pkg/profiles/profiles_readvector.F |
90 |
PROFILES_READVECTOR |
err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start, |
|
./pkg/profiles/profiles_readvector.F |
93 |
PROFILES_READVECTOR |
err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_namesclim(fNb,kkk) |
|
./pkg/profiles/profiles_readvector.F |
95 |
PROFILES_READVECTOR |
err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start, |