Symbol Description Uses
prof_weights1D 5


File Line number Procedure Code
./pkg/profiles/cost_profiles.F 118 COST_PROFILES 
     &           prof_weights1D,bi,bj,myThid)
./pkg/profiles/cost_profiles.F 123 COST_PROFILES 
     &             +prof_weights1D(K)*prof_mask1D_cur(K,bi,bj)
./pkg/profiles/cost_profiles.F 126 COST_PROFILES 
               if (prof_weights1D(K).GT.0.) then
./pkg/profiles/cost_profiles.F 47 COST_PROFILES 
      _RL prof_data1D(NLEVELMAX), prof_weights1D(NLEVELMAX)
./pkg/profiles/cost_profiles.F 80 COST_PROFILES 
             prof_weights1D(k)=0.