File |
Line number |
Procedure |
Code |
./pkg/profiles/cost_profiles.F |
106 |
COST_PROFILES |
DO iavgbin = 1, NAVGBINMAX |
./pkg/profiles/cost_profiles.F |
107 |
COST_PROFILES |
avgbinglbsum(iavgbin) = 0 |
./pkg/profiles/cost_profiles.F |
110 |
COST_PROFILES |
prof_traj1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
112 |
COST_PROFILES |
prof_data1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
114 |
COST_PROFILES |
prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
116 |
COST_PROFILES |
prof_count1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
251 |
COST_PROFILES |
DO iavgbin = 1, NAVGBIN |
./pkg/profiles/cost_profiles.F |
252 |
COST_PROFILES |
tmpr6 = avgbinglbsum(iavgbin) |
./pkg/profiles/cost_profiles.F |
254 |
COST_PROFILES |
if(tmpr6.GT.1.1) avgbinglbsum(iavgbin) = tmpr6 |
./pkg/profiles/cost_profiles.F |
271 |
COST_PROFILES |
DO iavgbin = 1, NAVGBIN |
./pkg/profiles/cost_profiles.F |
273 |
COST_PROFILES |
tmpr6 = prof_count1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
275 |
COST_PROFILES |
prof_count1D_all_mean(iavgbin,ikzz,num_var) = tmpr6 |
./pkg/profiles/cost_profiles.F |
277 |
COST_PROFILES |
tmpr9 = prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
279 |
COST_PROFILES |
prof_weights1D_all_mean(iavgbin,ikzz,num_var) = tmpr9 |
./pkg/profiles/cost_profiles.F |
281 |
COST_PROFILES |
tmpr7 = prof_traj1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
283 |
COST_PROFILES |
prof_traj1D_all_mean(iavgbin,ikzz,num_var) = tmpr7 |
./pkg/profiles/cost_profiles.F |
285 |
COST_PROFILES |
tmpr8 = prof_data1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
287 |
COST_PROFILES |
prof_data1D_all_mean(iavgbin,ikzz,num_var) = tmpr8 |
./pkg/profiles/cost_profiles.F |
294 |
COST_PROFILES |
DO iavgbin = 1, NAVGBIN |
./pkg/profiles/cost_profiles.F |
298 |
COST_PROFILES |
IF(prof_count1D_all_mean(iavgbin,ikzz,num_var).GT.0)THEN |
./pkg/profiles/cost_profiles.F |
300 |
COST_PROFILES |
& prof_count1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
301 |
COST_PROFILES |
prof_traj1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
302 |
COST_PROFILES |
& = prof_traj1D_all_mean(iavgbin,ikzz,num_var)* |
./pkg/profiles/cost_profiles.F |
304 |
COST_PROFILES |
prof_data1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
305 |
COST_PROFILES |
& = prof_data1D_all_mean(iavgbin,ikzz,num_var)* |
./pkg/profiles/cost_profiles.F |
307 |
COST_PROFILES |
prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
308 |
COST_PROFILES |
& = prof_weights1D_all_mean(iavgbin,ikzz,num_var)* |
./pkg/profiles/cost_profiles.F |
315 |
COST_PROFILES |
DO iavgbin = 1, NAVGBIN |
./pkg/profiles/cost_profiles.F |
318 |
COST_PROFILES |
IF(prof_count1D_all_mean(iavgbin,ikzz,num_var).GT.0)THEN |
./pkg/profiles/cost_profiles.F |
320 |
COST_PROFILES |
tmp11 = prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
321 |
COST_PROFILES |
& / prof_count1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
322 |
COST_PROFILES |
tmp12 = prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
324 |
COST_PROFILES |
prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
328 |
COST_PROFILES |
if(prof_weights1D_all_mean(iavgbin,ikzz,num_var).NE.0. _d 0) |
./pkg/profiles/cost_profiles.F |
329 |
COST_PROFILES |
& prof_weights1D_all_mean(iavgbin,ikzz,num_var) = |
./pkg/profiles/cost_profiles.F |
330 |
COST_PROFILES |
& 1. _d 0 /prof_weights1D_all_mean(iavgbin,ikzz,num_var) |
./pkg/profiles/cost_profiles.F |
540 |
COST_PROFILES |
DO iavgbin = 1, NAVGBINMAX |
./pkg/profiles/cost_profiles.F |
543 |
COST_PROFILES |
& prof_traj1D_all_mean(iavgbin,k,num_var) |
./pkg/profiles/cost_profiles.F |
545 |
COST_PROFILES |
& prof_data1D_all_mean(iavgbin,k,num_var) |
./pkg/profiles/cost_profiles.F |
547 |
COST_PROFILES |
& prof_weights1D_all_mean(iavgbin,k,num_var) |
./pkg/profiles/cost_profiles.F |
553 |
COST_PROFILES |
& .AND. avgbinglbsum(iavgbin).GT.0 |
./pkg/profiles/cost_profiles.F |
555 |
COST_PROFILES |
if(avgbinglbsum(iavgbin).EQ.1) then |
./pkg/profiles/cost_profiles.F |
62 |
COST_PROFILES |
integer iavgbin,ikzz |