Symbol Description Uses
edge_val 49


File Line number Procedure Code
./pkg/obcs/obcs_apply_seaice.F 108 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 110 OBCS_APPLY_SEAICE 
            HEFF(I,J_obc+1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 111 OBCS_APPLY_SEAICE 
            HEFF(I,J_obc+2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 114 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 116 OBCS_APPLY_SEAICE 
            AREA(I,J_obc+1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 117 OBCS_APPLY_SEAICE 
            AREA(I,J_obc+2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 120 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 122 OBCS_APPLY_SEAICE 
            HSNOW(I,J_obc+1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 123 OBCS_APPLY_SEAICE 
            HSNOW(I,J_obc+2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 127 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 129 OBCS_APPLY_SEAICE 
            HSALT(I,J_obc+1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 130 OBCS_APPLY_SEAICE 
            HSALT(I,J_obc+2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 159 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 161 OBCS_APPLY_SEAICE 
            HEFF(I_obc-1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 162 OBCS_APPLY_SEAICE 
            HEFF(I_obc-2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 165 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 167 OBCS_APPLY_SEAICE 
            AREA(I_obc-1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 168 OBCS_APPLY_SEAICE 
            AREA(I_obc-2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 171 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 173 OBCS_APPLY_SEAICE 
            HSNOW(I_obc-1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 174 OBCS_APPLY_SEAICE 
            HSNOW(I_obc-2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 178 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 180 OBCS_APPLY_SEAICE 
            HSALT(I_obc-1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 181 OBCS_APPLY_SEAICE 
            HSALT(I_obc-2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 210 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 212 OBCS_APPLY_SEAICE 
            HEFF(I_obc+1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 213 OBCS_APPLY_SEAICE 
            HEFF(I_obc+2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 216 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 218 OBCS_APPLY_SEAICE 
            AREA(I_obc+1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 219 OBCS_APPLY_SEAICE 
            AREA(I_obc+2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 222 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 224 OBCS_APPLY_SEAICE 
            HSNOW(I_obc+1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 225 OBCS_APPLY_SEAICE 
            HSNOW(I_obc+2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 229 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 231 OBCS_APPLY_SEAICE 
            HSALT(I_obc+1,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 232 OBCS_APPLY_SEAICE 
            HSALT(I_obc+2,J,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 31 OBCS_APPLY_SEAICE 
      _RL edge_val
./pkg/obcs/obcs_apply_seaice.F 57 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 59 OBCS_APPLY_SEAICE 
            HEFF(I,J_obc-1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 60 OBCS_APPLY_SEAICE 
            HEFF(I,J_obc-2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 63 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 65 OBCS_APPLY_SEAICE 
            AREA(I,J_obc-1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 66 OBCS_APPLY_SEAICE 
            AREA(I,J_obc-2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 69 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 71 OBCS_APPLY_SEAICE 
            HSNOW(I,J_obc-1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 72 OBCS_APPLY_SEAICE 
            HSNOW(I,J_obc-2,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 76 OBCS_APPLY_SEAICE 
            edge_val = 0.5 _d 0 *
./pkg/obcs/obcs_apply_seaice.F 78 OBCS_APPLY_SEAICE 
            HSALT(I,J_obc-1,bi,bj) = edge_val
./pkg/obcs/obcs_apply_seaice.F 79 OBCS_APPLY_SEAICE 
            HSALT(I,J_obc-2,bi,bj) = edge_val