| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/profiles_inloop.F |
42 |
PROFILES_INLOOP |
integer k,bi,bj,prof_num, num_file, num_var |
|
./pkg/profiles/profiles_inloop.F |
58 |
PROFILES_INLOOP |
do prof_num=1,NOBSGLOB |
|
./pkg/profiles/profiles_inloop.F |
59 |
PROFILES_INLOOP |
if (prof_num.LE.ProfNo(num_file,bi,bj)) then |
|
./pkg/profiles/profiles_inloop.F |
60 |
PROFILES_INLOOP |
if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND. |
|
./pkg/profiles/profiles_inloop.F |
61 |
PROFILES_INLOOP |
& (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock))) |
|
./pkg/profiles/profiles_inloop.F |
71 |
PROFILES_INLOOP |
& prof_lon(num_file,prof_num,bi,bj), |
|
./pkg/profiles/profiles_inloop.F |
72 |
PROFILES_INLOOP |
& prof_lat(num_file,prof_num,bi,bj), |
|
./pkg/profiles/profiles_inloop.F |
76 |
PROFILES_INLOOP |
&prof_num,optimcycle,bi,bj,mythid, |
|
./pkg/profiles/cost_profiles.F |
43 |
COST_PROFILES |
integer K,num_file,num_var,prof_num |
|
./pkg/profiles/cost_profiles.F |
55 |
COST_PROFILES |
do prof_num=1,NOBSGLOB |
|
./pkg/profiles/cost_profiles.F |
56 |
COST_PROFILES |
if (prof_num.LE.ProfNo(num_file,bi,bj)) then |
|
./pkg/profiles/cost_profiles.F |
73 |
COST_PROFILES |
& prof_lon(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
74 |
COST_PROFILES |
& prof_lat(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
86 |
COST_PROFILES |
&prof_num,.false.,optimcycle,bi,bj,mythid, |
|
./pkg/profiles/cost_profiles.F |
89 |
COST_PROFILES |
& prof_ind_glob(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
92 |
COST_PROFILES |
& prof_ind_glob(num_file,prof_num,bi,bj), |