suppress warning at the compilation phase in sbccpl and sbcana

[gm]

There is 3 warning in sbccpl.F90 when compiling without key_mpp. A solution to remove them is to change the definition of the dummy routines "sbc_cpl_ice_tau " and "sbc_cpl_ice_flx" into:

   SUBROUTINE sbc_cpl_snd( kt )
      WRITE(*,*) 'sbc_cpl_snd: You should not have seen this print! error?', kt
   END SUBROUTINE sbc_cpl_snd
   SUBROUTINE sbc_cpl_rcv( kt, k_fsbc, k_ice )
      WRITE(*,*) 'sbc_cpl_snd: You should not have seen this print! error?', kt, k_fsbc, k_ice
   END SUBROUTINE sbc_cpl_rcv
   SUBROUTINE sbc_cpl_ice_tau( p_taui, p_tauj )
      REAL, DIMENSION(:,:) ::   p_taui, p_tauj
      WRITE(*,*) 'sbc_cpl_snd: You should not have seen this print! error?', p_taui(1,1), p_tauj(1,1)
   END SUBROUTINE sbc_cpl_ice_tau
   SUBROUTINE sbc_cpl_ice_flx( p_frld, pqns_tot, pqns_ice, pqsr_tot , pqsr_ice,   &
      &                                pemp_tot, pemp_ice, pdqns_ice, psprecip,   &
      &                                palbi   , psst    , pist                 )
      REAL, DIMENSION(:,:,:) ::   p_frld, pqns_ice, pqsr_ice, pdqns_ice
      REAL, DIMENSION(:,:  ) ::   pqns_tot, pqsr_tot, pemp_tot, pemp_ice, psprecip
      REAL, DIMENSION(:,:  ), OPTIONAL ::   psst
      REAL, DIMENSION(:,:,:), OPTIONAL ::   palbi, pist
      WRITE(*,*) 'sbc_cpl_snd: You should not have seen this print! error?',              &
         &   p_frld(1,1,1), pqns_ice(1,1,1), pqsr_ice(1,1,1), pdqns_ice(1,1,1),           &
         &   pqns_tot(1,1), pqsr_tot(1,1), pemp_tot(1,1), pemp_ice(1,1), psprecip(1,1),   &
         &   psst(1,1), palbi(1,1,1), pist(1,1,1)
   END SUBROUTINE sbc_cpl_ice_flx

There is also 1 warning in sbcana. Simply suppress the declaration of ji, jj in the sbc_ana routine

[anonymous]

Milestone 2009 Stream 2: Developer Interfaces deleted