real function y12cck(i,j)
      y12cck = float(itime(k))/60.
      return
      end

.