| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/active_file_control_profiles.F |
132 |
ACTIVE_READ_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
147 |
ACTIVE_READ_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
212 |
ACTIVE_READ_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
313 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
372 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
388 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
445 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_INQ_VARID(fid, prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/active_file_control_profiles.F |
80 |
ACTIVE_READ_PROFILE_RL |
err = NF_INQ_VARID(fid,prof_names(active_num_file,active_varnum), |
|
./pkg/profiles/cost_profiles.F |
340 |
COST_PROFILES |
iL = ILNBLNK( prof_names(1,num_var) ) |
|
./pkg/profiles/cost_profiles.F |
341 |
COST_PROFILES |
write(cfile,'(2a)') prof_names(1,num_var)(1:iL), |
|
./pkg/profiles/cost_profiles.F |
356 |
COST_PROFILES |
write(cfile,'(2a)')prof_names(1,num_var)(1:iL), |
|
./pkg/profiles/cost_profiles.F |
374 |
COST_PROFILES |
& prof_names(1,num_var)(1:iL),'_weight_mean.data' |
|
./pkg/profiles/cost_profiles.F |
388 |
COST_PROFILES |
write(cfile,'(2a)')prof_names(1,num_var)(1:iL), |
|
./pkg/profiles/cost_profiles.F |
529 |
COST_PROFILES |
& prof_names(num_file,num_var), |
|
./pkg/profiles/cost_profiles.F |
598 |
COST_PROFILES |
write(msgbuf,'(a,a5,D22.15,D22.15)') prof_names(1,num_var), |
|
./pkg/profiles/profiles.h |
102 |
NO PROCEDURE |
COMMON /profiles_c/ prof_names, prof_namesmask, |
|
./pkg/profiles/profiles.h |
37 |
NO PROCEDURE |
character*(8) prof_names(NFILESPROFMAX,NVARMAX) |
|
./pkg/profiles/profiles_init_fixed.F |
630 |
PROFILES_INIT_FIXED |
JL = ILNBLNK( prof_names(num_file,k) ) |
|
./pkg/profiles/profiles_init_fixed.F |
631 |
PROFILES_INIT_FIXED |
err = NF_INQ_VARID(fid,prof_names(num_file,k)(1:JL), varid1 ) |
|
./pkg/profiles/profiles_init_fixed.F |
645 |
PROFILES_INIT_FIXED |
KL = ILNBLNK( prof_names(num_file,k) ) |
|
./pkg/profiles/profiles_init_fixed.F |
649 |
PROFILES_INIT_FIXED |
& prof_names(num_file,k)(1:KL),' and ', |
|
./pkg/profiles/profiles_init_fixed.F |
655 |
PROFILES_INIT_FIXED |
& prof_names(num_file,k)(1:KL),' and ', |
|
./pkg/profiles/profiles_init_ncfile.F |
51 |
PROFILES_INIT_NCFILE |
err = NF_INQ_VARID(fid1,prof_names(num_file,num_var), varid0 ) |
|
./pkg/profiles/profiles_init_ncfile.F |
54 |
PROFILES_INIT_NCFILE |
err = NF_DEF_VAR (fid2,prof_names(num_file,num_var), NF_DOUBLE, |
|
./pkg/profiles/profiles_readparms.F |
144 |
PROFILES_READPARMS |
if (prof_names(num_file,num_var).NE.'empty') |
|
./pkg/profiles/profiles_readparms.F |
149 |
PROFILES_READPARMS |
prof_names(num_file,1)='prof_T' |
|
./pkg/profiles/profiles_readparms.F |
150 |
PROFILES_READPARMS |
prof_names(num_file,2)='prof_S' |
|
./pkg/profiles/profiles_readparms.F |
160 |
PROFILES_READPARMS |
if (((prof_names(num_file,num_var).NE.'empty').AND. |
|
./pkg/profiles/profiles_readparms.F |
162 |
PROFILES_READPARMS |
& ((prof_names(num_file,num_var).EQ.'empty').AND. |
|
./pkg/profiles/profiles_readparms.F |
164 |
PROFILES_READPARMS |
print*,'prof_names=',prof_names(num_file,num_var),' ', |
|
./pkg/profiles/profiles_readparms.F |
175 |
PROFILES_READPARMS |
IL = ILNBLNK( prof_names(num_file,num_var) ) |
|
./pkg/profiles/profiles_readparms.F |
177 |
PROFILES_READPARMS |
& prof_names(num_file,num_var)(1:IL),'mask' |
|
./pkg/profiles/profiles_readparms.F |
179 |
PROFILES_READPARMS |
& prof_names(num_file,num_var)(1:IL),'weight' |
|
./pkg/profiles/profiles_readparms.F |
182 |
PROFILES_READPARMS |
& prof_names(num_file,num_var)(1:IL),'clim' |
|
./pkg/profiles/profiles_readparms.F |
60 |
PROFILES_READPARMS |
& prof_names, |
|
./pkg/profiles/profiles_readparms.F |
94 |
PROFILES_READPARMS |
prof_names(num_file,num_var)='empty' |
|
./pkg/profiles/profiles_readvector.F |
84 |
PROFILES_READVECTOR |
err = NF_INQ_VARID(fiddata(fNb,bi,bj),prof_names(fNb,kkk), |
|
./pkg/ecco/ecco_cost_final.F |
1535 |
ECCO_COST_FINAL |
& prof_names(num_file,num_var), ' = ', |
|
./pkg/ecco/ecco_cost_final.F |
1545 |
ECCO_COST_FINAL |
& prof_names(1,num_var), ' = ', |