Libreria termotecnica(termotecnica.xla)

 

 

La libreria aggiunge all’ambiente EXCEL una serie di funzioni specifiche della termotecnica .

E’ così possibile sfruttare tutta la semplicità di immissione dati dell’ambiente EXCEL con la potenza di routines di calcolo specifica.L’archivio tubazioni contiene oltre 600 tubazioni(acqua) e oltre 600 canali(aria)

 

Installazione

I files:

·        tubazioni.txt

·        serietubazioni.txt

·        wcanali.txt

·        termotecnica.xla

 

vanno inseriti nella cartella,da crearsi :

c:/excel

 

Come inserire la libreria. Andare su menu STRUMENTI ->COMPONENTI AGGIUNTIVI:

 

 

 

Selezionare SFOGLIA e quindi la cartella  c:\excel dove è posizionato il file TERMOTECNICA.XLA

 

 

 

Viene inserito il file nella libreria

 

 

Se si va su INSERISCI FUNZIONI

 

si trovano le nuove funzioni pronte all’uso.

 

 

ELENCO DELLE FUNZIONI

 

 

GENERICHE

Function fareneit(t)

Restituisce il valore in gradi farenheit della temperatura t in gradi centigradi

Function celsius(t)

Restituisce il valore in gradi celsius della temperatura t in gradi farenheit

Function viscoaCQUA(t )

Restituisce il valore della viscosità dinamica dell’acqua in cst in funzione della temperatura in °C

temp

viscosità

20

0,996

50

0,5611

90

0,3248

 

Function massavolh2o(t)

Restituisce il valore della massa volumica dell’acqua in kg/m3 in funzione della temperatura in °C

 

temp

massa volumica in kg/m3

20

998,14

 

50

988,13

 

90

965,34

 

 

 

VAPOR D’ACQUA

Function vol_vapore(t,p)

Restituisce il valore del volume specifico in m3/kg del vapore d’acqua

T in °C

P in bar

t

p

Volume specifico

200

3,00

0,741

200

16,00

0,139

450

3

1,133

450

20

0,170

300

10

0,269

 

Function ent_vapore(t ,p)

Restituisce il valore dell’entalpia del  vapore d’acqua

T in °C

P in bar

 

t

p

entalpia in kj/kg

133

3,00

2755,1

211,4

20,00

2911,7

500

5

3487,9

500

20

3487,9

150

4,855

2789,1

 

Function entr_vapore(t ,p)

Restituisce il valore dell’entropia del vapore d’acqua in kj/kg K

T in °C

P in bar

t

p

entropia in kj/kg  K

133

3,00

7,025

211,4

20,00

6,403

500

5

8,119

500

20

7,466

150

4,855

6,868

 

Function pvapore(t )

Restituisce il valore della pressione di saturazione in bar  del vapor d’acqua in funzione della temperatura in °C

 

temp

press

133

2,9984

211,4

20,722

167

7,602

 

PERDITE DI CARICO

 

Function velocita(q ,d )

Restituisce il valore della velocità dell’acqua in m/s  in funzione della portata in m3/h e del diametro interno della tubazione in mm

 

Function perdita_h2o(d, q  rug , t)

Restituisce il valore della perdita di carico per acqua  in Pa  in funzione del diametro interno della tubazione in mm,della portata in m3/h ,della rugosità assoluta della tubazione in micron, e della temperatura in °C) .La lunghezza è unitaria.

 Function diametro_tubo(cod )

Restituisce il valore del diametro interno in mm  della tubazione avente il codice specificato

Function perdita_tubo(cod, q  rug , t)

Restituisce il valore della perdita di carico distribuita per acqua  in Pa  .

cod è il codice della tubazione come da elenco ,q la portata in m3/h ,rug la rugosità assoluta della tubazione in micron, temp la temperatura in °C

 

 

 

mc/h

micron

°C

Pascal

codice tubo

q

rugosita

temp

perdita

15

1

0

25

1487

15

2

0

25

5003

16

2

0

25

2859

16

2

100

45

4324

 

Function prevalenza_tubo(cod, q  rug , t,L, k)

Restituisce il valore della perdita di carico totale(distribuita e concentrata) per acqua  in Pa 

cod è il codice della tubazione come da elenco ,q la portata in m3/h ,rug la rugosità assoluta della tubazione in micron, t la temperatura in °C ,l=lunghezza tubazione(m) k= la somma dei  coefficienti relativi alle discontinuità secondo l’espressione:

perdita distribuita=K V2/2g

 

 

mc/h

micron

°C

m

 

mm

Pascal

codice tubo

q

rugosita

temp

lungh

K

diametro

prevalenza

15

1

0

25

10

0

16

14874

15

2

0

25

10

5

16

68987

16

2

0

25

10

5

18

40428

16

2

100

45

10

5

18

54993

 

 

Function des_canale(cod )

Resituisce una stringa descrittiva del canale ,secondo la tabella riportata sotto

Cod=codice canale

Function perdita_aria(diam ,q ,rug ,temp )

Restituisce il valore della perdita di carico distribuita per aria  in Pa  in funzione del diametro interno della tubazione  in mm,della portata in m3/h ,della rugosità assoluta della tubazione in micron, e della temperatura in °C) .La lunghezza è unitaria.

 Function perdita_canale(cod , q, rug ,temp )

Restituisce il valore della perdita di carico distribuita per aria  in Pa  .

cod è il codice del canale tubazione come da elenco ,q la portata in m3/h ,rug la rugosità assoluta della tubazione in micron, temp la temperatura in °C

 

mc/h

micron

°C

 

Pascal

codice canale

q

rugosita

temp

 

perdita

2

35

100

25

diam= 45

10,8

15

2000

100

25

diam= 200

12,4

16

2750

100

25

diam= 225

12,6

100

22500

100

45

Lato a= 650 lato b= 350

11,7

 

Function perdita_gas(cod, q ,L )

Restituisce il valore della perdita di carico distribuita per gas naturale,formula di RENOUARDT,in funzione della tubazione avente codice assegnato,della portata in N m3/h e della lunghezza .

codice

 

Nm3/h

metri

pascal

tubazione

portata

Lunghezza

perdita

118

D=2.1/2" UNI 7287-Tubi  acciaio-SS-SPQ

20

112

42,433


Function H_pompa(q ,A,B,C)

Restituisce la prevalenza di una pompa di equazione(prevalenza in metri di colonna d’acqua):

 

H= A q2 +B q+C

Per ricavare i termini A,B,C vedi:

http://www.termoinrete.com/regressione.htm

 

 Function q_puntolav(cod,H0, rug, temp, L, k,A,B,C)

 

 

 

Trova la portata del circuito idraulico di figura in cui :

A,B,C= termini dell’equazione della pompa(vedi funzione precedente)

perdita distribuita=K V2/2g

 

 

 

metri

m H2O

 

 

 

m3/h

tubazione

 

Cod

L

H0

A

B

C

q

D=2" UNI 4149-Tubi  acciaio serie P

109

100

11

-0,147

-0,44

19,97

5,9616

 

 

 

 

 

 

 

 

 

temperatura=20°C

 

 

 

 

 

 

 

rugosità=0

 

 

 

 

 

 

 

 

 

 

Function q_Ven_puntolav(cod, rug, temp,L,k,A,B,C)

 

Trova ,analogamente a come sopra, la portata di un circuito aeraulico in cui :

A,B,C= termini dell’equazione del ventilatore

cod è il codice del canale come da elenco

 

Function q_puntolav_serie(cod,H0, rug, temp, L, k,A,B,C)

 

E’ analoga a q_puntolav , tranne che vi sono 2 pompe in serie

 

Function q_puntolav_par(cod,H0, rug, temp, L, k,A,B,C)

 

E’ analoga a q_puntolav , tranne che vi sono 2 pompe in parallelo

 

PSICROMETRIA

 

Function ENTAU(x, t)

Restituisce il valore dell’entalpia in kj/kg per aria umida in funzione dell’umidità specifica x in g/kg , t la temperatura di bulbo secco in °C

x

t

h

10

25

50,482

 

Function ENTAU_sat( t)

Restituisce il valore dell’entalpia in kj/kg per aria umida satura in funzione della temperatura  t in °C

t

h

25,0

76,0

 

Function UMREL( x,t)

Restituisce il valore dell’umidità relativa in % per aria umida satura in funzione dell’umidità specifica x in g/kg e  della temperatura di bulbo secco  t in °C

x

t

UR

20,0

25,0

99,7

9,87

25,0

50,0

 

Function VOLSP(t, x)

Restituisce il valore del volume specifico dell’aria umida satura in funzione della temperatura di bulbo secco  t in °C e dell’umidità specifica x in g/kg e 

Function UMSPEC( UR,t)

Restituisce il valore dell’umidità specifica in g/kg per aria umida satura in funzione dell’umidità relativa in % e  della temperatura di bulbo secco  t in °C

UR

t

X

99,5

25,0

20,0

50,0

25,0

9,9

 

 

Scarica la libreria