File |
Line number |
Procedure |
Code |
./pkg/profiles/active_file_control_profiles.F |
127 |
ACTIVE_READ_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
128 |
ACTIVE_READ_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
134 |
ACTIVE_READ_PROFILE_RL |
err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
142 |
ACTIVE_READ_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
143 |
ACTIVE_READ_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
149 |
ACTIVE_READ_PROFILE_RL |
err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
207 |
ACTIVE_READ_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
208 |
ACTIVE_READ_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
214 |
ACTIVE_READ_PROFILE_RL |
err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
280 |
ACTIVE_WRITE_PROFILE_RL |
integer err, fid, varid1 , vec_start(2), vec_count(2) |
./pkg/profiles/active_file_control_profiles.F |
308 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
309 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
315 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
320 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
324 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_PUT_VAR1_INT(fid, varid1 , vec_start(2), |
./pkg/profiles/active_file_control_profiles.F |
368 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
369 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
374 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
383 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
384 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
390 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
440 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
441 |
ACTIVE_WRITE_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
447 |
ACTIVE_WRITE_PROFILE_RL |
err = NF_PUT_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
51 |
ACTIVE_READ_PROFILE_RL |
integer err, fid, varid1 , vec_start(2), vec_count(2) |
./pkg/profiles/active_file_control_profiles.F |
75 |
ACTIVE_READ_PROFILE_RL |
vec_start(1)=1 |
./pkg/profiles/active_file_control_profiles.F |
76 |
ACTIVE_READ_PROFILE_RL |
vec_start(2)=irec |
./pkg/profiles/active_file_control_profiles.F |
82 |
ACTIVE_READ_PROFILE_RL |
err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/active_file_control_profiles.F |
87 |
ACTIVE_READ_PROFILE_RL |
err = NF_GET_VARA_DOUBLE(fid, varid1 , vec_start, vec_count, |
./pkg/profiles/profiles_init_fixed.F |
309 |
PROFILES_INIT_FIXED |
vec_start(1)=1 |
./pkg/profiles/profiles_init_fixed.F |
310 |
PROFILES_INIT_FIXED |
vec_start(2)=1+1000*(kk-1) |
./pkg/profiles/profiles_init_fixed.F |
315 |
PROFILES_INIT_FIXED |
& (vec_start(2).LE.0).OR. |
./pkg/profiles/profiles_init_fixed.F |
316 |
PROFILES_INIT_FIXED |
& (vec_count(2)+vec_start(2)-1.GT.ProfNo(num_file,bi,bj)) ) |
./pkg/profiles/profiles_init_fixed.F |
326 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid1a,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
328 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid1b,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
330 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid2,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
332 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid3,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
335 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid4,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
349 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid_intp1,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
351 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid_intp2,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
353 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid_intp11,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
355 |
PROFILES_INIT_FIXED |
err = NF_GET_VARA_DOUBLE(fid,varid_intp22,vec_start(2), |
./pkg/profiles/profiles_init_fixed.F |
55 |
PROFILES_INIT_FIXED |
integer vec_start(2), vec_count(2), profno_div1000, kk |
./pkg/profiles/profiles_readvector.F |
35 |
PROFILES_READVECTOR |
integer vec_start(2),vec_count(2) |
./pkg/profiles/profiles_readvector.F |
76 |
PROFILES_READVECTOR |
vec_start(1)=1 |
./pkg/profiles/profiles_readvector.F |
77 |
PROFILES_READVECTOR |
vec_start(2)=profiles_minind_buff(bi,bj) |
./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 |
90 |
PROFILES_READVECTOR |
err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start, |
./pkg/profiles/profiles_readvector.F |
95 |
PROFILES_READVECTOR |
err = NF_GET_VARA_DOUBLE(fiddata(fNb,bi,bj), varid1 , vec_start, |