Symbol Description Uses
aimSIfrc sea-ice fraction [0-1] 8


File Line number Procedure Code
./pkg/aim_compon_interf/atm_apply_import.F 123 ATM_APPLY_IMPORT 
           IF ( aimSIfrc(i,j).EQ.0. ) THEN
./pkg/aim_compon_interf/atm_apply_import.F 129 ATM_APPLY_IMPORT 
            aimSIfrc(i,j) = 0.
./pkg/aim_compon_interf/atm_apply_import.F 12 ATM_APPLY_IMPORT 
     U               aimTsoce, aimSIfrc,
./pkg/aim_compon_interf/atm_apply_import.F 52 ATM_APPLY_IMPORT 
      _RL  aimSIfrc(sNx,sNy)
./pkg/aim_v23/aim_sice2aim.F 104 AIM_SICE2AIM 
           iceMask(i,j,bi,bj) = aimSIfrc(i,j)
./pkg/aim_v23/aim_sice2aim.F 14 AIM_SICE2AIM 
     U               aimTsoce, aimSIfrc,
./pkg/aim_v23/aim_sice2aim.F 73 AIM_SICE2AIM 
      _RL  aimSIfrc(sNx,sNy)
./pkg/aim_v23/aim_sice2aim.F 94 AIM_SICE2AIM 
           aimSIfrc(i,j) = iceMask(i,j,bi,bj)