| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/cost_profiles.F |
108 |
COST_PROFILES |
& prof_num,.false.,optimcycle,bi,bj,mythid, |
|
./pkg/profiles/cost_profiles.F |
112 |
COST_PROFILES |
& prof_ind_glob(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
116 |
COST_PROFILES |
& prof_ind_glob(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
43 |
COST_PROFILES |
integer K,num_file,num_var,prof_num |
|
./pkg/profiles/cost_profiles.F |
62 |
COST_PROFILES |
do prof_num=1,NOBSGLOB |
|
./pkg/profiles/cost_profiles.F |
63 |
COST_PROFILES |
if (prof_num.LE.ProfNo(num_file,bi,bj)) then |
|
./pkg/profiles/cost_profiles.F |
67 |
COST_PROFILES |
prof_i1D(k)= prof_interp_i(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/cost_profiles.F |
68 |
COST_PROFILES |
prof_j1D(k)= prof_interp_j(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/cost_profiles.F |
69 |
COST_PROFILES |
prof_w1D(k)= prof_interp_weights(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/cost_profiles.F |
89 |
COST_PROFILES |
& prof_lon(num_file,prof_num,bi,bj), |
|
./pkg/profiles/cost_profiles.F |
90 |
COST_PROFILES |
& prof_lat(num_file,prof_num,bi,bj), |
|
./pkg/profiles/profiles_inloop.F |
42 |
PROFILES_INLOOP |
integer k,bi,bj,prof_num, num_file, num_var |
|
./pkg/profiles/profiles_inloop.F |
64 |
PROFILES_INLOOP |
do prof_num=1,NOBSGLOB |
|
./pkg/profiles/profiles_inloop.F |
65 |
PROFILES_INLOOP |
if (prof_num.LE.ProfNo(num_file,bi,bj)) then |
|
./pkg/profiles/profiles_inloop.F |
66 |
PROFILES_INLOOP |
if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND. |
|
./pkg/profiles/profiles_inloop.F |
67 |
PROFILES_INLOOP |
& (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock))) |
|
./pkg/profiles/profiles_inloop.F |
72 |
PROFILES_INLOOP |
prof_i1D(k)= prof_interp_i(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/profiles_inloop.F |
73 |
PROFILES_INLOOP |
prof_j1D(k)= prof_interp_j(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/profiles_inloop.F |
74 |
PROFILES_INLOOP |
prof_w1D(k)= prof_interp_weights(num_file,prof_num,k,bi,bj) |
|
./pkg/profiles/profiles_inloop.F |
86 |
PROFILES_INLOOP |
& prof_lon(num_file,prof_num,bi,bj), |
|
./pkg/profiles/profiles_inloop.F |
87 |
PROFILES_INLOOP |
& prof_lat(num_file,prof_num,bi,bj), |
|
./pkg/profiles/profiles_inloop.F |
96 |
PROFILES_INLOOP |
&prof_num,optimcycle,bi,bj,mythid, |