| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_final.F |
1006 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_profiles(num_file,num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1213 |
ECCO_COST_FINAL |
if ( no_profiles(num_file,num_var).GT.zeroRL ) then |
|
./pkg/ecco/ecco_cost_final.F |
1530 |
ECCO_COST_FINAL |
if ( no_profiles(num_file,num_var).GT.zeroRL ) then |
|
./pkg/ecco/ecco_cost_final.F |
1537 |
ECCO_COST_FINAL |
& no_profiles(num_file,num_var) |
|
./pkg/ecco/ecco_cost_final.F |
158 |
ECCO_COST_FINAL |
_RL no_profiles(NFILESPROFMAX,NVARMAX) |
|
./pkg/ecco/ecco_cost_final.F |
391 |
ECCO_COST_FINAL |
no_profiles(num_file,num_var)= 0. _d 0 |
|
./pkg/ecco/ecco_cost_final.F |
759 |
ECCO_COST_FINAL |
no_profiles(num_file,num_var)=no_profiles(num_file,num_var) |