-- Anlise 5  Chuva total em 24 horas em relao a mdia mensal 
--             
--   Anlise baseada em plano de risco
--   Nome : An_Chuva24h_mensal_MunSP
--   Plano de risco : MunicipiosSP_2500
--   Plano de entrada : hidro
--
local taxa_max_prec_acum = taxa_max_historico_grid('hidro', 24) or 0
local prec_total = taxa_max_prec_acum * 24




-- obter a chuva prevista para o mes corrente (atributo do plano de risco)
local temp = os.date("*t")
local mes = temp.month

print(mes)

local chuvaMes 

if mes == 1 then
  chuvaMes = jan_chuva
elseif mes == 2 then
  chuvaMes = fev_chuva
elseif mes == 3 then
  chuvaMes = mar_chuva
elseif mes == 4 then
  chuvaMes = abr_chuva
elseif mes == 5 then
  chuvaMes = mai_chuva
elseif mes == 6 then
  chuvaMes = jun_chuva
elseif mes == 7 then
  chuvaMes = jul_chuva
elseif mes == 8 then
  chuvaMes = ago_chuva
elseif mes == 9 then
  chuvaMes = set_chuva
elseif mes == 10 then
  chuvaMes = out_chuva
elseif mes == 11 then
  chuvaMes = nov_chuva
else
  chuvaMes = dez_chuva
end

if chuvaMes == nil or chuvaMes == 0 then
  return 0 -- Normal
end

local porcento = prec_total / chuvaMes

if porcento < 0.1 then
  return 0 -- Normal
elseif porcento < 0.2 then
  return 1 -- Observacao
elseif porcento < 0.3 then
  return 2 -- Atencao
elseif porcento < 0.4 then
  return 3 -- Alerta
else
  return 4 -- Alerta maximo
end
