| File |
Line number |
Procedure |
Code |
|
./pkg/profiles/profiles_interp.F |
114 |
PROFILES_INTERP |
traj_cur(k)=0. _d 0 |
|
./pkg/profiles/profiles_interp.F |
117 |
PROFILES_INTERP |
traj_cur(k)=traj_cur(k) |
|
./pkg/profiles/profiles_interp.F |
121 |
PROFILES_INTERP |
traj_cur(k)=0. _d 0 |
|
./pkg/profiles/profiles_interp.F |
134 |
PROFILES_INTERP |
traj_cur_out(kk)=traj_cur(1) |
|
./pkg/profiles/profiles_interp.F |
140 |
PROFILES_INTERP |
traj_cur_out(kk)=traj_cur(nr) |
|
./pkg/profiles/profiles_interp.F |
162 |
PROFILES_INTERP |
traj_cur_out(kk)=(1-tmp_coeff)*traj_cur(kcur) |
|
./pkg/profiles/profiles_interp.F |
163 |
PROFILES_INTERP |
& +tmp_coeff*traj_cur(kcur+1) |
|
./pkg/profiles/profiles_interp.F |
173 |
PROFILES_INTERP |
traj_cur_out(kk)=traj_cur(kcur) |
|
./pkg/profiles/profiles_interp.F |
72 |
PROFILES_INTERP |
_RL traj_cur(nR),mask_cur(nR) |