Symbol Description Uses
traj_cur 10


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)