Symbol Description Uses
f_smrsss 7



File Line number Procedure Code
./pkg/seaice/seaice_cost_final.F 118 SEAICE_COST_FINAL
      _GLOBAL_SUM_RL( f_smrsss , myThid )
./pkg/seaice/seaice_cost_final.F 132 SEAICE_COST_FINAL
     &     ' --> f_smrarea =',f_smrsss
./pkg/seaice/seaice_cost_final.F 144 SEAICE_COST_FINAL
        write(ifc,*) 'f_smrsss    =', f_smrsss, no_smrsss
./pkg/seaice/seaice_cost_final.F 50 SEAICE_COST_FINAL
      _RL f_smrsss
./pkg/seaice/seaice_cost_final.F 74 SEAICE_COST_FINAL
      f_smrsss   = 0. _d 0
./pkg/seaice/seaice_cost_final.F 99 SEAICE_COST_FINAL
          f_smrsss = f_smrsss + objf_smrsss(bi,bj)