Symbol Description Uses
f_smrsss 5



File Line number Procedure Code
./pkg/seaice/seaice_cost_final.F 101 SEAICE_COST_FINAL
      CALL GLOBAL_SUM_TILE_RL( objf_smrsss,  f_smrsss,  myThid )
./pkg/seaice/seaice_cost_final.F 115 SEAICE_COST_FINAL
     &     ' --> f_smrarea =',f_smrsss
./pkg/seaice/seaice_cost_final.F 127 SEAICE_COST_FINAL
        WRITE(ifc,*) 'f_smrsss    =', f_smrsss, no_smrsss
./pkg/seaice/seaice_cost_final.F 55 SEAICE_COST_FINAL
      _RL f_smrsss
./pkg/seaice/seaice_cost_final.F 69 SEAICE_COST_FINAL
      f_smrsss   = 0. _d 0