Symbol Description Uses
mask_cur 9


File Line number Procedure Code
./pkg/profiles/profiles_interp.F 237 PROFILES_INTERP 
         mask_cur(k)=1
./pkg/profiles/profiles_interp.F 240 PROFILES_INTERP 
         mask_cur(k)=0
./pkg/profiles/profiles_interp.F 247 PROFILES_INTERP 
         mask_cur(k)=0
./pkg/profiles/profiles_interp.F 260 PROFILES_INTERP 
          prof_mask1D_cur(kk,bi,bj)=mask_cur(1)
./pkg/profiles/profiles_interp.F 266 PROFILES_INTERP 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp.F 281 PROFILES_INTERP 
          if (mask_cur(kcur+1).EQ.1.) then
./pkg/profiles/profiles_interp.F 288 PROFILES_INTERP 
            if (mask_cur(kcur).EQ.0.) then
./pkg/profiles/profiles_interp.F 295 PROFILES_INTERP 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(kcur)
./pkg/profiles/profiles_interp.F 59 PROFILES_INTERP 
      _RL traj_cur(nR),mask_cur(nR)