var Componentes_DRP_Prob_Falla = ['id_componente', 'txt_id_equipo_', 'txt_id_drp_', 'txt_anio_inspeccion',
    'DRP_Tipo_Asiento_', 'DRP_txt_presion_operacion_', 'DRP_Tipo_Dispositivo_', 'DRP_txt_frecc_inspeccion_', 'DRP_Severidad_Fluido_',
    'DRP_Severidad_Descarga_', 'DRP_Severidad_AjusteAmbiental_', 'DRP_txt_presion_ajuste_', 'DRP_txt_mawp_',
    'DRP_txt_factor_danio_', 'DRP_txt_factor_psm_', 'DRP_txt_presion_operacion_', 'DRP_overhauled_', 'DRP_anio_de_inspeccion_',
    'DRP_combo_efectividad_', 'DRP_combo_Paso_', 'DRP_combo_Fuga_', 'DRP_tiempo_entre_inspeccion_',
    'DRP_txt_sobrepresion_escenario_', 'DRP_combo_tipo_escenarios_', 'DRP_escenario_', 'DRP_chk_Equipo_protegido_', 'DRP_txt_areatotal_',
    'DRP_txt_areatotalevaluada_', 'DRP_txt_pofobjetivo_', 'DRP_P_prd_f_j_', 'DRP_nupd_', 'DRP_txt_gff_',
    'DRP_txt_prob_falla_', 'DRP_txt_prob_fuga_', 'DRP_Severidad_Fluido_FUGA_', 'DRP_txt_prob_falla_total_', 'DRP_nupd_Fuga_',
    'DRP_chk_DiscoRuptura_', 'DRP_txt_presion_sobrepresion_', 'DRP_chk_versimulador_', 'DRP_txt_anio_proxima_inspeccion_',
    'DRP_txt_tipo_de_equipo_', 'DRP_txt_marca_', 'DRP_txt_modelo_', 'DRP_txt_numserie_', 'DRP_Factor_danio_FD_',
    'DRP_fecha_analisis_FD_', 'NombreImagen_', 'DRP_combo_efectividad_Nueva_','Grafica_POF_DRP_Efectividad_','Grafica_POF_DRP_Comparativa_'];


$(document).ready(function () {

    var UltimaPosicion = 0;
    var Vector_PofFalla = new Array();
    var Vector_PofFuga = new Array();
    var Simulacion = false;
    var NuevaEfectividadSimulador = '';
    var SumaEscenario1 = new Escenarios();
    var NumeroDeInspecciones = 15;
    var NumeroDeEscenarios= 3;


    $(document).on("click", '#CalcularProb_Falla_DRP', function () {
        FuncionCalcular(false)
    });

    function FuncionCalcular(Simulador) {
        try {

            //alert('Entra');

            Simulacion = Simulador;

           // $("#SalidaMemoria").html("");

            var DRP_chk_DiscoRuptura_ = ($("#DRP_chk_DiscoRuptura_1").is(":checked")) ? true : false;

            CalcularProb_Falla_DRP();

            if (DRP_chk_DiscoRuptura_ == false) {
                CalcularProbabilidad_FUGA_DRP();
            } else {
                $('#DRP_txt_prob_fuga_1').val("0");
            }



            if (Simulacion == true) {

            } else {
                var DRP_txt_prob_fuga_1 = $.fn.Convertir_double($('#DRP_txt_prob_fuga_1').val());
                var DRP_txt_prob_falla_1 = $.fn.Convertir_double($('#DRP_txt_prob_falla_1').val());
                var Total = DRP_txt_prob_falla_1 + DRP_txt_prob_fuga_1;
                $('#DRP_txt_prob_falla_total_1').val(Total);
                $('#DRP_txt_anio_proxima_inspeccion_1').val("");
            }

            if ('' != 'OK') {
                // $('#SalidaMemoria').html("");
            }

        } catch (Error) {

        }
    }
 

    function CalcularProb_Falla_DRP()
    {
        try {

            // alert("Entra al calculo PRo Falla");

            //$("#SalidaMemoria").html("");
            $("#SalidaMemoria").append("<h2>______ MEMORIA CALCULO PROBABILIDAD DE FALLA ______ </h2>");
            // EspersorRequerido = parseFloat($("#tmin_requerido" + Renglon).val());

            var FC = 0, FENV = 0, NDEF = 0, NMOD = 0, FA = 0, BETA = 0, TiempoTotal = 0, DRP_txt_prob_falla_1 = 0;

            var DRP_Tipo_Dispositivo_1 = $('#DRP_Tipo_Dispositivo_1').val();
            var DRP_Severidad_Descarga_1 = $('#DRP_Severidad_Descarga_1').val();
            var DRP_Severidad_Fluido_1 = $('#DRP_Severidad_Fluido_1').val();
            var DRP_Severidad_AjusteAmbiental_1 = $('#DRP_Severidad_AjusteAmbiental_1').val();

            if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Descarga_1 == 'Sistema Cerrado o quemador (flare)') {
                FC = 0.75;
            } else {
                FC = 1;
            }

            // OBTENEMOS LOS VALORES DE LA TABLA
            if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 50.5;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 23.9;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 17.6;
                BETA = 1.8;
            } else {
                // NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 50.5;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 23.9;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 17.6;
                BETA = 1.8;
            } else {
                // NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 33.7;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 8.0;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 3.5;
                BETA = 1.8;
            } else {
                //  NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 50.5;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 50.5;
                BETA = 1.8;
            } else if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 50.5;
                BETA = 1.8;
            } else {
                // NDEF = 0;
            }

            if (NDEF == 0) {
                //  NDEF = 0.75;
            }

            // Ajuste ambiental
            if (DRP_Severidad_AjusteAmbiental_1 == 'Temperatura de Operación 200°F < T < 500°F' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Temperatura de Operación T > 500°F' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Rango Operacional >90% para DRP con resorte o 95% para piloteadas' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Tubería instalada con vibración' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Servicio cíclico') {
                FENV = 1;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Historial de actuación excesiva en servicio (>5 por año)' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Historial de Chatter') {
                FENV = 0.5;
            } 

            NMOD = FC * FENV * NDEF;

           // NMOD = round(NMOD, 3);

            $("#SalidaMemoria").append("<br> <br> DRP_Tipo_Dispositivo_1 : " + DRP_Tipo_Dispositivo_1 +
                    "<br> DRP_Severidad_Fluido_1 : " + DRP_Severidad_Fluido_1 + " <br> FC: " + FC + " <br> FENV: " + FENV + " <br> NDEF : " + NDEF + " <br> NMOD : " + NMOD);

            var DRP_chk_Equipo_protegido_1 = ($("#DRP_chk_Equipo_protegido_1").is(":checked")) ? true : false;

            if (DRP_chk_Equipo_protegido_1 == true) {
                var DRP_txt_areatotal_1 = $.fn.Convertir_double($('#DRP_txt_areatotal_1').val(), $('#DRP_txt_areatotal_1'));
                var DRP_txt_areatotalevaluada_ = $.fn.Convertir_double($('#DRP_txt_areatotalevaluada_1').val(), $('#DRP_txt_areatotalevaluada_1'));
                FA = Math.pow((DRP_txt_areatotal_1 / DRP_txt_areatotalevaluada_), 0.5);
            } else {
                FA = 1;
            }

            $("#SalidaMemoria").append("<br> FA : " + FA);

            var NMOD_Original = NMOD;

            for (var Posicion = 1; Posicion <= NumeroDeInspecciones ; Posicion++) {

                var nupd1 = 0;

                var DRP_tiempo_entre_inspeccion_ = $.fn.Convertir_double($('#DRP_tiempo_entre_inspeccion_' + Posicion).val(), $('#DRP_tiempo_entre_inspeccion_' + Posicion));

                var DRP_overhauled_ = ($('#DRP_overhauled_' + Posicion).is(":checked")) ? true : false;

                if (DRP_tiempo_entre_inspeccion_ > 0)
                {
                    nupd1 = Calcular_NMOD_POB_FALLA(Posicion, NMOD, DRP_tiempo_entre_inspeccion_, BETA);

                    $('#DRP_nupd_' + Posicion).val(nupd1);

                    if (DRP_overhauled_ == false) {
                        NMOD = nupd1;
                    } else if (DRP_overhauled_ == true) {
                        NMOD = NMOD_Original;
                    }

                    TiempoTotal += DRP_tiempo_entre_inspeccion_;

                    $("#SalidaMemoria").append("<br> <div class='ErrordeEntrada' > Tiene OverHauled : " + DRP_overhauled_ + " </div> <br> NMOD_Original : " + NMOD_Original + " ; Tiempo Total : " + TiempoTotal);


                    UltimaPosicion = Posicion;

                } else {
                    // $('#DRP_nupd_' + Posicion).val(NMOD);
                }


                var fd = $.fn.Convertir_double($('#DRP_Factor_danio_FD_' + Posicion).val(), $('#DRP_Factor_danio_FD_' + Posicion));

                if (fd > 0) {
                    $('#DRP_txt_factor_danio_1').val(fd);
                }

            }

            for (var Posicion = 1; Posicion <= NumeroDeInspecciones ; Posicion++) {

                var DRP_P_prd_f_j_ = 0;

                var DRP_txt_sobrepresion_escenario_ = $.fn.Convertir_double($('#DRP_txt_sobrepresion_escenario_' + Posicion).val(),
                        $('#DRP_txt_sobrepresion_escenario_' + Posicion));

                var DRP_escenario_ = ($('#DRP_escenario_' + Posicion).is(":checked")) ? true : false;

                if (DRP_txt_sobrepresion_escenario_ > 0 && DRP_escenario_ == true)
                {
                    var DRP_combo_tipo_escenarios_ = $('#DRP_combo_tipo_escenarios_' + Posicion).val();

                    DRP_P_prd_f_j_ = Calcular_P_PRD_F_J(Posicion, NMOD, TiempoTotal, BETA, DRP_txt_sobrepresion_escenario_, FA, DRP_combo_tipo_escenarios_);

                    $('#DRP_P_prd_f_j_' + Posicion).val(DRP_P_prd_f_j_);
                    
                    if(parseFloat(DRP_P_prd_f_j_) > 0){                    
                       DRP_txt_prob_falla_1 += DRP_P_prd_f_j_;
                     }
                }
            }

            if (Simulacion == true) {
                SimuladorGrafica_POB_FALLA();
            } else {
                $('#DRP_txt_prob_falla_1').val(DRP_txt_prob_falla_1);
            }

        } catch (Error) {

        }
    }

    function Calcular_NMOD_POB_FALLA(Posicion, Nmod, Tiempo, BETA) {
        try {
            var P_prd_F_prior = 0, P_prd_P_prior = 0, P_prd_F_COND = 0;
            var CF_PASS = 0, CF_FAIL = 0;
            var P_prd_F_WGT = 0;
            var Aux1 = 0, Aux2 = 0;
            var NUPD_Update = 0;
            Aux1 = (Tiempo / Nmod);
            Aux1 = (-1) * (Math.pow(Aux1, BETA));

            P_prd_F_prior = 1 - Math.exp(Aux1); // EQ 1.17

            P_prd_P_prior = 1 - P_prd_F_prior; // EQ 1.18

            var DRP_combo_efectividad_ = $('#DRP_combo_efectividad_' + Posicion).val();

            if (Simulacion == true) {
                DRP_combo_efectividad_ = NuevaEfectividadSimulador;
            }
            
            if( DRP_combo_efectividad_ != undefined && DRP_combo_efectividad_ != '' ){

            var DRP_combo_Paso_ = $('#DRP_combo_Paso_' + Posicion).val();

            $("#SalidaMemoria").append("<br><br> INSPECCIÓN " + Posicion + " ; Efectividad : " + DRP_combo_efectividad_ + ' ; Paso o Fallo : ' + DRP_combo_Paso_);
            $("#SalidaMemoria").append("<br> NMOD/NUPD : " + Nmod);
            $("#SalidaMemoria").append("<br> <b> Tiempo Entre Inspeccion : " + Tiempo + "</b> , BETA : " + BETA);
            $("#SalidaMemoria").append("<br> P_prd_F_prior : " + P_prd_F_prior + "<br> P_prd_P_prior : " + P_prd_P_prior);
            
            //Cuando Paso

            if (DRP_combo_efectividad_ == 'Regularmente') {
                CF_PASS = 0.50;
                CF_FAIL = 0.70;
            } else if (DRP_combo_efectividad_ == 'Usualmente') {
                CF_PASS = 0.70;
                CF_FAIL = 0.95;
            } else if (DRP_combo_efectividad_ == 'Altamente') {
                CF_PASS = 0.90;
                CF_FAIL = 0.95;
            }

            $("#SalidaMemoria").append("<br> CF_PASS : " + CF_PASS + " , CF_FAIL : " + CF_FAIL);

            if (DRP_combo_Paso_ == 'Paso') {
                P_prd_F_COND = (1 - CF_PASS) * P_prd_P_prior; // EQ 1.19
            } else if (DRP_combo_Paso_ == 'Fallo') {
                P_prd_F_COND = CF_FAIL * P_prd_F_prior + (1 - CF_PASS) * P_prd_P_prior; // EQ 1.19
            }

            $("#SalidaMemoria").append("<br> P_prd_F_COND : " + P_prd_F_COND);
            // Sguienet paso

            if ((DRP_combo_efectividad_ == 'Regularmente' ||
                    DRP_combo_efectividad_ == 'Usualmente' ||
                    DRP_combo_efectividad_ == 'Altamente') &&
                    DRP_combo_Paso_ == 'Paso')
            {
                P_prd_F_WGT = P_prd_F_prior - (0.2 * (P_prd_F_prior * (Tiempo / Nmod))) + (0.2 * P_prd_F_COND * (Tiempo / Nmod));
            }


            if ((DRP_combo_efectividad_ == 'Usualmente' ||
                    DRP_combo_efectividad_ == 'Altamente') &&
                    DRP_combo_Paso_ == 'Fallo')
            {
                P_prd_F_WGT = P_prd_F_COND;
            }

            if (DRP_combo_efectividad_ == 'Regularmente' &&
                    DRP_combo_Paso_ == 'Fallo')
            {
                P_prd_F_WGT = (0.5 * P_prd_F_prior) + (0.5 * P_prd_F_COND);
            }

            
            Aux2 = 1 - P_prd_F_WGT;
            Aux2 = (-1) * Math.log(Aux2) ; // log10(Aux2) ;
            
            Aux2 = Math.pow(Aux2, (1 / BETA));
            NUPD_Update = Tiempo / Aux2;
            //NUPD_Update = round(NUPD_Update, 5);
            $("#SalidaMemoria").append("<br> P_prd_F_WGT : " + P_prd_F_WGT);
             $("#SalidaMemoria").append("<br> Aux2 : " + Aux2);
             $("#SalidaMemoria").append("<br> Tiempo : " + Tiempo);
            $("#SalidaMemoria").append("<br> NUPD_Update : " + NUPD_Update);

            return  NUPD_Update;
            
            }

        } catch (Error) {
            return 0;
        }

    } // funcion Caldular

    var Vector_ESCENARIOS = new Array();

    var Vector_ESCENARIOS_fuga = new Array();

    function Calcular_P_PRD_F_J(Posicion, NUPD, Tiempo, BETA, Valor_M, FA, Escenario) {

        try {

            var POJ = 0, Aux1 = 0, Aux2 = 0, Aux3 = 0, F_OP_J = 0, DR = 0, P_F_J = 0, P_FOD = 0, P_FOD_j = 0, P_PRD_F_J_Final = 0;

            var Excenario1 = new Escenarios();

            POJ = Valor_M * FA;

            var DRP_txt_presion_ajuste_1 = $.fn.Convertir_double($('#DRP_txt_presion_ajuste_1').val(), $('#DRP_txt_presion_ajuste_1'));
            var DRP_txt_mawp_1 = $.fn.Convertir_double($('#DRP_txt_mawp_1').val(), $('#DRP_txt_mawp_1'));

            var DRP_txt_gff_1 = $('#DRP_txt_gff_1 option:selected').attr('data-value');

            DRP_txt_gff_1 = parseFloat(DRP_txt_gff_1) * 1;

            // alert('Dos : ' + DRP_txt_gff_1 + ' COMBO' + $('#DRP_txt_gff_1 option:selected').val() );

            var DRP_txt_factor_danio_1 = $.fn.Convertir_double($('#DRP_txt_factor_danio_1').val(), $('#DRP_txt_factor_danio_1'));
            var DRP_txt_factor_psm_1 = $.fn.Convertir_double($('#DRP_txt_factor_psm_1').val(), $('#DRP_txt_factor_psm_1'));

            if ((POJ / DRP_txt_presion_ajuste_1) < 1.3) {
                F_OP_J = 1.0;
            } else if ((POJ / DRP_txt_presion_ajuste_1) > 4.0) {
                F_OP_J = 0.2;
            } else {
                F_OP_J = 1 - (1 / 3.375) * ((POJ / DRP_txt_presion_ajuste_1) - 1.3);
            }

            $("#SalidaMemoria").append("<br><br> CáLCULO DE ESCENARIOS : <b> " + Escenario + " , Posicicion " + Posicion + "</b> ____________________________");

            $("#SalidaMemoria").append("<br> Valor_M: " + Valor_M + " <br> FA : " + FA + " <br> POJ : " + POJ +
                    " .... NUPD : " + NUPD + " ... TiempoTotal : " + Tiempo + ", <br> Factor de Daño : " + DRP_txt_factor_danio_1);

            $("#SalidaMemoria").append("<br> F_OP_J : " + F_OP_J + " , DRP_txt_presion_ajuste_1 : " + DRP_txt_presion_ajuste_1);

            var DRP_combo_tipo_escenarios_ = $('#DRP_combo_tipo_escenarios_' + Posicion).val();

            var EF = 0, DRRF = 0;

            switch (DRP_combo_tipo_escenarios_) {
                case 'Fuego':
                    EF = 0.0040;
                    DRRF = 0.10;
                    break;
                case 'Perdida de Agua de enfriamiento (servicios)':
                    EF = 0.10;
                    DRRF = 1.0;
                    break;
                case 'Falla en suministro de potencia eléctrica':
                    EF = 0.080;
                    DRRF = 1.0;
                    break;
                case 'Descarga bloqueada con control administrativo en sitio':
                    EF = 0.010;
                    DRRF = 1.0;
                    break;
                case 'Descarga bloqueada sin control administrativo':
                    EF = 0.1;
                    DRRF = 1.0;
                    break;
                case 'Falla en válvula de control, con evento en la misma':
                    EF = 0.10;
                    DRRF = 1.0;
                    break;                    
                case 'Falla en válvula de control, con evento direccion opuesta':
                    EF = 0.020;
                    DRRF = 1.0;
                    break;
                case 'Reacción química (RunaWay)':
                    EF = 1.0;
                    DRRF = 1.0;
                    break;
                case 'Ruptura de tubos en intercambiador de calor':
                    EF = 0.0010;
                    DRRF = 1.0;
                    break;
                case 'Falla en bomba de reflujo':
                    EF = 0.2;
                    DRRF = 1.0;
                    break;
                case 'Relevo térmico con control administrativo en sitio':
                    EF = 0.010;
                    DRRF = 1.0;
                    break;
                case 'Relevo térmico sin control administrativo en sitio':
                    EF = 0.10;
                    DRRF = 1.0;
                    break;
                case 'Sobre llenado de líquido con control administrativo en sitio':
                    EF = 0.010;
                    DRRF = 0.10;
                    break;
                case 'Sobre llenado de líquido sin control administrativo en sitio':
                    EF = 0.10;
                    DRRF = 0.10;
                    break;

                default:
                    EF = 0.000;
                    DRRF = 0.00;
                    break;
            } // Fin del Swith
           
            DR = EF * DRRF;
            
            Aux1 = (0.0312881 * DRP_txt_gff_1 * DRP_txt_factor_danio_1 * DRP_txt_factor_psm_1);
           
            Aux2 = 3.464837 * (POJ / DRP_txt_mawp_1);

            Aux2 = Math.pow(Math.E, Aux2);                       

            P_F_J = Aux1 * Aux2;
        
            Aux3 = (-1) * Math.pow((Tiempo / NUPD), BETA);

            P_FOD = 1 - Math.exp(Aux3);            

            P_FOD_j = P_FOD * F_OP_J;         

            P_PRD_F_J_Final = P_FOD_j * DR * P_F_J;
            
            $("#SalidaMemoria").append("<br> EF : " + EF + " , DRRF : " + DRRF);            
            $("#SalidaMemoria").append("<br>  DR : " + DR +" ; Aux1 = " + Aux1 + " , DRP_txt_gff_1 : " + DRP_txt_gff_1 + ' ; DRP_txt_factor_danio_1 :' + DRP_txt_factor_danio_1 + '; DRP_txt_factor_psm_1 : ' + DRP_txt_factor_psm_1);
            $("#SalidaMemoria").append("<br> Aux1 : " + Aux1 + " , Aux2 :  " + Aux2);
            $("#SalidaMemoria").append("<br> P_F_J : " + P_F_J);
            $("#SalidaMemoria").append("<br> Aux3 : " + Aux3);
            $("#SalidaMemoria").append("<br> P_FOD : " + P_FOD);
            $("#SalidaMemoria").append("<br> P_FOD_j : " + P_FOD_j);
            $("#SalidaMemoria").append("<br> P_PRD_F_J_Final : " + P_PRD_F_J_Final);
            
            // Excenario1.P_PRD_F_J_Final = P_PRD_F_J_Final;

            // ASIGNAMOS LOS VALORES A LA CLASE              
            Excenario1.TipoEscenario = Escenario;
            Excenario1.NUPD = NUPD;
            Excenario1.TiempoTotal = Tiempo;
            Excenario1.SobrePresion = DRP_txt_presion_ajuste_1;
            Excenario1.P_PRD_F_J_Final = P_PRD_F_J_Final;
            Excenario1.P_F_J = P_F_J;
            Excenario1.BETA = BETA;
            Excenario1.P_FOD = P_FOD;
            Excenario1.F_OP_J = F_OP_J;
            Excenario1.P_FOD_j = P_FOD_j;
            Excenario1.DR = DR;

            Vector_ESCENARIOS[Posicion] = Excenario1;

            return P_PRD_F_J_Final; //round( P_PRD_F_J_Final , 5 );


        } catch (Error) {

        }

    }

    var Vector_NMODS = new Array();

    function CalcularProbabilidad_FUGA_DRP()
    {
        try { 

            //alert("Entra al calculo PRo FUGA");

            $("#SalidaMemoria").append("<h2>_________ MEMORIA CALCULO PROBABILIDAD DE FUGA _________________ </h2>");
            // EspersorRequerido = parseFloat($("#tmin_requerido" + Renglon).val());

            var FS = 0, FENV = 0, NDEF = 0, NMOD = 0, BETA = 0, TiempoTotal = 0, DRP_txt_prob_fuga_1 = 0, Aux1 = 0, FSET = 0;

            var DRP_Tipo_Dispositivo_1 = $('#DRP_Tipo_Dispositivo_1').val();

            var DRP_Tipo_Asiento_1 = $('#DRP_Tipo_Asiento_1').val();

            var DRP_Severidad_Fluido_1 = $('#DRP_Severidad_Fluido_FUGA_1').val();

            var DRP_Severidad_AjusteAmbiental_1 = $('#DRP_Severidad_AjusteAmbiental_1').val();

            if (DRP_Tipo_Asiento_1 == 'Asientos suaves') {
                FS = 1.25;
            } else if (DRP_Tipo_Asiento_1 == 'El resto de los casos') {
                FS = 1;
            }

            // OBTENEMOS LOS VALORES DE LA TABLA
            if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 17.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 15.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Convencional' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 13.1;
                BETA = 1.6;
            } else {
                // NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 16.0;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 14.0;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 11.5;
                BETA = 1.6;
            } else {
                // NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 17.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 15.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 13.1;
                BETA = 1.6;
            } else {
                //  NDEF = 0;
            }

            if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Ligero') {
                NDEF = 17.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Moderado') {
                NDEF = 17.5;
                BETA = 1.6;
            } else if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura' && DRP_Severidad_Fluido_1 == 'Severo') {
                NDEF = 17.6;
                BETA = 1.8;
            } else {
                // NDEF = 0;
            }

            if (NDEF == 0) {
                //NDEF = 0.75;
            }

            // Ajuste ambiental
            if (DRP_Severidad_AjusteAmbiental_1 == 'Temperatura de Operación 200°F < T < 500°F') {
                FENV = 0.8;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Temperatura de Operación T > 500°F') {
                FENV = 0.6;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Rango Operacional >90% para DRP con resorte o 95% para piloteadas') {
                FENV = 0.5;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Tubería instalada con vibración') {
                FENV = 0.8;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Servicio cíclico') {
                FENV = 0.8;
            } else if (DRP_Severidad_AjusteAmbiental_1 == 'Historial de actuación excesiva en servicio (>5 por año)' ||
                    DRP_Severidad_AjusteAmbiental_1 == 'Historial de Chatter') {
                FENV = 0.5;
            } else {
                //    FENV = 0.0;
            }

            NMOD = FS * FENV * NDEF;

            //NMOD = round(NMOD, 3);

            $("#SalidaMemoria").append("<br> <br> DRP_Tipo_Dispositivo_1 : " + DRP_Tipo_Dispositivo_1 +
                    "<br> DRP_Severidad_Fluido_1 : " + DRP_Severidad_Fluido_1 + " <br> FS: " + FS + " <br> FENV: " + FENV + " <br> NDEF : " + NDEF + " <br> NMOD : " + NMOD);

            var Excenario1 = new Escenarios();

            var NMOD_Original = NMOD;

            for (var Posicion = 1; Posicion <= 15; Posicion++) {

                var nupd1 = 0;

                var DRP_tiempo_entre_inspeccion_ = $.fn.Convertir_double($('#DRP_tiempo_entre_inspeccion_' + Posicion).val(),
                        $('#DRP_tiempo_entre_inspeccion_' + Posicion));

                var DRP_overhauled_ = ($('#DRP_overhauled_' + Posicion).is(":checked")) ? true : false;

                //if (DRP_tiempo_entre_inspeccion_ >= 0 && DRP_overhauled_ == true)
                if (DRP_tiempo_entre_inspeccion_ > 0)
                {
                    nupd1 = Calcular_NUPD_POF_FUGA(Posicion, NMOD, DRP_tiempo_entre_inspeccion_, BETA);

                    $('#DRP_nupd_Fuga_' + Posicion).val(nupd1);

                    // NMOD = nupd1;
                    if (DRP_overhauled_ == false) {
                        NMOD = nupd1;
                    } else if (DRP_overhauled_ == true) {
                        $("#SalidaMemoria").append("<br> <div class='ErrordeEntrada' > Tiene OverHauled : SI  </div>");
                        NMOD = NMOD_Original;
                    }

                    TiempoTotal += DRP_tiempo_entre_inspeccion_;

                    $("#SalidaMemoria").append("<br> NMOD_Original : " + NMOD_Original + '; Tiempo Total (Zuma) : ' + TiempoTotal);

                    Vector_NMODS[UltimaPosicion] = NMOD;

                    UltimaPosicion = Posicion;

                    $('#DRP_txt_UltimoAnio').val($.fn.Convertir_double($('#DRP_anio_de_inspeccion_' + Posicion).val(),
                            $('#DRP_anio_de_inspeccion_' + Posicion)));

                } else {
                    // $('#DRP_nupd_' + Posicion).val(NMOD);
                }
            } // Fin del FOR de POL Fuga

            var P_prd = 0;

            Aux1 = (TiempoTotal / NMOD);
            Aux1 = (-1) * (Math.pow(Aux1, BETA));
            P_prd = 1 - Math.exp(Aux1); // EQ 1.17

            $("#SalidaMemoria").append("<br><br> <b> TiempoTotal : " + TiempoTotal + " </b> .... P_prd : " + P_prd);

            // Calcular FSET 
            var DRP_txt_presion_operacion_1 = $.fn.Convertir_double($('#DRP_txt_presion_operacion_1').val(), $('#DRP_txt_presion_operacion_1'));

            var DRP_txt_presion_ajuste_1 = $.fn.Convertir_double($('#DRP_txt_presion_ajuste_1').val(), $('#DRP_txt_presion_ajuste_1'));

            var menor = 0;
            // OBTENEMOS LOS VALORES DE LA TABLA
            if (DRP_Tipo_Dispositivo_1 == 'Convencional' || DRP_Tipo_Dispositivo_1 == 'Balanceada por Fuelle')
            {
                Aux1 = DRP_txt_presion_operacion_1 / DRP_txt_presion_ajuste_1;
                if (Aux1 < 0.90) {
                    menor = Aux1;
                } else {
                    menor = 0.90;
                }
                FSET = 1 - ((0.90 - menor) / 90);

            } else if (DRP_Tipo_Dispositivo_1 == 'Operadas por Piloto') {
                Aux1 = DRP_txt_presion_operacion_1 / DRP_txt_presion_ajuste_1;
                if (Aux1 < 0.95) {
                    menor = Aux1;
                } else {
                    menor = 0.95;
                }
                FSET = 1 - ((0.95 - menor) / 95);
            } else if (DRP_Tipo_Dispositivo_1 == 'Disco de Ruptura') {
                FSET = 1;
            }
            $("#SalidaMemoria").append("<br> FSET : " + FSET);

            DRP_txt_prob_fuga_1 = P_prd * FSET;

            $("#SalidaMemoria").append("<br> FINAL ----> DRP_txt_prob_fuga_1 : " + DRP_txt_prob_fuga_1);

            $('#DRP_txt_prob_fuga_1').val(DRP_txt_prob_fuga_1);


            // ASIGNAMOS LOS VALORES A LA CLASE            

            // Excenario1.TipoEscenario = Escenario;
            Excenario1.NUPD_FUGA = NMOD;
            Excenario1.FSET_FUGA = FSET;
            Excenario1.TiempoTotal = TiempoTotal;
            // Excenario1.SobrePresion = DRP_txt_presion_ajuste_1;
            // Excenario1.P_PRD_F_J_Final = P_PRD_F_J_Final;
            // Excenario1.P_F_J = P_F_J;
            Excenario1.BETA_FUGA = BETA;
            //  Excenario1.P_FOD = P_FOD;
            // Excenario1.F_OP_J = F_OP_J;
            // Excenario1.P_FOD_j = P_FOD_j;
            //  Excenario1.DR = DR;

            Vector_ESCENARIOS_fuga[1] = Excenario1;

            if (Simulacion == true) {
                SimuladorGrafica_POB_FUGA();
            }

        } catch (Error) {

        }
    }

    function Calcular_NUPD_POF_FUGA(Posicion, Nmod, Tiempo, BETA) {
        try {
            var P_prd_F_prior = 0, P_prd_P_prior = 0, P_prd_F_COND = 0;

            var CF_PASS = 0, CF_FAIL = 0;

            var P_prd_F_WGT = 0;

            var Aux1 = 0, Aux2 = 0;

            var NUPD_Update = 0;

            Aux1 = (Tiempo / Nmod);
            Aux1 = (-1) * (Math.pow(Aux1, BETA));
            P_prd_F_prior = 1 - Math.exp(Aux1); // EQ 1.17

            P_prd_P_prior = 1 - P_prd_F_prior; // EQ 1.18

            $("#SalidaMemoria").append("<br><br> INSPECCIÓN " + Posicion + " _______________________________________________________");
            $("#SalidaMemoria").append("<br> NMOD/NUPD : " + Nmod);
            $("#SalidaMemoria").append("<br> <b> Tiempo entre Inspeccion : " + Tiempo + " </b> , BETA : " + BETA);
            $("#SalidaMemoria").append("<br> P_prd_F_prior : " + P_prd_F_prior);
            $("#SalidaMemoria").append("<br> P_prd_P_prior : " + P_prd_P_prior);
            //Cuando Paso

            var DRP_combo_efectividad_ = $('#DRP_combo_efectividad_' + Posicion).val();

            if (Simulacion == true) {
                DRP_combo_efectividad_ = NuevaEfectividadSimulador;
            }

            var DRP_combo_Paso_ = $('#DRP_combo_Fuga_' + Posicion).val();

            if (DRP_combo_efectividad_ == 'Regularmente' && DRP_combo_Paso_ == 'No fuga') {
                CF_PASS = 0.5;
            } else if (DRP_combo_efectividad_ == 'Regularmente' && DRP_combo_Paso_ == 'Fuga') {
                CF_PASS = 0.5;
                CF_FAIL = 0.7;
            } else if (DRP_combo_efectividad_ == 'Usualmente' && DRP_combo_Paso_ == 'No fuga') {
                CF_PASS = 0.7;
            } else if (DRP_combo_efectividad_ == 'Usualmente' && DRP_combo_Paso_ == 'Fuga') {
                CF_PASS = 0.7;
                CF_FAIL = 0.95;
            } else if (DRP_combo_efectividad_ == 'Altamente' && DRP_combo_Paso_ == 'No fuga') {
                CF_PASS = 0.9;
            } else if (DRP_combo_efectividad_ == 'Altamente' && DRP_combo_Paso_ == 'Fuga') {
                CF_PASS = 0.9;
                CF_FAIL = 0.95;
            }

            $("#SalidaMemoria").append("<br> CF_PASS : " + CF_PASS + " , CF_FAIL : " + CF_FAIL);

            if (DRP_combo_Paso_ == 'No fuga') {
                P_prd_F_COND = (1 - CF_PASS) * P_prd_P_prior; // EQ 1.19
            } else if (DRP_combo_Paso_ == 'Fuga') {
                P_prd_F_COND = CF_FAIL * P_prd_F_prior + (1 - CF_PASS) * P_prd_P_prior; // EQ 1.19
            }

            $("#SalidaMemoria").append("<br>DRP_combo_efectividad_ -> " + DRP_combo_efectividad_ + " ; DRP_combo_Paso_ -> " + DRP_combo_Paso_ + " ;  P_prd_F_COND -> " + P_prd_F_COND);
            // Sguienet paso

            if ((DRP_combo_efectividad_ == 'Regularmente' ||
                    DRP_combo_efectividad_ == 'Usualmente' ||
                    DRP_combo_efectividad_ == 'Altamente') &&
                    DRP_combo_Paso_ == 'No fuga')
            {
                P_prd_F_WGT = P_prd_F_prior - (0.2 * (P_prd_F_prior * (Tiempo / Nmod))) + (0.2 * P_prd_F_COND * (Tiempo / Nmod));
            }


            if ((DRP_combo_efectividad_ == 'Usualmente' ||
                    DRP_combo_efectividad_ == 'Altamente') &&
                    DRP_combo_Paso_ == 'Fuga')
            {
                P_prd_F_WGT = P_prd_F_COND;
            }

            if (DRP_combo_efectividad_ == 'Regularmente' &&
                    DRP_combo_Paso_ == 'Fuga')
            {
                P_prd_F_WGT = (0.5 * P_prd_F_prior) + (0.5 * P_prd_F_COND);
            }

            $("#SalidaMemoria").append("<br> P_prd_F_WGT : " + P_prd_F_WGT);

            Aux2 = 1 - P_prd_F_WGT;

            Aux2 = (-1) * Math.log(Aux2) ; // log10(Aux2);
 
            Aux2 = Math.pow(Aux2, (1 / BETA));

            NUPD_Update = Tiempo / Aux2;

            NUPD_Update = round(NUPD_Update, 5);

            $("#SalidaMemoria").append("<br> <b>  NUPD_Update : " + NUPD_Update + " </b> ");

            return  NUPD_Update;

        } catch (Error) {
            return 0;
        }

    } // funcion Caldular

    function log10(val) {
        return Math.log(val) / Math.LN10;
    }

  


    function SimuladorGrafica_POB_FALLA() {
        try {

            //NMOD_1_Fuga var NMOD_1_copia = NMOD_1;
            $('#SalidaMemoria').append("<br> <H2> INICIA EL SIMULADOR POB FALLA </H2> ");
            
              $("#SalidaMemoria").append("<tabla>");
                    

            for (var x = 0; x < 20; x++) {  // Numero de Años de la simulación      
                $("#SalidaMemoria").append("<tr> <th> Ciclo </th> <th> NuevoTiempo </th> <th> Escenario </th> <th> NUPD </th> <th> BETA </th> <th> P_FOD </th> <th> P_FOD_j </th> </tr>");

                var suma = 0;

                for (var Posicion = 1; Posicion <= 15; Posicion++) {

                    var Excenario1 = new Escenarios();

                    Excenario1 = Vector_ESCENARIOS[Posicion];

                  
                    if (Excenario1 != undefined) {

                        if (Excenario1.SobrePresion > 0)
                        {
                            var tiempo = Excenario1.TiempoTotal + x;                         

                            var Aux3 = (-1) * Math.pow((tiempo / Excenario1.NUPD), Excenario1.BETA);                           

                            Excenario1.P_FOD = 1 - Math.exp(Aux3);

                            Excenario1.P_FOD_j = Excenario1.P_FOD * Excenario1.F_OP_J;
                            
                            Excenario1.P_PRD_F_J_Final = Excenario1.P_FOD_j * Excenario1.DR * Excenario1.P_F_J;

                            $("#SalidaMemoria").append("<br> P_FOD_j : " + Excenario1.P_FOD_j + " , DR->" + Excenario1.DR + " , P_F_J-> " + Excenario1.P_F_J);

                            $("#SalidaMemoria").append("<br> P_PRD_F_J_Final : " + Excenario1.P_PRD_F_J_Final);

                            suma = suma + Excenario1.P_PRD_F_J_Final;
                            
                            $("#SalidaMemoria").append("<TR> <th> " + x + " </th> <th> " + tiempo + " </th> <th> " + Excenario1.TipoEscenario +
                                    " </th> <th> " + Excenario1.NUPD + " </th> </th> <th> " + Excenario1.BETA + 
                                    " </th> <th> " + Excenario1.P_FOD + " </th> <th> " + Excenario1.P_FOD_j + " </th>  </tr>");
                        }

                    } //Escenario Undefined

                } // sumatoria de todos los Escenarios
                
                Vector_PofFalla[x] = suma;

            } // Numero de Años del Excenario
            $("#SalidaMemoria").append("</tabla>");

            $('#SalidaMemoria').append("<br> <BR> RESULTADOS SIMULADOR POF FALLA: ________________________");

            $('#SalidaMemoria').append("<br> VECTOR POF FALLA : ");
            for (var x = 0; x < Vector_PofFalla.length; x++) {
                $('#SalidaMemoria').append("<br> Vector_PofFalla[" + x + "]->" + Vector_PofFalla[x]);
            }


        } catch (Error) {
            alert("Error " + Error);
        }
    }


    function SimuladorGrafica_POB_FUGA() {
        try {

            //NMOD_1_Fuga var NMOD_1_copia = NMOD_1;
            $('#SalidaMemoria').append("<br> <H2> INICIA EL SIMULADOR FUGA </H2> ");

            for (var x = 0; x < 20; x++) { // Numero de Años de la simulación

                var Excenario1 = new Escenarios();

                Excenario1 = Vector_ESCENARIOS_fuga[1];

                if (Excenario1 != undefined) {

                    Excenario1.TiempoTotal += x;

                    var Aux1 = (Excenario1.TiempoTotal / Excenario1.NUPD_FUGA);
                    
                    Aux1 = (-1) * (Math.pow(Aux1, Excenario1.BETA_FUGA));
                    
                    var P_prd = 1 - Math.exp(Aux1); // EQ 1.17                                                  

                    $("#SalidaMemoria").append("<br><b> Ciclo : " + x + " </b> del Tiempo Actualizado : " + Excenario1.TiempoTotal);
                    $("#SalidaMemoria").append("<br>Con Escenario " + Excenario1.TipoEscenario);
                    $("#SalidaMemoria").append("<br><b>NUPD_FUGA " + Excenario1.NUPD_FUGA + "</b>");
                    $("#SalidaMemoria").append("<br>BETA_FUGA " + Excenario1.BETA_FUGA);
                    $("#SalidaMemoria").append("<br> P_prd : " + P_prd);
                    $("#SalidaMemoria").append("<br> FSET : " + Excenario1.FSET_FUGA);

                    Excenario1.DRP_txt_prob_fuga_1 = P_prd * Excenario1.FSET_FUGA;

                    $("#SalidaMemoria").append("<br> FINAL ----> DRP_txt_prob_fuga_1 : " + Excenario1.DRP_txt_prob_fuga_1);

                    //$('#DRP_txt_prob_fuga_1').val(DRP_txt_prob_fuga_1);

                    Vector_PofFuga[x] = Excenario1.DRP_txt_prob_fuga_1;

                } //Solo una vez                   

            } // ciclo del numero de Años

            $('#SalidaMemoria').append("<br> <BR> RESULTADOS SIMULADOR POF FUGA: ________________________");

            $('#SalidaMemoria').append("<br> VECTOR POF FUGA : ");

            for (var x = 0; x < Vector_PofFuga.length; x++) {
                $('#SalidaMemoria').append("<br> Vector_PofFuga[" + x + "]->" + Vector_PofFuga[x]);
            }

        } catch (Error) {
            alert("Error " + Error);
        }
    }

    $(document).on("click", '#GuardarProbabilidadFallaDRP', function () {
        GuardarProbabilidadFallaDRP();
    });



    function GuardarProbabilidadFallaDRP()
    {

        if ($.fn.LimpiarCadena($("#txt_id_equipo_1").val()) == '') {
            $('#Error').html("!Debe establecer el nombre del Equipo ¡");
            // return false;
        } else {
            $('#Error').html('');
        }

        if ($.fn.LimpiarCadena($("#txt_anio_inspeccion1").val()) == '') {
            //$('#Error').html("!Debe estab¡");
            // return false;
        } else {
            // $('#Error').html('');
        }

        var dataString = 'SAVE_Operation=RECIPIENTES_Guardar_VidaRemanente&cadena=' + $.fn.Leer_Informacion_de_Tablas(1, 15, Componentes_DRP_Prob_Falla) +
                '&Tipo=String_DRP_Modulo_POF&OK';
        // $("#SalidaMemoria").append("<br>Buscar : " + dataString);
        $.fn.Guardando("GuardarProbabilidadFallaDRP", true);

        $.ajax({
            type: "POST",
            url: "SaveData.php",
            data: dataString,
            cache: false,
            success: function (html) {
                location.reload();
                $.fn.Guardando("GuardarProbabilidadFallaDRP", false);
                //$("#SalidaMemoria").append("<br>Buscar : " + html);
            }
        });
        return false;
    }


    $(document).on("change", '#DRP_chk_Equipo_protegido_1', function () {
        // var Material = $(this).val(); //.split("*");
        var DRP_chk_Equipo_protegido_1 = ($(this).is(":checked")) ? true : false;
        if (DRP_chk_Equipo_protegido_1 == true) {
            $("#DRP_txt_areatotal_1").prop("disabled", false);
            $("#DRP_txt_areatotalevaluada_1").prop("disabled", false);
        } else {
            $("#DRP_txt_areatotal_1").prop("disabled", true);
            $("#DRP_txt_areatotalevaluada_1").prop("disabled", true);
        }

    });

    $(document).on("change", '#DRP_txt_gff_1', function () {
        // var Material = $(this).val(); //.split("*");
        var DRP_txt_gff_1 = $('option:selected', this).attr('data-value');

        // alert(DRP_txt_gff_1);

        // DRP_txt_gff_1 = $.fn.Convertir_double(DRP_txt_gff_1);           

    });


    

    $(document).on("click", '#GraficaIBR', function () {

        NuevaEfectividadSimulador = $('#DRP_combo_efectividad_Nueva_1').val();

        if (NuevaEfectividadSimulador != undefined && NuevaEfectividadSimulador != '') {

            FuncionCalcular(true);

            $.fn.GenerarGrafica_IBR_DRP(NuevaEfectividadSimulador, 'Gráfica de POF');
        } else {
            alert("Debe Establecer la nueva Efectividad")
        }

    });

   
    
    $(document).on("click", '#GraficaIBR_Comparativa', function () {
    
        SumaEscenario1 = new Escenarios();

        NuevaEfectividadSimulador = 'Regularmente';
        FuncionCalcular(true);
        SumaEscenario1.Vector_PofFuga_REGULARMENTE = Vector_PofFuga.slice();
        SumaEscenario1.Vector_PofFalla_REGULARMENTE = Vector_PofFalla.slice();            
        //$("#SalidaMemoria").append("<br>  Vector_PofFuga_REGULARMENTE -> " + SumaEscenario1.Vector_PofFuga_REGULARMENTE +' ; Vector_PofFalla_REGULARMENTE -> '+ SumaEscenario1.Vector_PofFalla_REGULARMENTE );

        NuevaEfectividadSimulador = 'Usualmente';
        FuncionCalcular(true);
        SumaEscenario1.Vector_PofFuga_USUALMENTE = Vector_PofFuga.slice();
        SumaEscenario1.Vector_PofFalla_USUALMENTE = Vector_PofFalla.slice();
        //$("#SalidaMemoria").append("<br>  Vector_PofFuga_USUALMENTE -> " + SumaEscenario1.Vector_PofFuga_USUALMENTE +' ; Vector_PofFalla_USUALMENTE -> '+ SumaEscenario1.Vector_PofFalla_USUALMENTE );

        NuevaEfectividadSimulador = 'Altamente';
        FuncionCalcular(true);
        SumaEscenario1.Vector_PofFuga_ALTAMENTE = Vector_PofFuga.slice();
        SumaEscenario1.Vector_PofFalla_ALTAMENTE = Vector_PofFalla.slice();
        //$("#SalidaMemoria").append("<br class='ErrordeEntrada'>  Vector_PofFuga_ALTAMENTE -> " + SumaEscenario1.Vector_PofFuga_ALTAMENTE +' ; Vector_PofFalla_ALTAMENTE -> '+ SumaEscenario1.Vector_PofFalla_ALTAMENTE );

        $.fn.GenerarGrafica_IBR_DRP(NuevaEfectividadSimulador, 'Gráfica de Efectividades' );


    });


    $.fn.GenerarGrafica_IBR_DRP = function (NuevaEfectividadSimulador, TipoDeGrafica)
    {
        var dataString = "";
        
        $("#SalidaMemoria").html('');

        var Grafica = "PROB_FALLA_DRP" + (Math.floor((Math.random() * 10000) + 1)) + ".png";
        var Vector_suma = new Array();
        var Vector_Limite = new Array();
        var VectorAnios = new Array();

        for (var x = 0; x < Vector_PofFalla.length; x++)
        {
            if (TipoDeGrafica == 'Gráfica de POF') {
                
                Vector_suma[x] = Vector_PofFuga[x] + Vector_PofFalla[x];
                Vector_Limite[x] = $.fn.Convertir_double($('#DRP_txt_pofobjetivo_1').val(), $('#DRP_txt_pofobjetivo_1'));
                VectorAnios[x] = $.fn.Convertir_double($('#DRP_txt_UltimoAnio').val()) + x;

                if (Vector_suma[x] > Vector_Limite[x]) {
                    x = 21;
                }
                if (VectorAnios[x] != undefined) {
                    $('#DRP_txt_anio_proxima_inspeccion_1').val(VectorAnios[x]);
                }
                
            } else if ( TipoDeGrafica == 'Gráfica de Efectividades' ) {

                SumaEscenario1.Suma_ALTAMENTE[x] = SumaEscenario1.Vector_PofFuga_ALTAMENTE[x] + SumaEscenario1.Vector_PofFalla_ALTAMENTE[x];
                SumaEscenario1.Suma_REGULARMENTE[x] = SumaEscenario1.Vector_PofFuga_REGULARMENTE[x] + SumaEscenario1.Vector_PofFalla_REGULARMENTE[x];
                SumaEscenario1.Suma_USUALMENTE[x] = SumaEscenario1.Vector_PofFuga_USUALMENTE[x] + SumaEscenario1.Vector_PofFalla_USUALMENTE[x];
                
                $("#SalidaMemoria").append("<br> Suma_ALTAMENTE-> "+ SumaEscenario1.Suma_ALTAMENTE[x] +" ; Vector_PofFuga_ALTAMENTE -> " + SumaEscenario1.Vector_PofFuga_ALTAMENTE[x] +' ; Vector_PofFalla_ALTAMENTE -> '+ SumaEscenario1.Vector_PofFalla_ALTAMENTE[x] );
                $("#SalidaMemoria").append("<br> Suma_REGULARMENTE-> "+ SumaEscenario1.Suma_REGULARMENTE[x] +" ; Vector_PofFuga_REGULARMENTE -> " + SumaEscenario1.Vector_PofFuga_REGULARMENTE[x] +' ; Vector_PofFalla_REGULARMENTE -> '+ SumaEscenario1.Vector_PofFalla_REGULARMENTE[x] );
                $("#SalidaMemoria").append("<br> Suma_USUALMENTE-> "+ SumaEscenario1.Suma_USUALMENTE[x] +" ; Vector_PofFuga_USUALMENTE -> " + SumaEscenario1.Vector_PofFuga_USUALMENTE[x] +' ; Vector_PofFalla_USUALMENTE -> '+ SumaEscenario1.Vector_PofFalla_USUALMENTE[x] );

                Vector_Limite[x] = $.fn.Convertir_double($('#DRP_txt_pofobjetivo_1').val(), $('#DRP_txt_pofobjetivo_1'));
                VectorAnios[x] = $.fn.Convertir_double($('#DRP_txt_UltimoAnio').val()) + x;

                if (SumaEscenario1.Suma_ALTAMENTE[x] > Vector_Limite[x]) {
                    x = 21;
                }
                if (VectorAnios[x] != undefined) {
                    $('#DRP_txt_anio_proxima_inspeccion_1').val(VectorAnios[x]);
                }
            }

        }

        dataString = 'VectorCirc=' + Vector_suma + '&VectorLong=' + Vector_suma + '&VectorAnios=' + VectorAnios +
                '&VectorLimite=' + Vector_Limite + '&TipoMawp=&NombreGrafica=' + Grafica +
                '&Componente=&Efectividad=' + NuevaEfectividadSimulador +
                '&AnioEvaluacion=' + $('#DRP_txt_UltimoAnio').val() + '&TipoGrafica=' + TipoDeGrafica +
                '&VectorAltamente=' + SumaEscenario1.Suma_ALTAMENTE + '&VectorRegularmente=' + SumaEscenario1.Suma_REGULARMENTE +
                '&VectorUsualmente=' + SumaEscenario1.Suma_USUALMENTE + '&OK';

        //  alert(dataString);
        $("#SalidaMemoria").append("<br> dataString Grafica : " + dataString);

        $.ajax({
            type: "POST",
            url: "Graficas/Examples/Grafica_DRP_probabilidad.php",
            data: dataString,
            cache: false,
            success: function (html) {
                //$("#TituloModal").html("Grafica de Probabilidad de Falla en demanda y Fuga de la DRP");
                // $("#ContenidoModal").html(html);

                if (TipoDeGrafica == 'Gráfica de POF') {
                    $("#ContenidoModal").html(html);
                    $("#Grafica_POF_DRP_Efectividad_1").val(Grafica);
                    $("#IMG_Grafica_POF_DRP_Efectividad_1").attr("src", "https://tech-inservice.com/NewTech/ToolsCalculos/Graficas/tmp/" + "" + Grafica + "");
                } else {
                    $("#ContenidoModal").html(html);
                    $("#Grafica_POF_DRP_Comparativa_1").val(Grafica);
                    $("#IMG_Grafica_POF_DRP_Comparativa_1").attr("src", "https://tech-inservice.com/NewTech/ToolsCalculos/Graficas/tmp/" + "" + Grafica + "");
                }
            },
            fail: function () {
                alert("Error alguno");
            }
        });

        return false;
    };
});


function Escenarios() {

    this.TipoEscenario = '';
    this.NUPD = 0;
    this.TiempoTotal = 0;
    this.SobrePresion = 0;
    this.P_PRD_F_J_Final = 0;
    this.P_F_J = 0;
    this.BETA = 0;
    this.P_FOD = 0;
    this.F_OP_J = 0;
    this.P_FOD_j = 0;
    this.DR = 0;

//Varibles de Fuga
    this.DRP_txt_prob_fuga_1 = 0;
    this.NUPD_FUGA = 0;
    this.BETA_FUGA = 0;
    this.FSET_FUGA = 0;

    this.UltimoAnio = 0;

    this.Vector_PofFuga_ALTAMENTE = new Array();
    this.Vector_PofFalla_ALTAMENTE = new Array();
    this.Suma_ALTAMENTE = new Array();

    this.Vector_PofFuga_REGULARMENTE = new Array();
    this.Vector_PofFalla_REGULARMENTE = new Array();
    this.Suma_REGULARMENTE = new Array();

    this.Vector_PofFuga_USUALMENTE = new Array();
    this.Vector_PofFalla_USUALMENTE = new Array();
    this.Suma_USUALMENTE = new Array();

}