From be570e6b8422cd43365015bc864d2720487fc675 Mon Sep 17 00:00:00 2001 From: Jens Cornelsen <79703163+IB-Cornelsen@users.noreply.github.com> Date: Sun, 12 Jan 2025 16:48:37 +0100 Subject: [PATCH] =?UTF-8?q?Berechnung=20W=C3=A4rmequellen=20hinzugef=C3=BC?= =?UTF-8?q?gt?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../A12NutzenergiebedarfHeizung.svelte | 145 +++++++++++++----- .../funktionAusnutzungsgrad.ts | 4 - .../funktionBilanzInnentemperatur.ts | 1 + .../funktionMonatlicherBelastungsgrad.ts | 1 + 4 files changed, 107 insertions(+), 44 deletions(-) diff --git a/src/components/Tabellen/A12NutzenergiebedarfHeizung.svelte b/src/components/Tabellen/A12NutzenergiebedarfHeizung.svelte index 658cb5c9..0bb14ffa 100644 --- a/src/components/Tabellen/A12NutzenergiebedarfHeizung.svelte +++ b/src/components/Tabellen/A12NutzenergiebedarfHeizung.svelte @@ -7,8 +7,61 @@ export let ausweis: BedarfsausweisWohnenClient; export let gebaeude_aufnahme: GebaeudeAufnahmeClient; + // Beispielwerte - müssen noch errechnet werden let heizlast = 25; let zeitkonstante = 110; + let maximalerWaermestrom = 2500; + + let waermeQuellen = { + Januar: 400, + Februar: 300, + März: 340, + April: 360, + Mai: 400, + Juni: 450, + Juli: 450, + August: 560, + September: 400, + Oktober: 350, + November: 320, + Dezember: 300 + }; + + + // Konstanten + let minimaleAussentemperatur = -12; + let innenTemperatur = 20; + + let waermequellensenkenverhaeltnisJanuar = 0; + let waermequellensenkenverhaeltnisFebruar = 0; + let waermequellensenkenverhaeltnisMärz = 0; + let waermequellensenkenverhaeltnisApril = 0; + let waermequellensenkenverhaeltnisMai = 0; + let waermequellensenkenverhaeltnisJuni = 0; + let waermequellensenkenverhaeltnisJuli = 0; + let waermequellensenkenverhaeltnisAugust = 0; + let waermequellensenkenverhaeltnisSeptember = 0; + let waermequellensenkenverhaeltnisOktober = 0; + let waermequellensenkenverhaeltnisNovember = 0; + let waermequellensenkenverhaeltnisDezember = 0; + + + + let waermeSenken = { + Januar: 0, + Februar: 0, + März: 0, + April: 0, + Mai: 0, + Juni: 0, + Juli: 0, + August: 0, + September: 0, + Oktober: 0, + November: 0, + Dezember: 0 + }; + let belastungsgrade = { Januar: 0, @@ -53,22 +106,6 @@ let ausnutzungsgradNovember = 0; let ausnutzungsgradDezember = 0; - // Beispielwerte - müssen noch errechnet werden - - let waermequellensenkenverhaeltnisJanuar = 0.3; - let waermequellensenkenverhaeltnisFebruar = 0.5; - let waermequellensenkenverhaeltnisMärz = 0.7; - let waermequellensenkenverhaeltnisApril = 0.9; - let waermequellensenkenverhaeltnisMai = 1.1; - let waermequellensenkenverhaeltnisJuni = 1.3; - let waermequellensenkenverhaeltnisJuli = 1.5; - let waermequellensenkenverhaeltnisAugust = 1.7; - let waermequellensenkenverhaeltnisSeptember = 1.3; - let waermequellensenkenverhaeltnisOktober = 1.1; - let waermequellensenkenverhaeltnisNovember = 0.9; - let waermequellensenkenverhaeltnisDezember = 0.6; - - $: { belastungsgrade.Januar = funktionMonatlicherBelastungsgrad(heizlast, zeitkonstante, "Januar"); belastungsgrade.Februar = funktionMonatlicherBelastungsgrad(heizlast, zeitkonstante, "Februar"); @@ -96,6 +133,33 @@ bilanzinnentemperaturen.November = funktionBilanzInnentemperatur(heizlast, zeitkonstante, "November"); bilanzinnentemperaturen.Dezember = funktionBilanzInnentemperatur(heizlast, zeitkonstante, "Dezember"); + waermeSenken.Januar = maximalerWaermestrom * [bilanzinnentemperaturen.Januar - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Januar; + waermeSenken.Februar = maximalerWaermestrom * [bilanzinnentemperaturen.Februar - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Februar; + waermeSenken.März = maximalerWaermestrom * [bilanzinnentemperaturen.März - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.März; + waermeSenken.April = maximalerWaermestrom * [bilanzinnentemperaturen.April - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.April; + waermeSenken.Mai = maximalerWaermestrom * [bilanzinnentemperaturen.Mai - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Mai; + waermeSenken.Juni = maximalerWaermestrom * [bilanzinnentemperaturen.Juni - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Juni; + waermeSenken.Juli = maximalerWaermestrom * [bilanzinnentemperaturen.Juli - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Juli; + waermeSenken.August = maximalerWaermestrom * [bilanzinnentemperaturen.August - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.August; + waermeSenken.September = maximalerWaermestrom * [bilanzinnentemperaturen.September - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.September; + waermeSenken.Oktober = maximalerWaermestrom * [bilanzinnentemperaturen.Oktober - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Oktober; + waermeSenken.November = maximalerWaermestrom * [bilanzinnentemperaturen.November - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.November; + waermeSenken.Dezember = maximalerWaermestrom * [bilanzinnentemperaturen.Dezember - minimaleAussentemperatur] / [innenTemperatur - minimaleAussentemperatur] * belastungsgrade.Dezember; + + + waermequellensenkenverhaeltnisJanuar = waermeQuellen.Januar / waermeSenken.Januar; + waermequellensenkenverhaeltnisFebruar = waermeQuellen.Februar / waermeSenken.Februar; + waermequellensenkenverhaeltnisMärz = waermeQuellen.März / waermeSenken.März; + waermequellensenkenverhaeltnisApril = waermeQuellen.April / waermeSenken.April; + waermequellensenkenverhaeltnisMai = waermeQuellen.Mai / waermeSenken.Mai; + waermequellensenkenverhaeltnisJuni = waermeQuellen.Juni / waermeSenken.Juni; + waermequellensenkenverhaeltnisJuli = waermeQuellen.Juli / waermeSenken.Juli; + waermequellensenkenverhaeltnisAugust = waermeQuellen.August / waermeSenken.August; + waermequellensenkenverhaeltnisSeptember = waermeQuellen.September / waermeSenken.September; + waermequellensenkenverhaeltnisOktober = waermeQuellen.Oktober / waermeSenken.Oktober; + waermequellensenkenverhaeltnisNovember = waermeQuellen.November / waermeSenken.November; + waermequellensenkenverhaeltnisDezember = waermeQuellen.Dezember / waermeSenken.Dezember; + ausnutzungsgradJanuar = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisJanuar, zeitkonstante, "alleMonate"); ausnutzungsgradFebruar = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisFebruar, zeitkonstante, "alleMonate"); ausnutzungsgradMärz = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisMärz, zeitkonstante, "alleMonate"); @@ -108,6 +172,7 @@ ausnutzungsgradOktober = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisOktober, zeitkonstante, "alleMonate"); ausnutzungsgradNovember = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisNovember, zeitkonstante, "alleMonate"); ausnutzungsgradDezember = funktionAusnutzungsgrad(waermequellensenkenverhaeltnisDezember, zeitkonstante, "alleMonate"); + } @@ -164,8 +229,8 @@