tema 1 MAN n=10
of 10
description
tena
Transcript of tema 1 MAN n=10
JUSTIFICAREA TEHNICO-ECONOMICA A SISTEMELOR EXPERTDATE DE CALCUL:> n := 10;> print(`output redirected...`); # input placeholder 10> P[I] := (2500+n)*10^3; [kW];> print(`output redirected...`); # input placeholder 2510000 [kW]> t[f] := 7000; [h/an];> print(`output redirected...`); # input placeholder 7000 [h ] [--] [an]> g[i] := .8;> print(`output redirected...`); # input placeholder 0.8> k[i] := 0.4e-1;> print(`output redirected...`); # input placeholder 0.04> p[eint] := 900; [lei/kW];> print(`output redirected...`); # input placeholder 900 [lei] [---] [kW ]> i[sp] := 1500000; [LEI/kW];> print(`output redirected...`); # input placeholder 1500000 [LEI] [---] [kW ]> i[personal] := 24*10^3; [om/kW];> print(`output redirected...`); # input placeholder 24000 [om] [--] [kW]> p[eext] := (1/1000)*(100*18000); [lei/kWh];> print(`output redirected...`); # input placeholder 1800 [lei] [---] [kWh]> p[eneliv] := 200*p[eint]; [kW];> print(`output redirected...`); # input placeholder 180000 [kW]> p[avarie] := 1/365;> print(`output redirected...`); # input placeholder 1 --- 365> t[avarie] := p[avarie]*t[f];> print(`output redirected...`); # input placeholder 1400 ---- 73 > P[avarie] := .25*P[I];> print(`output redirected...`); # input placeholder 5 6.2750000 10 > P[cc] := 100*18000; lei/tcc;> print(`output redirected...`); # input placeholder 1800000 lei --- tcc> r[a] := .1;> print(`output redirected...`); # input placeholder 0.1> d[v] := 35; ani;> print(`output redirected...`); # input placeholder 35 ani> an := 8760; ore;> print(`output redirected...`); # input placeholder 8760 ore> c[tehnologie] := 2*10^9;> print(`output redirected...`); # input placeholder 2000000000> i[spmin] := 250000; lei/tcc;> print(`output redirected...`); # input placeholder 250000 lei --- tcc> k[info] := .22;> print(`output redirected...`); # input placeholder 0.22> F[info] := 10*18000; lei/loc;> print(`output redirected...`); # input placeholder 180000 lei --- loc> S[med] := 5000000; lei;> print(`output redirected...`); # input placeholder 5000000 lei> t[dezvoltare] := .28;> print(`output redirected...`); # input placeholder 0.28> TVA := .22;> print(`output redirected...`); # input placeholder 0.22> t[poluare] := .3;> print(`output redirected...`); # input placeholder 0.3> c[pierderi] := 0.5e-1;> print(`output redirected...`); # input placeholder 0.05> E[comb] := 2*10^5; tcc/kWh;> print(`output redirected...`); # input placeholder 200000 tcc --- kWh> K[0] := .6;> print(`output redirected...`); # input placeholder 0.6> t[ide] := 300;> print(`output redirected...`); # input placeholder 300> t[ibt] := 200;> print(`output redirected...`); # input placeholder 200> t[ilipsa] := 333;> print(`output redirected...`); # input placeholder 333> p[neuzurab] := .95;> print(`output redirected...`); # input placeholder 0.95> p[uzurab] := 0.5e-1;> print(`output redirected...`); # input placeholder 0.05> p[neuzurac] := .9;> print(`output redirected...`); # input placeholder 0.9> p[uzurac] := .1;> print(`output redirected...`); # input placeholder 0.1> p[neuzuratg] := .85;> print(`output redirected...`); # input placeholder 0.85> p[uzuratg] := .15;> print(`output redirected...`); # input placeholder 0.15> i[ib] := 600;> print(`output redirected...`); # input placeholder 600> i[ide] := 300;> print(`output redirected...`); # input placeholder 300> t[icz] := 800;> print(`output redirected...`); # input placeholder 800> t[igm] := 400;> print(`output redirected...`); # input placeholder 400> t[itg] := 700;> print(`output redirected...`); # input placeholder 700> t[ifn] := 500;> print(`output redirected...`); # input placeholder 500PUTEREA INSTALATA SI INDICATORII ECONOMICI> C[amortizare] := i[sp]*P[I]*k[i];> print(`output redirected...`); # input placeholder 11 1.506000000 10 > [lei]> print(`output redirected...`); # input placeholder> C[exploatare] := p[eint]*t[f]*P[I];> print(`output redirected...`); # input placeholder 15813000000000> [lei]> print(`output redirected...`); # input placeholder> C[tan] := C[amortizare]+C[exploatare];> print(`output redirected...`); # input placeholder 13 1.596360000 10 > [lei]> print(`output redirected...`); # input placeholderECONOMIILE SI PUTERILE REALIZATE> E[sb] := P[cc]*E[comb]*t[f]*P[I];> print(`output redirected...`); # input placeholder 6325200000000000000000> [lei/an]> print(`output redirected...`); # input placeholder> E[p] := 12*S[med]*K[0]*i[personal]*P[I];> print(`output redirected...`); # input placeholder 18 2.168640000 10 > [lei/om]> print(`output redirected...`); # input placeholder> E[si] := .12*p[eint]*k[info]*t[f]*P[I];> print(`output redirected...`); # input placeholder 11 4.174632000 10 > [lei/an]> print(`output redirected...`); # input placeholder> E[ccentrala] := E[sb]+E[p]+E[si];> print(`output redirected...`); # input placeholder 21 6.327368640 10 > [lei/an]> print(`output redirected...`); # input placeholder> E[cretea] := .88*p[eint]*k[info]*c[pierderi]*t[f]*P[I];> print(`output redirected...`); # input placeholder 11 1.530698400 10 > [lei/an]> print(`output redirected...`); # input placeholder> E[cconsumator] := (.1*p[eint]*c[pierderi]*.88)*t[f]*P[I];> print(`output redirected...`); # input placeholder 10 6.957720000 10 > [lei/an]> print(`output redirected...`); # input placeholder> E[cv] := E[ccentrala]+E[cretea]+E[cconsumator];> print(`output redirected...`); # input placeholder 21 6.327368640 10 > r[fc] := E[cv]/C[tan];> print(`output redirected...`); # input placeholder 8 3.963622642 10 > C[info] := .1*C[tan];> print(`output redirected...`); # input placeholder 12 1.596360000 10 > b[tac] := sum((1+r[a])^(-i), i = 1 .. d[v]);> print(`output redirected...`); # input placeholder 9.644158973> c[tac] := C[tan]*b[tac];> print(`output redirected...`); # input placeholder 14 1.539554962 10 > c[sp1] := C[tan]/(t[f]*P[I]);> print(`output redirected...`); # input placeholder 908.5714287> c[sp2] := C[tan]/(g[i]*t[f]*P[I]*d[v]);> print(`output redirected...`); # input placeholder 32.44897960> profit := 0.1e-1;> print(`output redirected...`); # input placeholder 0.01> tarif[1] := c[sp1]*(1+TVA+t[dezvoltare]+t[poluare]+profit);> print(`output redirected...`); # input placeholder 1644.514286> tarif[2] := c[sp2]*(1+TVA+t[dezvoltare]+t[poluare]+profit);> print(`output redirected...`); # input placeholder 58.73265308VENITUL NET, PROFITUL SI RISCUL> V[net] := (p[eext]-p[eint])*t[f]*P[I];> print(`output redirected...`); # input placeholder 15813000000000> Profit := V[net]-C[tan];> print(`output redirected...`); # input placeholder 11 -1.5060000 10 SCHEMA BLOC> p[scomb] := (an-t[ide])/an;> print(`output redirected...`); # input placeholder 141 --- 146> p[incomb] := 1-p[scomb];> print(`output redirected...`); # input placeholder 5 --- 146> p[sbenzi] := (an-t[ibt])/an;> print(`output redirected...`); # input placeholder 214 --- 219> p[inbenzi] := 1-p[sbenzi];> print(`output redirected...`); # input placeholder 5 --- 219> p[slipsa] := (an-t[ilipsa])/an;> print(`output redirected...`); # input placeholder 2809 ---- 2920> p[inlipsa] := 1-p[slipsa];> print(`output redirected...`); # input placeholder 111 ---- 2920> e[comb] := 3.32*[p[scomb]*log(p[scomb])-p[incomb]*log(p[incomb])]; =0.273771841> print(`output redirected...`); # input placeholder [ /141\ / 5 \] [3.206301370 ln|---| - 0.1136986301 ln|---|] [ \146/ \146/]> e[benzi] := 3.32*[p[sbenzi]*log(p[sbenzi])-p[inbenzi]*log(p[inbenzi])];> print(`output redirected...`); # input placeholder [ /214\ / 5 \] [3.244200913 ln|---| - 0.07579908676 ln|---|] [ \219/ \219/]> =0.21120905> print(`output redirected...`); # input placeholder> e[lipsa] := 3.32*[p[slipsa]*log(p[slipsa])-p[inlipsa]*log(p[inlipsa])];> print(`output redirected...`); # input placeholder [ /2809\ /111 \] [3.193794521 ln|----| - 0.1262054795 ln|----|] [ \2920/ \2920/]> =0.288458067> print(`output redirected...`); # input placeholder> e[descarcare] := e[benzi]+e[lipsa]+e[comb];> print(`output redirected...`); # input placeholder [ /141\ / 5 \ /2809\ [3.206301370 ln|---| - 0.1136986301 ln|---| + 3.193794521 ln|----| [ \146/ \146/ \2920/ /111 \ /214\ / 5 \] - 0.1262054795 ln|----| + 3.244200913 ln|---| - 0.07579908676 ln|---|] \2920/ \219/ \219/]> = 0.773438958> > print(`output redirected...`); # input placeholder> p[srep] := (an-t[icz])/an;> print(`output redirected...`); # input placeholder 199 --- 219> p[inrep] := 1-p[srep];> print(`output redirected...`); # input placeholder 20 --- 219> e[rep] := 3.32*[p[srep]*log(p[srep])-p[inrep]*log(p[inrep])];> print(`output redirected...`); # input placeholder [ /199\ /20 \] [3.016803653 ln|---| - 0.3031963470 ln|---|] [ \219/ \219/] "(->)" [0.43676]> e[tg] := 3.32*[p[neuzuratg]*log(p[neuzuratg])-p[uzuratg]*log(p[uzuratg])];> print(`output redirected...`); # input placeholder [0.4861373336]> e[termomec] := e[rep]+e[tg]+e[lipsa];> print(`output redirected...`); # input placeholder [ /2809\ /111 \ [3.193794521 ln|----| - 0.1262054795 ln|----| + 0.4861373336 [ \2920/ \2920/ /199\ /20 \] + 3.016803653 ln|---| - 0.3031963470 ln|---|] \219/ \219/] "(->)" [1.2118]> p[sdesc] := (an-t[ide])/an;> print(`output redirected...`); # input placeholder 141 --- 146> p[indesc] := 1-p[sdesc];> print(`output redirected...`); # input placeholder 5 --- 146> p[ssgm] := (an-t[igm])/an;> print(`output redirected...`); # input placeholder 209 --- 219> p[insgm] := 1-p[ssgm];> print(`output redirected...`); # input placeholder 10 --- 219> p[ssfn] := (an-t[ifn])/an;> print(`output redirected...`); # input placeholder 413 --- 438> p[insfn] := 1-p[ssfn];> print(`output redirected...`); # input placeholder 25 --- 438> e[desc] := 3.32*[p[sdesc]*log(p[sdesc])-p[indesc]*log(p[indesc])];> print(`output redirected...`); # input placeholder [ /141\ / 5 \] [3.206301370 ln|---| - 0.1136986301 ln|---|] [ \146/ \146/] "(->)" [0.27191]> e[sgm] := 3.32*[p[ssgm]*log(p[ssgm])-p[insgm]*log(p[insgm])];> print(`output redirected...`); # input placeholder [ /209\ /10 \] [3.168401826 ln|---| - 0.1515981735 ln|---|] [ \219/ \219/] "(->)" [0.31983]> e[sfn] := 3.32*[p[ssfn]*log(p[ssfn])-p[insfn]*log(p[insfn])];> print(`output redirected...`); # input placeholder [ /413\ /25 \] [3.130502283 ln|---| - 0.1894977169 ln|---|] [ \438/ \438/] "(->)" [0.35861]> e[electrica] := e[sfn]+e[sgm]+e[desc];> print(`output redirected...`); # input placeholder [ /141\ / 5 \ /209\ [3.206301370 ln|---| - 0.1136986301 ln|---| + 3.168401826 ln|---| [ \146/ \146/ \219/ /10 \ /413\ /25 \] - 0.1515981735 ln|---| + 3.130502283 ln|---| - 0.1894977169 ln|---|] \219/ \438/ \438/] "(->)" [0.95035]> e[totalb] := e[descarcare]+e[termomec]+e[electrica];> print(`output redirected...`); # input placeholder [ /141\ / 5 \ /209\ [6.412602740 ln|---| - 0.2273972602 ln|---| + 3.168401826 ln|---| [ \146/ \146/ \219/ /10 \ /413\ /25 \ - 0.1515981735 ln|---| + 3.130502283 ln|---| - 0.1894977169 ln|---| \219/ \438/ \438/ /2809\ /111 \ + 6.387589042 ln|----| - 0.2524109590 ln|----| + 0.4861373336 \2920/ \2920/ /199\ /20 \ /214\ + 3.016803653 ln|---| - 0.3031963470 ln|---| + 3.244200913 ln|---| \219/ \219/ \219/ / 5 \] - 0.07579908676 ln|---|] \219/] "(->)" [2.9344]SCHEMA CU CONDUCTA DE OCOLIRE> p[srepcaz] := (an-t[icz])/an;> print(`output redirected...`); # input placeholder 199 --- 219 "(->)" 0.90868> p[inrepcaz] := 1-p[srepcaz];> print(`output redirected...`); # input placeholder 20 --- 219 "(->)" 0.091324> p[sreptg] := (an-t[itg])/an;> print(`output redirected...`); # input placeholder 403 --- 438> p[inreptg] := 1-p[sreptg];> print(`output redirected...`); # input placeholder 35 --- 438> e[repcaz] := 3.32*[p[srepcaz]*log(p[srepcaz])-p[inrepcaz]*log(p[inrepcaz])];> print(`output redirected...`); # input placeholder [ /199\ /20 \] [3.016803653 ln|---| - 0.3031963470 ln|---|] [ \219/ \219/] "(->)" [0.43676]> e[reptg] := 3.32*[p[sreptg]*log(p[sreptg])-p[inreptg]*log(p[inreptg])];> print(`output redirected...`); # input placeholder [ /403\ /35 \] [3.054703196 ln|---| - 0.2652968037 ln|---|] [ \438/ \438/] "(->)" [0.41598]> e[caz] := 3.32*[p[neuzurac]*log(p[neuzurac])-p[uzurac]*log(p[uzurac])];> print(`output redirected...`); # input placeholder [0.4496410300]> e[termomec] := e[repcaz]+e[reptg]+e[tg]+e[caz];> print(`output redirected...`); # input placeholder [ /403\ /35 \ [0.9357783636 + 3.054703196 ln|---| - 0.2652968037 ln|---| [ \438/ \438/ /199\ /20 \] + 3.016803653 ln|---| - 0.3031963470 ln|---|] \219/ \219/] "(->)" [1.7886]> e[totalc] := e[descarcare]+e[termomec]+e[electrica];> print(`output redirected...`); # input placeholder [ /141\ / 5 \ /209\ [6.412602740 ln|---| - 0.2273972602 ln|---| + 3.168401826 ln|---| [ \146/ \146/ \219/ /10 \ /413\ /25 \ - 0.1515981735 ln|---| + 3.130502283 ln|---| - 0.1894977169 ln|---| \219/ \438/ \438/ /403\ /35 \ + 0.9357783636 + 3.054703196 ln|---| - 0.2652968037 ln|---| \438/ \438/ /199\ /20 \ /2809\ + 3.016803653 ln|---| - 0.3031963470 ln|---| + 3.193794521 ln|----| \219/ \219/ \2920/ /111 \ /214\ / 5 \] - 0.1262054795 ln|----| + 3.244200913 ln|---| - 0.07579908676 ln|---|] \2920/ \219/ \219/] "(->)" [3.5113]SCHEMA OPTIMA ESTE CEA BLOC> e[etalon1] := 2.0128;> print(`output redirected...`); # input placeholder 2.0128> e[etalon2] := 1.5096;> print(`output redirected...`); # input placeholder 1.5096> nivel[1] := 1-e[etalon1]/(2.9344); = > print(`output redirected...`); # input placeholder 0.3140676118> nivel[2] := 1-e[etalon2]/(2.9344); = > print(`output redirected...`); # input placeholder 0.4855507089> g[organizare1] := 1-nivel[1]; = > print(`output redirected...`); # input placeholder 0.6859323882> g[organizare2] := 1-nivel[2]; = > print(`output redirected...`); # input placeholder 0.5144492911
