() () () PRIVAT FORBRUG () () FRML _DJ_ Tiphp = Timp + Tipphpb + Tisp + Sdrsp + Tidmp + Sdrdmp + Tidpld + Sdrld $ FRML _DJ_ Tppun = Typshl - Tbhsl + Typshk - Tbhsk + Tphhlu - Tphhli + Tphhku - Tphhki + Tpspu - Tpspi + Tpdmpu - Tpdmpi + Tpldu - Tpldi $ FRML _DJ_ Ydpl1 = Ydp - Tiphp + Sdr + Tppun - Yfh - (Iv-Ivo1) $ FRML _DJ_ Ydpsk1 = Ydp - (Ydph+Tbhsp-Typshp) - (Yfh-kyrp1*0.82*Yfh) $ FRML _DJ_ Ydphk1 = (Ydph+Tbhsp-Typshp) - Tiphp + Sdr + Tppun - kyrp1*0.82*Yfh $ FRML _I pcp4xhv = ( pcb*fCb2(-1)+pce*fCe(-1)+pcf*fCf(-1)+pcg*fCg(-1) +pci*fCi(-1)+pck*fCk(-1)+pcn*fCn(-1)+pcs*fCs(-1) +pcv*fCv(-1)+pct*fCt(-1)-pet*fEt(-1) ) /(fCp4(-1)-fCh(-1)) $ FRML _GJRD fCh = fCh(-1)*fKbh(-1)/fKbh(-2) $ FRML _GJRD fChl = fChl(-1)*fKbhl(-1)/fKbhl(-2) $ FRML _D fChe = (fKbhe(-1)/fKbh(-1))*(fVeh+fVmh+(1-ahch)*fCh) + .0367468*fKbhe(-1) $ FRML _D Che = (fKbhe(-1)/fKbh(-1))*(Vh+(pch-ahch*pxh)*fCh) + phk*fKnbhe(-1) *((1-tsuih)*iwbz + bfinvbh - 0.50*rpibhe) + tsuih*Yrphs + Siqejh*fKnbhe(-2)/fKnbh(-2) + Ssyej $ FRML _D pche = Che/fChe $ FRML _GJ_D pchl = pchl(-1)*pch/pch(-1) $ FRML _D pch1 = (pchl*fChl(-1)+pche*fChe(-1)) /(fChl(-1)+fChe(-1)) $ FRML _D pcp4v1 = ( pcp4xhv*(fCp4(-1)-fCh(-1)) +pchl*fChl(-1)+pche*fChe(-1) ) /(fCp4(-1)-fCh(-1)+fChe(-1)+fChl(-1)) $ FRML _DJRDF log(Cp4xhw) = .859329*log(Ydpl1/pcp4v1) + (1-.859329)*log(Wcp2(-1)/pcp4v1) - .553463*log(pcp4xhv/pcp4v1) - 0.295985 + log(pcp4xhv) $ FRML _S___F Cp4xh = (1-Dfcp) *( exp ( .409320*(Ydphk1-Ydphk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.198973*(Ydpsk1-Ydpsk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.241808*Dlog(Wcp2(-1)) -.704659*Dlog(pcp4xhv)+.100471*Dlog(pch1) -.238311*log(Cp4xh(-1)/Cp4xhw(-1)) +log(Cp4xh(-1)/pcp4xhv(-1))+log(pcp4xhv) +JRcp4xh ) +Jcp4xh ) + Dfcp*(Zfcp*pcp-(fCb-fCb2)*pcb-fCh*pch) $ FRML _I pcgbk = (pcg*fCg(-1)+pcb*fCb2(-1)+pck*fCk(-1)) /(fCg(-1)+fCb2(-1)+fCk(-1)) $ FRML _D fCfm = 2.56777 + .74027*(fCf(-1)-.25*Et(-1)/pcf(-1))/U(-1) $ FRML _D fCnm = 0.53880 + .85478*(fCn(-1)-.14*Et(-1)/pcn(-1))/U(-1) $ FRML _D fCim = 0.70860 + .78967*(fCi(-1)-.05*Et(-1)/pci(-1))/U(-1) $ FRML _D fCem = 0.33390 + .76490*fCe(-1)/U(-1)+.00221*fros $ FRML _D fCgbkm = 0.16395 + .84301*(fCgbk(-1)-.13*Et(-1)/pcgbk(-1))/U(-1) $ FRML _D fCvm = 0.40078 + .76103*(fCv(-1)-.05*Et(-1)/pcv(-1))/U(-1) $ FRML _D fCsm = 0.28020+.92657*(fCs(-1)-.38*Et(-1)/pcs(-1))/U(-1) + .34171*d82inf $ FRML _D fCtm = - .06793 + 0.86813*fCt(-1)/U(-1) $ FRML _D Czm = pcf*( (1-Dfcf)*fCfm+(1-Dfcf)*JfCf/U +Dfcf*(Zfcf/U-0.25*Et/(pcf*U)) ) + pcn*( (1-Dfcn)*fCnm+(1-Dfcn)*JfCn/U +Dfcn*(Zfcn/U-0.14*Et/(pcn*U)) ) + pci*( (1-Dfci)*fCim+(1-Dfci)*JfCi/U +Dfci*(Zfci/U-0.05*Et/(pci*U)) ) +pce*( (1-Dfce)*fCem+(1-Dfce)*JfCe/U +Dfce*Zfce/U ) +pcgbk*( (1-Dfcgbk)*fCgbkm+(1-Dfcgbk)*JfCgbk/U +Dfcgbk*(Zfcgbk/U-0.13*Et/(pcgbk*U)) ) +pcv*( (1-Dfcv)*fCvm+(1-Dfcv)*JfCv/U +Dfcv*(Zfcv/U-0.05*Et/(pcv*U)) ) +pcs*( (1-Dfcs)*fCsm+(1-Dfcs)*JfCs/U +Dfcs*(Zfcs/U-0.38*Et/(pcs*U)) ) +pct*( (1-Dfct)*fCtm+(1-Dfct)*JfCt/U +Dfct*Zfct/U ) $ FRML _SJ_D fCf = ( fCfm +( 0.05842 /( 1-Dfcn*0.05190 -Dfci*0.22089 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pcf ) *U + 0.25*Et/pcf $ FRML _SJ_D fCn = ( fCnm +( 0.05190 /( 1-Dfcf*0.05842 -Dfci*0.22089 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pcn ) *U + 0.14*Et/pcn $ FRML _SJ_D fCi = ( fCim +( 0.22089 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pci ) *U + 0.05*Et/pci $ FRML _SJ_D fCe = ( fCem +( 0.08246 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfci*0.22089 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pce ) *U $ FRML _SJ_D fCgbk = ( fCgbkm +(0.20105 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfci*0.22089 -Dfce*0.08246 -Dfcv*0.17919 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pcgbk ) *U + 0.13*Et/pcgbk $ FRML _SJ_D fCv = ( fCvm +(0.17919 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfci*0.22089 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcs*0.13336 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pcv ) *U + 0.05*Et/pcv $ FRML _SJ_D fCs = ( fCsm +(0.13336 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfci*0.22089 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfct*0.07273 ) ) *(Cp4xh/U-Czm)/pcs ) *U + 0.38*Et/pcs $ FRML _SJ_D fCt = ( fCtm +(0.07273 /( 1-Dfcf*0.05842 -Dfcn*0.05190 -Dfci*0.22089 -Dfce*0.08246 -Dfcgbk*0.20105 -Dfcv*0.17919 -Dfcs*0.13336 ) ) *(Cp4xh/U-Czm)/pct ) *U $ FRML _D Cgk = fCgbk*pcgbk - pcb*fCb2 $ FRML _D__D pcgk = ( ((0.382311)**0.604368)*(pcg/dtfcg)**(1-0.604368) +((1-0.382311)**0.604368)*(pck/dtfck)**(1-0.604368) ) **(1/(1-0.604368)) $ FRML _SJRD log(fCgw) = log(Cgk/pcgk) - 0.604368*log(pcg/pcgk) - (1-0.604368)*log(dtfcg) + 0.604368*log(0.382311) $ FRML _SJRD Dlog(fCg) = Dlog(Cgk/pcgk) - 0.256071*Dlog(pcg/pcgk) + 0.330319*(1-0.604368)*Dlog(dtfcg) + .8*Dlog(Kcb) + 0.330319*(-log(fCg(-1)) + log(fCgw(-1))) $ FRML _I fCk = (Cgk-fCg*pcg)/pck $ FRML _D ucb = (pcb*fCb2+pcg*fCg+tsdv*((Kcb+Kcb(-1))/2)) /(pcb*((Kcb2+Kcb2(-1))/2))$ FRML _D Dtrfy = .15*(fY/fY(-1)-1)+(1-.15)*Dtrfy(-1) $ FRML _D bfcb2 = (1/3)*(1+9*((fY/fY(-1)-1)- Dtrfy)) $ FRML _D Rpcp4v1e = .25*(pcp4v1/pcp4v1(-1)-1)+(1-.25)*Rpcp4v1e(-1) $ FRML _SJDD fCb = 9891*bfcb2 + 0.00421296*(709/46) *(Ydpl1/pcp4v1-(1-bfcb2)*(Ydpl1(-1)/pcp4v1(-1))) - 15927 *(ucb*pcb/pck-(1-bfcb2)*(ucb(-1)*pcb(-1)/pck(-1))) - 132340 *( (iku*(1-tsuih)-Rpcp4v1e) -(1-bfcb2)*(iku(-1)*(1-tsuih(-1))-Rpcp4v1e(-1)) ) + 0.00421296 *(Wcp2(-1)/pcp4v1-(1-bfcb2)*(Wcp2(-2)/pcp4v1(-1))) - 0.3766*fCb(-1)+fCb(-1) + 4549*d94 $ FRML _D fCb2 = 0.34*fCb + 0.238*fCb(-1) + 0.167*fCb(-2) + 0.117*fCb(-3) + 0.082*fCb(-4) + 0.056*fCb(-5) $ FRML _D Kcb2 = 0.66*fCb + 0.422*fCb(-1) + 0.255*fCb(-2) + 0.138*fCb(-3) + 0.056*fCb(-4) $ FRML _GJD Dif(Kcb) = 0.00586*fCb - bkcb*Kcb(-1) $ FRML _I fCp = fCh + fCf + fCn + fCi + fCe + fCg + fCb + fCk + fCv + fCs + fCt - fEt $ FRML _I Cp = fCf*pcf + fCn*pcn + fCi*pci + fCe*pce + fCg*pcg +fCb*pcb + fCv*pcv + fCh*pch + fCk*pck +fCs*pcs + fCt*pct - fEt*pet $ FRML _I pcp = Cp/fCp $ FRML _D fCp4 = fCp - fCb + fCb2 $ FRML _D kwbr = iwbn*(1-(1+iwbz)**(-nwbr)) /(iwbz*(1-(1+iwbn)**(-nwbr))) $ FRML _D kwpb = iwbn*(1-(1+iwbz)**(-nwpb)) /(iwbz*(1-(1+iwbn)**(-nwpb))) $ FRML _D Wpbkz = Wpbkz(-1)*kwpb/kwpb(-1) + Dif(Wpbz) $ FRML _D Wabk = Wabk(-1) *kwpb/kwpb(-1) + Dif(Wabz) + Dif(Wobz) + Dif(Wsbz) + Dif(Wrbz) $ FRML _D Wzbkr = Wzbkr(-1)*kwbr/kwbr(-1) + Dif(Wzbr) $ FRML _D Wpqkpc1 = Wpqp - Wbqb - Wtlf + Wflt + Wpbkz - Wpbz - Wzbkr +Wzbr + Wabk - Wabz - Wobz - Wsbz - Wrbz $ FRML _D Wp = Wp(-1)*(kwpb/kwpb(-1)+(1-tss0-tss1)*iwpp) + (1+iwppd)**12/((1+(1-tss0-tss1)*iwpp)**12) *(Tbhsk+Tphhki+Tbhsl+Tphhli+Saqw+Tpspi) - (Typshk+Tphhku+Typshl+Tphhlu+Typw+Tpspu) $ FRML _D Wps1 = Wps1(-1)*(kwpb/kwpb(-1)+(1-tss0-tss1)*iwpp) + tsdp*(1+iwppd)**12/((1+(1-tss0-tss1)* iwpp)**12) *(Tbhsk+Tphhki)-tsdp*(Typshk+Tphhku) $ FRML _D Wps2 = Wps2(-1)*(kwpb/kwpb(-1)+(1-tss0-tss1)*iwpp) + (tss0+tss1)*(1+iwppd)**12/((1+(1-tss0-tss1)*iwpp)**12) *(Tbhsl+Tphhli+Saqw+Tpspi) - (tss0+tss1)*(Typshl+Tphhlu+Typw+Tpspu) $ FRML _D Wps = Wps1 + Wps2 $ FRML _D fKnmp = fKnma + fKnme + fKnmb + fKnmh + fKnmng + fKnmne + fKnmnf + fKnmnn + fKnmnb + fKnmnm + fKnmnt + fKnmnk + fKnmnq + fKnmqh+ fKnmqs + fKnmqt + fKnmqf + fKnmqq $ FRML _D fKnbp = fKnba + fKnbe + fKnbb + fKnbng + fKnbne + fKnbnf + fKnbnn + fKnbnb + fKnbnm + fKnbnt + fKnbnk + fKnbnq + fKnbqh + fKnbqs + fKnbqt + fKnbqf + fKnbqq $ FRML _DJ__F Wcp2 = pibh*fKnbhl + phk*fKnbhe + pcb*Kcb2 + Wpqkpc1 + pimp1*fKnmp + pibp1*fKnbp - Wps $ () () () BOLIGINVESTERINGER () () FRML _GJ_ phv = (0.5*phk+0.5*phk(-1))*kphv $ FRML _DJ_D rpibhe = 0.75*rpibhe(-1) + 0.25*(pibh/pibh(-1)-1) $ FRML _DJRD bfknbh = fKnbh/fKbh $ FRML _DJRD fKbhw = U*exp( .758883*log(Cp4xh/(U*pcp4xhv)) +.472363/(1+(Cp4xh/(U*pcp4xhv)/59.2431)**(-20)) -.553463*log(pche/pcp4xhv) + 2.35066 ) $ FRML _SJRD Dlog(phk) = 1.21162*Dlog(Cp4xh/(U*pcp4xhv)) - .431855*Dlog((pche/phk)/pcp4xhv) + .562693*log(fKbhw(-1)/fKbh(-1)) $ FRML _GJ_D phgk = phk/kphkg $ FRML _SJRD Dlog(fKbh) = 0.3*.035374*Dlog(phk/(.8*pibh+.2*phgk)) + 0.035374*log(phk(-1)/(.8*pibh(-1)+.2*phgk(-1))) + 1.03531*nbs/fKbh(-1) + 0.017754*log(fKbhw(-1)/fKbh(-1)) + 0.00888522 - 0.6*( 0.3*0.035374*Dlog(phk(-1)/ (.8*pibh(-1)+.2*phgk(-1))) +0.035374*log(phk(-2)/(.8*pibh(-2)+.2*phgk(-2))) +1.03531*nbs(-1)/fKbh(-2) +0.017754*log(fKbhw(-2)/fKbh(-2)) +0.00888522 - Dlog(fKbh(-1)) ) $ FRML _DJ_ fIbh = Dif(fKbh) + bfivbh*fKbh(-1) $ FRML _GJ_D fInvbh = bfinvbh*fKnbh(-1) $ FRML _I Dif(fKnbh) = fIbh - fInvbh - 1845*Dif(d99) $ FRML _GJ_D fIbhl = 1.03531*nbs*(1+JRfibhl) $ FRML _I Dif(fKbhl) = fIbhl - bfivbh*fKbhl(-1) $ FRML _I fKbhe = fKbh - fKbhl $ FRML _I Dif(fKnbhl) = fIbhl - bfinvbh*fKnbhl(-1) - (1-fKbhe/fKbh)*1845*Dif(d99) $ FRML _I fKnbhe = fKnbh - fKnbhl $ () () () FASTE INVESTERINGER I ØVRIGT () () FRML _GJ_D tsdsu1 = bsds*(1/2)*tsds1 +(1-(1/2)*bsds)*ktsds*tsds1 $ FRML _GJRD iwbzsu = (1-tsdsu1)*iwbz -d8291*(ptty1/ptty1(-1)-1)/ (1+d8291*(ptty1/ptty1(-1)-1)) $ FRML _DJ_ bivmu = bivmp0 +bivmp*(1 -bivmp1)/(bivmp+iwbzsu) $ FRML _DJ_ bivbu = bivbp0 +bivbp*(bivbpw-bivbp1)/(bivbp+iwbzsu) $ FRML _I fImp = fIma + fIme + fImb + fImh + fImng + fImne + fImnf + fImnn + fImnb + fImnm + fImnt + fImnk + fImnq + fImqh + fImqs + fImqt + fImqf + fImqq $ FRML _I fInvmp = bfinvma*fKnma(-1) + bfinvme*fKnme(-1) + bfinvmb*fKnmb(-1) + bfinvmh*fKnmh(-1) + bfinvmng*fKnmng(-1)+ bfinvmne*fKnmne(-1) + bfinvmnf*fKnmnf(-1)+ bfinvmnn*fKnmnn(-1) + bfinvmnb*fKnmnb(-1)+ bfinvmnm*fKnmnm(-1) + bfinvmnt*fKnmnt(-1)+ bfinvmnk*fKnmnk(-1) + bfinvmnq*fKnmnq(-1)+ bfinvmqh*fKnmqh(-1) + bfinvmqs*fKnmqs(-1)+ bfinvmqt*fKnmqt(-1) + bfinvmqf*fKnmqf(-1)+ bfinvmqq*fKnmqq(-1) $ FRML _I fIvmp = bfivma*fKma(-1) + bfivme*fKme(-1) + bfivmb*fKmb(-1) + bfivmh*fKmh(-1) + bfivmng*fKmng(-1)+ bfivmne*fKmne(-1) + bfivmnf*fKmnf(-1)+ bfivmnn*fKmnn(-1) + bfivmnb*fKmnb(-1)+ bfivmnm*fKmnm(-1) + bfivmnt*fKmnt(-1)+ bfivmnk*fKmnk(-1) + bfivmnq*fKmnq(-1)+ bfivmqh*fKmqh(-1) + bfivmqs*fKmqs(-1)+ bfivmqt*fKmqt(-1) + bfivmqf*fKmqf(-1)+ bfivmqq*fKmqq(-1) $ FRML _I fIbp = fIba + fIbe + fIbb + fIbng + fIbne + fIbnf + fIbnn + fIbnb + fIbnm + fIbnt + fIbnk + fIbnq + fIbqh + fIbqs + fIbqt + fIbqf + fIbqq $ FRML _I fInvbp = bfinvba*fKnba(-1) + bfinvbe*fKnbe(-1) + bfinvbb*fKnbb(-1) + bfinvbng*fKnbng(-1) + bfinvbne*fKnbne(-1)+ bfinvbnf*fKnbnf(-1) + bfinvbnn*fKnbnn(-1)+ bfinvbnb*fKnbnb(-1) + bfinvbnm*fKnbnm(-1)+ bfinvbnt*fKnbnt(-1) + bfinvbnk*fKnbnk(-1)+ bfinvbnq*fKnbnq(-1) + bfinvbqh*fKnbqh(-1)+ bfinvbqs*fKnbqs(-1) + bfinvbqt*fKnbqt(-1)+ bfinvbqf*fKnbqf(-1) + bfinvbqq*fKnbqq(-1) $ FRML _I fIvbp = bfivba*fKba(-1) + bfivbe*fKbe(-1) + bfivbb*fKbb(-1) + bfivbng*fKbng(-1) + bfivbne*fKbne(-1)+ bfivbnf*fKbnf(-1) + bfivbnn*fKbnn(-1)+ bfivbnb*fKbnb(-1) + bfivbnm*fKbnm(-1)+ bfivbnt*fKbnt(-1) + bfivbnk*fKbnk(-1)+ bfivbnq*fKbnq(-1) + bfivbqh*fKbqh(-1)+ bfivbqs*fKbqs(-1) + bfivbqt*fKbqt(-1)+ bfivbqf*fKbqf(-1) + bfivbqq*fKbqq(-1) $ FRML _I fIbo1 = fIbo*kfibo1 $ FRML _I Ibo1 = fIbo1*pibo1 $ FRML _I fImo1 = fImo*kfimo1 $ FRML _I Imo1 = fImo1*pimo1 $ FRML _G Io1 = Imo1 + Ibo1 $ FRML _G Ivo1 = (fInvmo*pimo + fInvbo*pibo)*kivo1 $ FRML _G Iph = kiph *(bqsa*(pima*fIma+piba*fIba) +bqse*(pime*fIme+pibe*fIbe) +bqsng*(pimng*fImng+pibng*fIbng) +bqsnn*(pimnn*fImnn+pibnn*fIbnn) +bqsnb*(pimnb*fImnb+pibnb*fIbnb) +bqsnm*(pimnm*fImnm+pibnm*fIbnm) +bqsnt*(pimnt*fImnt+pibnt*fIbnt) +bqsnk*(pimnk*fImnk+pibnk*fIbnk) +bqsnq*(pimnq*fImnq+pibnq*fIbnq) +bqsb*(pimb*fImb+pibb*fIbb) +bqsqh* (pimqh*fImqh+pibqh*fIbqh) +bqsqs*(pimqs*fImqs+pibqs*fIbqs) +bqsqt*(pimqt*fImqt+pibqt*fIbqt) +bqsqq*(pimqq*fImqq+pibqq*fIbqq) +0.82*(pimh*fImh+pibh*fIbh) ) $ FRML _G fImk = fImp*kfimk $ FRML _I fIm = fImp + fImo + fImk $ FRML _I fIb = fIbp + fIbo + fIbh $ FRML _I fImp1 = fIm - fImo1 $ FRML _I fIbp1 = fIb - fIbo1 - fIbh $ FRML _I I = fImp1*pimp1 + fImo1*pimo1 + fIbp1*pibp1 + fIbo1*pibo1 + fIbh*pibh + fIt*pit + fIl*pil $ FRML _G Iv = (fInvbo*pibo+fInvmo*pimo + fInvbh*pibh+fInvbp*pibp+fInvmp*pimp)*kiv $ () () () Lagerinvesteringer () () FRML _S fIla = (1-Dfil) *( 0.07049*(Dif(fXa(-1))-Dif(fIla(-1))) +0.66667*(hostkor-0.5*hostkor(-1)-0.5*hostkor(-2)) +JfIla ) + Dfil*Zfila $ FRML _S fIle = (1-Dfil) *( 0.07962*(0.50*(Dif(fXe)-Dif(fIle)) +(1-0.50)*(Dif(fXe(-1))-Dif(fIle(-1)))) +JfIle ) + Dfil*Zfile $ FRML _G fIlng = (1-Dfil) *( bngil*(Dif(fXng)-Dif(fIlng)) +JfIlng ) + Dfil*Zfilng $ FRML _S fIlne = (1-Dfil) *( 0.30909*0.01815*(0.00*(Dif(fXne)-Dif(fIlne)) +(1-0.00)*(Dif(fXne(-1))-Dif(fIlne(-1)))) +(1-0.30909)*fIlne(-1) +JfIlne ) + Dfil*Zfilne $ FRML _S fIlnf = (1-Dfil) *( 0.01983*(Dif(fXnf)-Dif(fIlnf)) +JfIlnf ) + Dfil*Zfilnf $ FRML _S fIlnn = (1-Dfil) *( 0.64838*0.30265*(Dif(fXnn)-Dif(fIlnn)) +(1-0.64838)*fIlnn(-1) +JfIlnn ) + Dfil*Zfilnn $ FRML _S fIlnb = (1-Dfil) *( 0.19919*(0.75*(Dif(fXnb)-Dif(fIlnb)) +(1-0.75)*(Dif(fXnb(-1))-Dif(fIlnb(-1)))) +JfIlnb ) + Dfil*Zfilnb $ FRML _S fIlnm = (1-Dfil) *( 0.19618*(0.50*(Dif(fXnm)-Dif(fIlnm)) +(1-0.50)*(Dif(fXnm(-1))-Dif(fIlnm(-1)))) +JfIlnm ) + Dfil*Zfilnm $ FRML _S fIlnt = (1-Dfil) *( 0.01049*(0.00*(Dif(fXnt)-Dif(fIlnt)) +(1-0.00)*(Dif(fXnt(-1))-Dif(fIlnt(-1)))) +JfIlnt ) + Dfil*Zfilnt $ FRML _S fIlnk = (1-Dfil) *( 0.11555*(0.75*(Dif(fXnk)-Dif(fIlnk)) +(1-0.75)*(Dif(fXnk(-1))-Dif(fIlnk(-1)))) +JfIlnk ) + Dfil*Zfilnk $ FRML _S fIlnq = (1-Dfil) *( 0.17113*(0.75*(Dif(fXnq)-Dif(fIlnq)) +(1-0.75)*(Dif(fXnq(-1))-Dif(fIlnq(-1)))) +JfIlnq ) + Dfil*Zfilnq $ FRML _S fIlqh = (1-Dfil) *( 0.01790*(Dif(fXqh)-Dif(fIlqh)) +JfIlqh ) + Dfil*Zfilqh $ FRML _G fIlqq = (1-Dfil) *( bqqil*(Dif(fXqq)-Dif(fIlqq)) +JfIlqq ) + Dfil*Zfilqq $ FRML _G fIlm0 = (1-Dfil) *( bm0il*(Dif(fM0)-Dif(fIlm0)) +JfIlm0 ) + Dfil*Zfilm0 $ FRML _S fIlm1 = (1-Dfil) *( 0.02550*(0.00*(Dif(fM1)-Dif(fIlm1)) +(1-0.00)*(Dif(fM1(-1))-Dif(fIlm1(-1)))) +JfIlm1 ) + Dfil*Zfilm1 $ FRML _S fIlm2 = (1-Dfil) *( 0.42477*0.28267*(0.00*(Dif(fM2)-Dif(fIlm2)) +(1-0.00)*(Dif(fM2(-1))-Dif(fIlm2(-1)))) +(1-0.42477)*fIlm2(-1) +JfIlm2 ) + Dfil*Zfilm2 $ FRML _S fIlm3k = (1-Dfil) *( 0.41680*(0.00*(Dif(fM3k)-Dif(fIlm3k)) +(1-0.00)*(Dif(fM3k(-1))-Dif(fIlm3k(-1)))) +JfIlm3k ) + Dfil*Zfilm3k $ FRML _S fIlm3r = (1-Dfil) *( 0.06153*(0.50*(Dif(fM3r)-Dif(fIlm3r)) +(1-0.50)*(Dif(fM3r(-1))-Dif(fIlm3r(-1)))) +JfIlm3r ) + Dfil*Zfilm3r $ FRML _S fIlm3q = (1-Dfil) *( 0.53129*0.16938*(0.00*(Dif(fM3q)-Dif(fIlm3q)) +(1-0.00)*(Dif(fM3q(-1))-Dif(fIlm3q(-1)))) +(1-0.53129)*fIlm3q(-1) +JfIlm3q ) + Dfil*Zfilm3q $ FRML _S fIlm5 = (1-Dfil) *( 0.19085*(0.50*(Dif(fM5)-Dif(fIlm5)) +(1-0.50)*(Dif(fM5(-1))-Dif(fIlm5(-1)))) +JfIlm5 ) + Dfil*Zfilm5 $ FRML _S fIlm6m = (1-Dfil) *( 0.17929*(0.75*(Dif(fM6m)-Dif(fIlm6m)) +(1-0.75)*(Dif(fM6m(-1))-Dif(fIlm6m(-1)))) +JfIlm6m ) + Dfil*Zfilm6m $ FRML _S fIlm6q = (1-Dfil) *( 0.18089*(0.75*(Dif(fM6q)-Dif(fIlm6q)) +(1-0.75)*(Dif(fM6q(-1))-Dif(fIlm6q(-1)))) +JfIlm6q ) + Dfil*Zfilm6q $ FRML _S fIlm7b = (1-Dfil) *( 0.25703*(0.50*(Dif(fM7b)-Dif(fIlm7b)) +(1-0.50)*(Dif(fM7b(-1))-Dif(fIlm7b(-1)))) +4706.03*d86 +JfIlm7b ) + Dfil*Zfilm7b $ FRML _G fIlm7y = (1-Dfil) *( bm7yil*(Dif(fM7y)-Dif(fIlm7y)) +JfIlm7y ) + Dfil*Zfilm7y $ FRML _S fIlm7q = (1-Dfil) *( 0.71279*0.16172*(Dif(fM7q)-Dif(fIlm7q)) +(1-0.71279)*fIlm7q(-1) +JfIlm7q ) + Dfil*Zfilm7q $ FRML _S fIlm8 = (1-Dfil) *( 0.10935*(0.75*(Dif(fM8)-Dif(fIlm8)) +(1-0.75)*(Dif(fM8(-1))-Dif(fIlm8(-1)))) +JfIlm8 ) + Dfil*Zfilm8 $ FRML _I fIl = fIla + fIle + fIlne + fIlng + fIlnf + fIlnn + fIlnb + fIlnm + fIlnt + fIlnk + fIlnq + fIlqh + fIlqq + fIlm0 + fIlm1 + fIlm2 + fIlm3r + fIlm3k + fIlm3q + fIlm5 + fIlm6m + fIlm6q + fIlm7b + fIlm7q + fIlm7y + fIlm8 + fIlsi $ () () () EKSPORT I FASTE PRISER () FRML _DJRD log(fE2w) = 9.219+ log(fEe2)*(1-.0000*ddeu) -1.2767*log(pe2/pee2) $ FRML _DJRD log(fE5w) = 10.270+ log(fEe5)*(1-.5299*ddeu) -3.5211*log(pe5/pee5) $ FRML _DJRD log(fE6w) = 10.230+ log(fEe6)*(1-.4549*ddeu) -3.7574*log(pe6/pee6) $ FRML _DJRD log(fE7qw) = 11.062+log(fEe7q)*(1-.0000*ddeu) -1.0000*log(pe7q/pee7q)$ FRML _DJRD log(fE8w) = 10.639+ log(fEe8)*(1-.4978*ddeu) -3.0602*log(pe8/pee8) $ FRML _DJRD log(fEtw) = 9.907+log(fEet)*(1-.0000*ddeu) -2.329*log(pet/peet) -1.3878/(1+exp(0.3350*(tid+1-1960))) $ FRML _D faE0 = fXa - ( aaa*fXa +aane*fXne +aanf*fXnf +aann*fXnn +aanb*fXnb+ aab*fXb + aao*fXo +aacf*fCf +aaci*fCi +aaco*fCo +aait*fIt +fIla +aae2*fE2 ) $ FRML _D fnfE0 = fXnf - ( anfa*fXa +anfnf*fXnf+anfnk*fXnk+anfqq*fXqq +anfo*fXo +anfcf*fCf +anfcn*fCn +fIlnf +anfe2*fE2+anfe5*fE5) $ FRML _GJRD fE0 = fE0(-1)*((faE0+fnfE0)/(faE0(-1)+fnfE0(-1))) $ FRML _GJRD fE0k = fE0 -.33333*(hostkor+HOSTkor(-1)+hostkor(-2)) $ FRML _GJRD Dlog(fE1) = Dlog(fE0k) $ FRML _SJRD Dlog(fE2) = 0.3190*Dlog(fEe2)-0.1915*Dlog(pe2/pee2) -0.1500*log((fE2(-1)*(1-am2e2(-1)))/fE2w(-1)) -Dlog(1-am2e2) $ FRML _SJRD Dlog(fE5) = 0.8900*Dlog(fEe5)-0.6947*Dlog(pe5/pee5) -0.1125*(ddeu-ddeu(-1)) -0.1500*log(fE5(-1)/fE5w(-1)) $ FRML _SJRD Dlog(fE6) = 0.8283*Dlog(fEe6)-0.6767*Dlog(pe6/pee6) -0.0554*(ddeu-ddeu(-1)) -0.1500*log(fE6(-1)/fE6w(-1)) $ FRML _SJRD Dlog(fE7q) = 0.8379*Dlog(fEe7q)-.5425*Dlog(pe7q/pee7q) -0.0000*(ddeu-ddeu(-1)) -0.1500*log(fE7q(-1)/fE7qw(-1)) $ FRML _GJ_D fE7y = 0.1*fE7q $ FRML _SJRD Dlog(fE8) = 0.6283*Dlog(fEe8)-.3940*Dlog(pe8/pee8) -0.1340*(ddeu-ddeu(-1)) -0.1500*log(fE8(-1)/fE8w(-1)) $ FRML _I fEv = fE0+fE1+fE2+fE3+fE5+fE6+fE7y+fE7q+fE8 $ FRML _SJRD Dlog(fEt) = 1.0000*Dlog(fEet)-0.6103*Dlog(pet/peet) -0.1907*log(fEt(-1)/fEtw(-1)) $ FRML _GJ_D log(fEsqw) = log(fEesq) + efesq*log(peesq/pesq) $ FRML _GJRD Dlog(fEsq) = Dlog(fEesq) + efesq*0.15*Dlog(peesq/pesq) +0.15*log(fEsqw(-1)/fEsq(-1)) $ FRML _I fEs = fEss + fEsq $ FRML _I fE = fEv+fEs+fEt $ () () () EFTERSPRGSELSUDTRYK, FASTE PRISER, INDEKS () () FRML _D fAm0 = ( am0a(-1)*fXa(-1)*fVma/fVma(-1) +am0nf(-1)*fXnf(-1)*fVmnf/fVmnf(-1) +am0qq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am0cf(-1)*fCf +am0cn(-1)*fCn +am0ci(-1)*fCi ) *fAm0(-1)/fMz0(-1)$ FRML _D fAm1 = ( am1nn(-1)*fXnn(-1)*fVmnn/fVmnn(-1) +am1qq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am1cn(-1)*fCn +am1ci(-1)*fCi ) *fAm1(-1)/fMz1(-1)$ FRML _D fAm2 = ( am2a(-1)*fXa(-1)*fVma/fVma(-1) +am2nf(-1)*fXnf(-1)*fVmnf/fVmnf(-1) +am2nb(-1)*fXnb(-1)*fVmnb/fVmnb(-1) +am2nk(-1)*fXnk(-1)*fVmnk/fVmnk(-1) +am2nq(-1)*fXnq(-1)*fVmnq/fVmnq(-1) +am2b(-1)*fXb(-1)*fVmb/fVmb(-1) +am2ci(-1)*fCi ) *fAm2(-1)/fMz2(-1)$ FRML _D fAm3q = ( am3qa(-1)*fXa(-1)*fVea/fVea(-1) +am3qnf(-1)*fXnf(-1)*fVenf/fVenf(-1) +am3qnn(-1)*fXnn(-1)*fVenn/fVenn(-1) +am3qnb(-1)*fXnb(-1)*fVenb/fVenb(-1) +am3qnm(-1)*fXnm(-1)*fVenm/fVenm(-1) +am3qnt(-1)*fXnt(-1)*fVent/fVent(-1) +am3qnk(-1)*fXnk(-1)*fVenk/fVenk(-1) +am3qnq(-1)*fXnq(-1)*fVenq/fVenq(-1) +am3qb(-1)*fXb(-1)*fVeb/fVeb(-1) +am3qqh(-1)*fXqh(-1)*fVeqh/fVeqh(-1) +am3qqs(-1)*fXqs(-1)*fVeqs/fVeqs(-1) +am3qqt(-1)*fXqt(-1)*fVeqt/fVeqt(-1) +am3qqf(-1)*fXqf(-1)*fVeqf/fVeqf(-1) +am3qqq(-1)*fXqq(-1)*fVeqq/fVeqq(-1) +am3qh(-1)*fXh(-1)*fVeh/fVeh(-1) +am3qci(-1)*fCi +am3qce(-1)*fCe +am3qcg(-1)*fCg ) *fAm3q(-1)/fMz3q(-1)$ FRML _D fAm5 = ( am5a(-1)*fXa(-1)*fVma/fVma(-1) +am5ng(-1)*fXng(-1)*fVmng/fVmng(-1) +am5nf(-1)*fXnf(-1)*fVmnf/fVmnf(-1) +am5nb(-1)*fXnb(-1)*fVmnb/fVmnb(-1) +am5nm(-1)*fXnm(-1)*fVmnm/fVmnm(-1) +am5nk(-1)*fXnk(-1)*fVmnk/fVmnk(-1) +am5nq(-1)*fXnq(-1)*fVmnq/fVmnq(-1) +am5b(-1)*fXb(-1)*fVmb/fVmb(-1) +am5qh(-1)*fXqh(-1)*fVmqh/fVmqh(-1) +am5qq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am5ci(-1)*fCi ) *fAm5(-1)/fMz5(-1)$ FRML _D fAm6m = ( am6mnf(-1)*fXnf(-1)*fVmnf/fVmnf(-1) +am6mnb(-1)*fXnb(-1)*fVmnb/fVmnb(-1) +am6mnm(-1)*fXnm(-1)*fVmnm/fVmnm(-1) +am6mnt(-1)*fXnt(-1)*fVmnt/fVmnt(-1) +am6mnk(-1)*fXnk(-1)*fVmnk/fVmnk(-1) +am6mnq(-1)*fXnq(-1)*fVmnq/fVmnq(-1) +am6mb(-1)*fXb(-1)*fVmb/fVmb(-1) +am6mcv(-1)*fCv +am6mim(-1)*fIm ) *fAm6m(-1)/fMz6m(-1)$ FRML _D fAm6q = ( am6qnf(-1)*fXnf(-1)*fVmnf/fVmnf(-1) +am6qnn(-1)*fXnn(-1)*fVmnn/fVmnn(-1) +am6qnb(-1)*fXnb(-1)*fVmnb/fVmnb(-1) +am6qnm(-1)*fXnm(-1)*fVmnm/fVmnm(-1) +am6qnt(-1)*fXnt(-1)*fVmnt/fVmnt(-1) +am6qnk(-1)*fXnk(-1)*fVmnk/fVmnk(-1) +am6qnq(-1)*fXnq(-1)*fVmnq/fVmnq(-1) +am6qb(-1)*fXb(-1)*fVmb/fVmb(-1) +am6qqh(-1)*fXqh(-1)*fVmqh/fVmqh(-1) +am6qqq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am6qci(-1)*fCi +am6qcv(-1)*fCv +am6qim(-1)*fIm ) *fAm6q(-1)/fMz6q(-1)$ FRML _D fAm7q = ( am7qne(-1)*fXne(-1)*fVmne/fVmne(-1) +am7qnm(-1)*fXnm(-1)*fVmnm/fVmnm(-1) +am7qnt(-1)*fXnt(-1)*fVmnt/fVmnt(-1) +am7qb(-1)*fXb(-1)*fVmb/fVmb(-1) +am7qqt(-1)*fXqt(-1)*fVmqt/fVmqt(-1) +am7qqq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am7qcb(-1)*fCb +am7qcv(-1)*fCv +am7qim(-1)*fIm ) *fAm7q(-1)/fMz7q(-1)$ FRML _D fAm8 = ( am8nm(-1)*fXnm(-1)*fVmnm/fVmnm(-1) +am8nk(-1)*fXnk(-1)*fVmnk/fVmnk(-1) +am8nq(-1)*fXnq(-1)*fVmnq/fVmnq(-1) +am8b(-1)*fXb(-1)*fVmb/fVmb(-1) +am8qh(-1)*fXqh(-1)*fVmqh/fVmqh(-1) +am8qq(-1)*fXqq(-1)*fVmqq/fVmqq(-1) +am8h(-1)*fXh(-1)*fVmh/fVmh(-1) +am8ci(-1)*fCi +am8cv(-1)*fCv +am8im(-1)*fIm) *fAm8(-1)/fMz8(-1)$ () () () UDTRYK FOR RELATIV PRIS () () FRML _D pxm0 = (pm0+tm0)/pxnf $ FRML _D pxm1 = (pm1+tm1)/pxnn $ FRML _D pxm2 = (pm2+tm2)/(0.30*pxa+0.20*pxnf+0.50*pxnb) $ FRML _D pxm5 = (pm5+tm5)/pxnk $ FRML _D pxm6q = (pm6q+tm6q)/(0.15*pxnb+0.10*pxnk+0.75*pxnq) $ FRML _D pxm7q = (pm7q+tm7q)/(0.90*pxnm+0.10*pxnt) $ FRML _D pxm8 = (pm8+tm8)/(0.25*pxnm+0.20*pxnk+0.55*pxnq) $ () () () IMPORT I FASTE PRISER () () FRML _DJRD log(fMz0w) = 10.6078+log(fAm0)-.21917*log(pxm0) -1.57355/(1+(1+.09314)**(tid-1990.05+1)) $ FRML _SJRD Dlog(fMz0) = 1.83309*Dlog(fAm0) -.61881*log(fMz0(-1)/fMz0w(-1)) $ FRML _D fMu0 = am0o*fXo + am0it*fIt + fIlm0 + am0e0*fE0 $ FRML _I fM0 = fMz0 + fMu0 $ FRML _DJRD log(fMz1w) = 7.95343+log(fAm1)-1.01875*log(pxm1) $ FRML _SJRD Dlog(fMz1) = 0.47689*Dlog(fAm1)-1.01875*Dlog(pxm1) -.50329*log(fMz1(-1)/fMz1w(-1)) $ FRML _D fMu1 = am1o*fXo + fIlm1 + am1e1*fE1 $ FRML _I fM1 = fMz1 + fMu1 $ FRML _DJRD log(fMz2w) = 9.53763+log(fAm2)-0.68688*log(pxm2) -.42676/(1+(1-0.27817)**(tid-1970.28+1)) $ FRML _SJRD Dlog(fMz2) = 1.28387*Dlog(fAm2)-.26406*Dlog(pxm2) -.44346*log(fMz2(-1)/fMz2w(-1)) $ FRML _D fMu2 = am2o*fXo + fIlm2 + am2e2*fE2 $ FRML _I fM2 = fMz2 + fMu2 $ FRML _D fM3k = am3ka*fXa + am3kne*fXne + am3knf*fXnf + am3knn*fXnn + am3knb*fXnb + am3knq*fXnq + am3ko*fXo + am3kce*fCe + fIlm3k + am3ke3*fE3 $ FRML _I fM3r = am3rng*fXng + am3ro*fXo + fIlm3r + am3re3*fE3 $ FRML _SJRD fMz3q = fMz3q(-1)*fAm3q/fAm3q(-1) $ FRML _D fMu3q = am3qe*fXe + am3qng*fXng + am3qne*fXne + am3qo*fXo +fIlm3q+am3qe3*fE3 $ FRML _I fM3q = fMz3q + fMu3q $ FRML _DJRD log(fMz5w) = 8.60922+log(fAm5)-.35074*log(pxm5) +1.46386/(1+(1-0.1453)**(tid-1960+1)) $ FRML _SJRD Dlog(fMz5) = 1.07125*Dlog(fAm5)-.072008*Dlog(pxm5) -.496145*log(fMz5(-1)/fMz5w(-1)) $ FRML _D fMu5 = am5o*fXo + fIlm5 + am5e5*fE5 $ FRML _I fM5 = fMz5 + fMu5 $ FRML _SJRD fMz6m = fMz6m(-1)*fAm6m/fAm6m(-1) $ FRML _D fMu6m = am6mo*fXo + fIlm6m + am6me6*fE6 $ FRML _I fM6m = fMz6m + fMu6m $ FRML _DJRD log(fMz6qw) = 10.3776+log(fAm6q)-1.39495*log(pxm6q) -.48162/(1+(1-0.28095)**(tid-1986.67+1)) $ FRML _SJRD Dlog(fMz6q) = 1.53211*Dlog(fAm6q)-.5012*Dlog(pxm6q) -.34792*log(fMz6q(-1)/fMz6qw(-1)) $ FRML _D fMu6q = am6qo*fXo + fIlm6q + am6qe6*fE6 $ FRML _I fM6q = fMz6q + fMu6q $ FRML _I fM7b = am7bnt*fXnt + am7bo*fXo + am7bcb*fCb + am7bim*fIm + fIlm7b + am7be7q*fE7q $ FRML _GJ_D fM7yim = kfm7yim*fImqs $ FRML _I fM7y = am7ynt*fXnt + am7yqt*fXqt+ am7ycv*fCv + am7yo*fXo + am7yim*fIm + fIlm7y + am7ye7y*fE7y $ FRML _DJRD log(fMz7qw) = 10.5598+log(fAm7q)-0.996517*log(pxm7q) +0.314261/(1+(1-0.620462)**(tid-1966.31-1)) $ FRML _SJRD Dlog(fMz7q) = 1.06186*Dlog(fAm7q)-1.02361*Dlog(pxm7q) -.531346*log(fMz7q(-1)/fMz7qw(-1)) $ FRML _D fMu7q = am7qe*fXe + am7qo*fXo + fIlm7q + am7qe7q*fE7q $ FRML _I fM7q = fMz7q + fMu7q $ FRML _DJRD log(fMz8w) = 8.37125+log(fAm8)-1.19923*log(pxm8) +1.80793/(1+(1-.16277)**(tid-1960+1)) $ FRML _SJRD Dlog(fMz8) = 1.28903*Dlog(fAm8)-1.19923*Dlog(pxm8) -.56349*log(fMz8(-1)/fMz8w(-1)) $ FRML _D fMu8 = am8o*fXo + fIlm8 + am8e8*fE8 $ FRML _I fM8 = fMz8 + fMu8 $ FRML _I fMv = fM0 + fM1 + fM2 + fM3r + fM3k + fM3q + fM5 + fM6m + fM6q + fM7b + fM7y + fM7q + fM8 $ FRML _I fMs = amse*fXe + amsnm*fXnm + amsb*fXb + amsqh*fXqh + amsqs*fXqs+amsqt*fXqt + amsqf*fXqf + amsqq*fXqq + amso*fXo + amsck*fCk + amscs*fCs + amsim*fIm $ FRML _I fMt = fCt $ FRML _I fM = fMv + fMs + fMt $ () () () KORREKTIONSFAKTORER TIL I-O SYSTEMET () () FRML _D kfmz0 = (fMz0/fAm0)/(fMz0(-1)/fAm0(-1)) $ FRML _D kfmz1 = (fMz1/fAm1)/(fMz1(-1)/fAm1(-1)) $ FRML _D kfmz2 = (fMz2/fAm2)/(fMz2(-1)/fAm2(-1)) $ FRML _D kfmz3q = (fMz3q/fAm3q)/(fMz3q(-1)/fAm3q(-1)) $ FRML _D kfmz6m = (fMz6m/fAm6m)/(fMz6m(-1)/fAm6m(-1)) $ FRML _D kfmz5 = (fMz5/fAm5)/(fMz5(-1)/fAm5(-1)) $ FRML _D kfmz6q = (fMz6q/fAm6q)/(fMz6q(-1)/fAm6q(-1)) $ FRML _D kfmz7b = (1-Dfm7bim) + (Dfm7bim*ZfM7bim) /((am7bim(-1)+JDam7bim)*fIm) $ FRML _D kfmz7q = (fMz7q/fAm7q)/(fMz7q(-1)/fAm7q(-1)) $ FRML _D kfmz8 = (fMz8/fAm8)/(fMz8(-1)/fAm8(-1)) $ FRML _D kfmzs = (1-Dfmsqs) + (Dfmsqs*Zfmsqs) /((amsqs(-1)+JDamsqs)*kvmqs*fXqs) $ () () () KORREKTIONSFAKTORER FOR ’NDREDE ENERGI- OG MATERIALEKVOTER I ERHVERV () () FRML _D kvea = (fVea/fXa) /( (anga(-1)+JDanga) +(anea(-1)+JDanea) +(am3ka(-1)+JDam3ka) +(am3qa(-1)+JDam3qa) ) $ FRML _D kvee = (fVee/fXe) /( (ange(-1)+JDange) +(am3qe(-1)+JDam3qe) ) $ FRML _D kveng = (fVeng/fXng-Dfm3rng*am3rng-aeng) /( (angng(-1)+JDangng) +(aneng(-1)+JDaneng) +(am3rng(-1)+JDam3rng)*(1-Dfm3rng) +(am3qng(-1)+JDam3qng) ) $ FRML _D kvene = (fVene/fXne-Dfm3kne*am3kne-aane-aene) /( (angne(-1)+JDangne) +(anene(-1)+JDanene) +(am3kne(-1)+JDam3kne)*(1-Dfm3kne) +(am3qne(-1)+JDam3qne) ) $ FRML _D kvenf = (fVenf/fXnf) /( (angnf(-1)+JDangnf) +(anenf(-1)+JDanenf) +(am3knf(-1)+JDam3knf) +(am3qnf(-1)+JDam3qnf) ) $ FRML _D kvenn = (fVenn/fXnn) /( (angnn(-1)+JDangnn) +(anenn(-1)+JDanenn) +(am3knn(-1)+JDam3knn) +(am3qnn(-1)+JDam3qnn) ) $ FRML _D kvenb = (fVenb/fXnb) /( (angnb(-1)+JDangnb) +(anenb(-1)+JDanenb) +(am3knb(-1)+JDam3knb) +(am3qnb(-1)+JDam3qnb) ) $ FRML _D kvenm = (fVenm/fXnm) /( (angnm(-1)+JDangnm) +(anenm(-1)+JDanenm) +(am3qnm(-1)+JDam3qnm) ) $ FRML _D kvent = (fVent/fXnt) /( (angnt(-1)+JDangnt) +(anent(-1)+JDanent) +(am3qnt(-1)+JDam3qnt) ) $ FRML _D kvenk = (fVenk/fXnk) /( (angnk(-1)+JDangnk) +(anenk(-1)+JDanenk) +(am3qnk(-1)+JDam3qnk) ) $ FRML _D kvenq = (fVenq/fXnq) /( (angnq(-1)+JDangnq) +(anenq(-1)+JDanenq) +(am3knq(-1)+JDam3knq) +(am3qnq(-1)+JDam3qnq) ) $ FRML _D kveb = (fVeb/fXb) /( (angb(-1)+JDangb) +(aneb(-1)+JDaneb) +(am3qb(-1)+JDam3qb) ) $ FRML _D kveqh = (fVeqh/fXqh) /( (angqh(-1)+JDangqh) +(aneqh(-1)+JDaneqh) +(am3qqh(-1)+JDam3qqh) ) $ FRML _D kveqs = (fVeqs/fXqs) /( (angqs(-1)+JDangqs) +(aneqs(-1)+JDaneqs) +(am3qqs(-1)+JDam3qqs) ) $ FRML _D kveqt = (fVeqt/fXqt) /( (angqt(-1)+JDangqt) +(aneqt(-1)+JDaneqt) +(am3qqt(-1)+JDam3qqt) ) $ FRML _D kveqf = (fVeqf/fXqf) /( (angqf(-1)+JDangqf) +(aneqf(-1)+JDaneqf) +(am3qqf(-1)+JDam3qqf) ) $ FRML _D kveqq = (fVeqq/fXqq) /( (angqq(-1)+JDangqq) +(aneqq(-1)+JDaneqq) +(am3qqq(-1)+JDam3qqq) ) $ FRML _D kveh = (fVeh/fXh) /( (angh(-1)+JDangh) +(aneh(-1)+JDaneh) +(am3qh(-1)+JDam3qh) ) $ FRML _D kveo = (fVeo/fXo) /( (aeo(-1)+JDaeo) +(ango(-1)+JDango) +(aneo(-1)+JDaneo) +(am3ko(-1)+JDam3ko) +(am3ro(-1)+JDam3ro) +(am3qo(-1)+JDam3qo) ) $ FRML _D kvma = (fVma/fXa) /( (aaa(-1)+JDaaa) +(anfa(-1)+JDanfa) +(anma(-1)+JDanma) +(anta(-1)+JDanta) +(anka(-1)+JDanka) +(aba(-1)+JDaba) +(aqha(-1)+JDaqha) +(aqta(-1)+JDaqta) +(aqqa(-1)+JDaqqa) +(am0a(-1)+JDam0a) +(am2a(-1)+JDam2a) +(am5a(-1)+JDam5a) +(asia(-1)+JDasia) ) $ FRML _D kvme = (fVme/fXe) /( (anme(-1)+JDanme) +(ante(-1)+JDante) +(aqte(-1)+JDaqte) +(aqqe(-1)+JDaqqe) +(am7qe(-1)+JDam7qe) +(amse(-1)+JDamse) +(asie(-1)+JDasie) ) $ FRML _D kvmng = (fVmng/fXng) /( (anmng(-1)+JDanmng) +(aqtng(-1)+JDaqtng) +(am5ng(-1)+JDam5ng) +(asing(-1)+JDasing) ) $ FRML _D kvmne = (fVmne/fXne) /( (abne(-1)+JDabne) +(aqqne(-1)+JDaqqne) +(am7qne(-1)+JDam7qne) +(asine(-1)+JDasine) ) $ FRML _D kvmnf = (fVmnf/fXnf) /( (aanf(-1)+JDaanf) +(anfnf(-1)+JDanfnf) +(anmnf(-1)+JDanmnf) +(anknf(-1)+JDanknf) +(anqnf(-1)+JDanqnf) +(aqhnf(-1)+JDaqhnf) +(aqtnf(-1)+JDaqtnf) +(aqqnf(-1)+JDaqqnf) +(am0nf(-1)+JDam0nf) +(am2nf(-1)+JDam2nf) +(am5nf(-1)+JDam5nf) +(am6mnf(-1)+JDam6mnf) +(am6qnf(-1)+JDam6qnf) +(asinf(-1)+JDasinf) ) $ FRML _D kvmnn = (fVmnn/fXnn) /( (aann(-1)+JDaann) +(annnn(-1)+JDannnn) +(anmnn(-1)+JDanmnn) +(anqnn(-1)+JDanqnn) +(aqtnn(-1)+JDaqtnn) +(aqqnn(-1)+JDaqqnn) +(am1nn(-1)+JDam1nn) +(am6qnn(-1)+JDam6qnn) +(asinn(-1)+JDasinn) ) $ FRML _D kvmnb = (fVmnb/fXnb) /( (aanb(-1)+JDaanb) +(anbnb(-1)+JDanbnb) +(anmnb(-1)+JDanmnb) +(aqhnb(-1)+JDaqhnb) +(aqtnb(-1)+JDaqtnb) +(aqqnb(-1)+JDaqqnb) +(am2nb(-1)+JDam2nb) +(am5nb(-1)+JDam5nb) +(am6mnb(-1)+JDam6mnb) +(am6qnb(-1)+JDam6qnb) +(asinb(-1)+JDasinb) ) $ FRML _D kvmnm = (fVmnm/fXnm) /( (anmnm(-1)+JDanmnm) +(anknm(-1)+JDanknm) +(anqnm(-1)+JDanqnm) +(aqhnm(-1)+JDaqhnm) +(aqtnm(-1)+JDaqtnm) +(aqqnm(-1)+JDaqqnm) +(am5nm(-1)+JDam5nm) +(am6mnm(-1)+JDam6mnm) +(am6qnm(-1)+JDam6qnm) +(am7qnm(-1)+JDam7qnm) +(am8nm(-1)+JDam8nm) +(amsnm(-1)+JDamsnm) +(asinm(-1)+JDasinm) ) $ FRML _D kvmnt = (fVmnt/fXnt) /( (anmnt(-1)+JDanmnt) +(antnt(-1)+JDantnt) +(aqhnt(-1)+JDaqhnt) +(aqqnt(-1)+JDaqqnt) +(am6mnt(-1)+JDam6mnt) +(am6qnt(-1)+JDam6qnt) +(am7bnt(-1)+JDam7bnt) +(am7ynt(-1)+JDam7ynt) +(am7qnt(-1)+JDam7qnt) +(asint(-1)+JDasint) ) $ FRML _D kvmnk = (fVmnk/fXnk) /( (anfnk(-1)+JDanfnk) +(anmnk(-1)+JDanmnk) +(anknk(-1)+JDanknk) +(anqnk(-1)+JDanqnk) +(aqhnk(-1)+JDaqhnk) +(aqtnk(-1)+JDaqtnk) +(aqqnk(-1)+JDaqqnk) +(am2nk(-1)+JDam2nk) +(am5nk(-1)+JDam5nk) +(am6mnk(-1)+JDam6mnk) +(am6qnk(-1)+JDam6qnk) +(am8nk(-1)+JDam8nk) +(asink(-1)+JDasink) ) $ FRML _D kvmnq = (fVmnq/fXnq) /( (anbnq(-1)+JDanbnq) +(anmnq(-1)+JDanmnq) +(anknq(-1)+JDanknq) +(anqnq(-1)+JDanqnq) +(aqhnq(-1)+JDaqhnq) +(aqtnq(-1)+JDaqtnq) +(aqqnq(-1)+JDaqqnq) +(am2nq(-1)+JDam2nq) +(am5nq(-1)+JDam5nq) +(am6mnq(-1)+JDam6mnq) +(am6qnq(-1)+JDam6qnq) +(am8nq(-1)+JDam8nq) +(asinq(-1)+JDasinq) ) $ FRML _D kvmb = (fVmb/fXb) /( (aab(-1)+JDaab) +(anbb(-1)+JDanbb) +(anmb(-1)+JDanmb) +(ankb(-1)+JDankb) +(anqb(-1)+JDanqb) +(abb(-1)+JDabb) +(aqhb(-1)+JDaqhb) +(aqtb(-1)+JDaqtb) +(aqfb(-1)+JDaqfb) +(aqqb(-1)+JDaqqb) +(aob(-1)+JDaob) +(am2b(-1)+JDam2b) +(am5b(-1)+JDam5b) +(am6mb(-1)+JDam6mb) +(am6qb(-1)+JDam6qb) +(am7qb(-1)+JDam7qb) +(am8b(-1)+JDam8b) +(amsb(-1)+JDamsb) +(asib(-1)+JDasib) ) $ FRML _D kvmqh = (fVmqh/fXqh) /( (anmqh(-1)+JDanmqh) +(ankqh(-1)+JDankqh) +(anqqh(-1)+JDanqqh) +(abqh(-1)+JDabqh) +(aqhqh(-1)+JDaqhqh) +(aqsqh(-1)+JDaqsqh) +(aqtqh(-1)+JDaqtqh) +(aqfqh(-1)+JDaqfqh) +(aqqqh(-1)+JDaqqqh) +(aoqh(-1)+JDaoqh) +(am5qh(-1)+JDam5qh) +(am6qqh(-1)+JDam6qqh) +(am8qh(-1)+JDam8qh) +(amsqh(-1)+JDamsqh) +(asiqh(-1)+JDasiqh) ) $ FRML _D kvmqs = (fVmqs/fXqs) /( (antqs(-1)+JDantqs) +(aqsqs(-1)+JDaqsqs) +(aqtqs(-1)+JDaqtqs) +(aqqqs(-1)+JDaqqqs) +(amsqs(-1)+JDamsqs) +(asiqs(-1)+JDasiqs) ) $ FRML _D kvmqt = (fVmqt/fXqt) /( (anqqt(-1)+JDanqqt) +(abqt(-1)+JDabqt) +(aqhqt(-1)+JDaqhqt) +(aqsqt(-1)+JDaqsqt) +(aqtqt(-1)+JDaqtqt) +(aqfqt(-1)+JDaqfqt) +(aqqqt(-1)+JDaqqqt) +(aoqt(-1)+JDaoqt) +(am7yqt(-1)+JDam7yqt) +(am7qqt(-1)+JDam7qqt) +(amsqt(-1)+JDamsqt) +(asiqt(-1)+JDasiqt) ) $ FRML _D kvmqf = (fVmqf/fXqf) /( (anqqf(-1)+JDanqqf) +(abqf(-1)+JDabqf) +(aqtqf(-1)+JDaqtqf) +(aqfqf(-1)+JDaqfqf) +(aqqqf(-1)+JDaqqqf) +(aoqf(-1)+JDaoqf) +(amsqf(-1)+JDamsqf) +(asiqf(-1)+JDasiqf) ) $ FRML _D kvmqq = (fVmqq/fXqq) /( (anfqq(-1)+JDanfqq) +(annqq(-1)+JDannqq) +(anmqq(-1)+JDanmqq) +(antqq(-1)+JDantqq) +(ankqq(-1)+JDankqq) +(anqqq(-1)+JDanqqq) +(abqq(-1)+JDabqq) +(aqhqq(-1)+JDaqhqq) +(aqtqq(-1)+JDaqtqq) +(aqfqq(-1)+JDaqfqq) +(aqqqq(-1)+JDaqqqq) +(aoqq(-1)+JDaoqq) +(am0qq(-1)+JDam0qq) +(am1qq(-1)+JDam1qq) +(am5qq(-1)+JDam5qq) +(am6qqq(-1)+JDam6qqq) +(am7qqq(-1)+JDam7qqq) +(am8qq(-1)+JDam8qq) +(amsqq(-1)+JDamsqq) +(asiqq(-1)+JDasiqq) ) $ FRML _D kvmh = (fVmh/fXh) /( (abh(-1)+JDabh) +(aqqh(-1)+JDaqqh) +(am8h(-1)+JDam8h) +(asih(-1)+JDasih) ) $ FRML _D kvmo = (fVmo/fXo) /( (aao(-1)+JDaao) +(anfo(-1)+JDanfo) +(anno(-1)+JDanno) +(anbo(-1)+JDanbo) +(anmo(-1)+JDanmo) +(anto(-1)+JDanto) +(anko(-1)+JDanko) +(anqo(-1)+JDanqo) +(abo(-1)+JDabo) +(aqho(-1)+JDaqho) +(aqso(-1)+JDaqso) +(aqto(-1)+JDaqto) +(aqfo(-1)+JDaqfo) +(aqqo(-1)+JDaqqo) +(aho(-1)+JDaho) +(aoo(-1)+JDaoo) +(am0o(-1)+JDam0o) +(am1o(-1)+JDam1o) +(am2o(-1)+JDam2o) +(am5o(-1)+JDam5o) +(am6mo(-1)+JDam6mo) +(am6qo(-1)+JDam6qo) +(am7bo(-1)+JDam7bo) +(am7yo(-1)+JDam7yo) +(am7qo(-1)+JDam7qo) +(am8o(-1)+JDam8o) +(amso(-1)+JDamso) +(asio(-1)+JDasio) ) $ FRML _D kaim = (1 - antim - am7yim) /( aeim(-1) + JDaeim + anbim(-1) + JDanbim + anmim(-1) + JDanmim + ankim(-1) + JDankim + anqim(-1) + JDanqim + aqhim(-1) + JDaqhim + aqqim(-1) + JDaqqim + am6mim(-1) + JDam6mim + am6qim(-1) + JDam6qim + am7bim(-1) + JDam7bim + am7qim(-1) + JDam7qim + am8im(-1) + JDam8im + amsim(-1) + JDamsim + asiim(-1) + JDasiim ) $ () () () INPUTKOEFFICIENTER FOR ERHVERV () () FRML _G am0a = (am0a(-1)+JDam0a)*kvma*kfmz0 $ FRML _G am2a = (am2a(-1)+JDam2a)*kvma*kfmz2 $ FRML _G am3ka = (am3ka(-1)+JDam3ka)*kvea $ FRML _G am3qa = (am3qa(-1)+JDam3qa)*kvea*kfmz3q $ FRML _G am5a = (am5a(-1)+JDam5a)*kvma*kfmz5 $ FRML _G aaa = (aaa(-1)+JDaaa)*kvma $ FRML _G anga = (anga(-1)+JDanga)*kvea + ((am3qa(-1)+JDam3qa)*kvea-am3qa) $ FRML _G anea = (anea(-1)+JDanea)*kvea $ FRML _G anfa = (anfa(-1)+JDanfa)*kvma + ((am0a(-1)+JDam0a)*kvma-am0a) + ((am2a(-1)+JDam2a)*kvma-am2a) $ FRML _G anma = (anma(-1)+JDanma)*kvma $ FRML _G anta = (anta(-1)+JDanta)*kvma $ FRML _G anka = (anka(-1)+JDanka)*kvma + ((am5a(-1)+JDam5a)*kvma-am5a) $ FRML _G aba = (aba(-1)+JDaba)*kvma $ FRML _G aqha = (aqha(-1)+JDaqha)*kvma $ FRML _G aqta = (aqta(-1)+JDaqta)*kvma $ FRML _G aqqa = (aqqa(-1)+JDaqqa)*kvma $ FRML _G asia = (asia(-1)+JDasia)*kvma $ FRML _G am3qe = (am3qe(-1)+JDam3qe)*kvee $ FRML _G am7qe = (am7qe(-1)+JDam7qe)*kvme $ FRML _G amse = (amse(-1)+JDamse)*kvme $ FRML _G ange = (ange(-1)+JDange)*kvee $ FRML _G anme = (anme(-1)+JDanme)*kvme $ FRML _G ante = (ante(-1)+JDante)*kvme $ FRML _G aqte = (aqte(-1)+JDaqte)*kvme $ FRML _G aqqe = (aqqe(-1)+JDaqqe)*kvme $ FRML _G asie = (asie(-1)+JDasie)*kvme $ FRML _G am3qng = (am3qng(-1)+JDam3qng)*kveng $ FRML _G am5ng = (am5ng(-1)+JDam5ng)*kvmng*kfmz5 $ FRML _G angng = (angng(-1)+JDangng)*kveng $ FRML _G aneng = (aneng(-1)+JDaneng)*kveng $ FRML _G anmng = (anmng(-1)+JDanmng)*kvmng + ((am5ng(-1)+JDam5ng)*kvmng-am5ng) $ FRML _G aqtng = (aqtng(-1)+JDaqtng)*kvmng $ FRML _G asing = (asing(-1)+JDasing)*kvmng $ FRML _G am7qne = (am7qne(-1)+JDam7qne)*kvmne*kfmz7q $ FRML _G angne = (angne(-1)+JDangne)*kvene $ FRML _G anene = (anene(-1)+JDanene)*kvene $ FRML _G abne = (abne(-1)+JDabne)*kvmne + ((am7qne(-1)+JDam7qne)*kvmne-am7qne) $ FRML _G aqqne = (aqqne(-1)+JDaqqne)*kvmne $ FRML _G asine = (asine(-1)+JDasine)*kvmne $ FRML _G am0nf = (am0nf(-1)+JDam0nf)*kvmnf*kfmz0 $ FRML _G am2nf = (am2nf(-1)+JDam2nf)*kvmnf*kfmz2 $ FRML _G am3knf = (am3knf(-1)+JDam3knf)*kvenf $ FRML _G am3qnf = (am3qnf(-1)+JDam3qnf)*kvenf*kfmz3q $ FRML _G am5nf = (am5nf(-1)+JDam5nf)*kvmnf*kfmz5 $ FRML _G am6mnf = (am6mnf(-1)+JDam6mnf)*kvmnf*kfmz6m $ FRML _G am6qnf = (am6qnf(-1)+JDam6qnf)*kvmnf*kfmz6q $ FRML _G aanf = (aanf(-1)+JDaanf)*kvmnf + ((am0nf(-1)+JDam0nf)*kvmnf-am0nf)* 0.60 + ((am2nf(-1)+JDam2nf)*kvmnf-am2nf)* 0.60 $ FRML _G angnf = (angnf(-1)+JDangnf)*kvenf + ((am3qnf(-1)+JDam3qnf)*kvenf-am3qnf) $ FRML _G anenf = (anenf(-1)+JDanenf)*kvenf $ FRML _G anfnf = (anfnf(-1)+JDanfnf)*kvmnf + ((am0nf(-1)+JDam0nf)*kvmnf-am0nf)* 0.40 + ((am2nf(-1)+JDam2nf)*kvmnf-am2nf)* 0.40 $ FRML _G anmnf = (anmnf(-1)+JDanmnf)*kvmnf + ((am6mnf(-1)+JDam6mnf)*kvmnf-am6mnf) $ FRML _G anknf = (anknf(-1)+JDanknf)*kvmnf + ((am5nf(-1)+JDam5nf)*kvmnf-am5nf) $ FRML _G anqnf = (anqnf(-1)+JDanqnf)*kvmnf + ((am6qnf(-1)+JDam6qnf)*kvmnf-am6qnf) $ FRML _G aqhnf = (aqhnf(-1)+JDaqhnf)*kvmnf $ FRML _G aqtnf = (aqtnf(-1)+JDaqtnf)*kvmnf $ FRML _G aqqnf = (aqqnf(-1)+JDaqqnf)*kvmnf $ FRML _G asinf = (asinf(-1)+JDasinf)*kvmnf $ FRML _G am1nn = (am1nn(-1)+JDam1nn)*kvmnn*kfmz1 $ FRML _G am3knn = (am3knn(-1)+JDam3knn)*kvenn $ FRML _G am3qnn = (am3qnn(-1)+JDam3qnn)*kvenn*kfmz3q $ FRML _G am6qnn = (am6qnn(-1)+JDam6qnn)*kvmnn*kfmz6q $ FRML _G aann = (aann(-1)+JDaann)*kvmnn $ FRML _G angnn = (angnn(-1)+JDangnn)*kvenn + ((am3qnn(-1)+JDam3qnn)*kvenn-am3qnn) $ FRML _G anenn = (anenn(-1)+JDanenn)*kvenn $ FRML _G annnn = (annnn(-1)+JDannnn)*kvmnn + ((am1nn(-1)+JDam1nn)*kvmnn-am1nn) $ FRML _G anmnn = (anmnn(-1)+JDanmnn)*kvmnn $ FRML _G anqnn = (anqnn(-1)+JDanqnn)*kvmnn + ((am6qnn(-1)+JDam6qnn)*kvmnn-am6qnn) $ FRML _G aqtnn = (aqtnn(-1)+JDaqtnn)*kvmnn $ FRML _G aqqnn = (aqqnn(-1)+JDaqqnn)*kvmnn $ FRML _G asinn = (asinn(-1)+JDasinn)*kvmnn $ FRML _G am2nb = (am2nb(-1)+JDam2nb)*kvmnb*kfmz2 $ FRML _G am3knb = (am3knb(-1)+JDam3knb)*kvenb $ FRML _G am3qnb = (am3qnb(-1)+JDam3qnb)*kvenb*kfmz3q $ FRML _G am5nb = (am5nb(-1)+JDam5nb)*kvmnb*kfmz5 $ FRML _G am6mnb = (am6mnb(-1)+JDam6mnb)*kvmnb*kfmz6m $ FRML _G am6qnb = (am6qnb(-1)+JDam6qnb)*kvmnb*kfmz6q $ FRML _G aanb = (aanb(-1)+JDaanb)*kvmnb $ FRML _G angnb = (angnb(-1)+JDangnb)*kvenb + ((am3qnb(-1)+JDam3qnb)*kvenb-am3qnb) $ FRML _G anenb = (anenb(-1)+JDanenb)*kvenb $ FRML _G anbnb = (anbnb(-1)+JDanbnb)*kvmnb + ((am2nb(-1)+JDam2nb)*kvmnb-am2nb) + ((am5nb(-1)+JDam5nb)*kvmnb-am5nb) + ((am6mnb(-1)+JDam6mnb)*kvmnb-am6mnb) + ((am6qnb(-1)+JDam6qnb)*kvmnb-am6qnb) $ FRML _G anmnb = (anmnb(-1)+JDanmnb)*kvmnb $ FRML _G aqhnb = (aqhnb(-1)+JDaqhnb)*kvmnb $ FRML _G aqtnb = (aqtnb(-1)+JDaqtnb)*kvmnb $ FRML _G aqqnb = (aqqnb(-1)+JDaqqnb)*kvmnb $ FRML _G asinb = (asinb(-1)+JDasinb)*kvmnb $ FRML _G am3qnm = (am3qnm(-1)+JDam3qnm)*kvenm*kfmz3q $ FRML _G am5nm = (am5nm(-1)+JDam5nm)*kvmnm*kfmz5 $ FRML _G am6mnm = (am6mnm(-1)+JDam6mnm)*kvmnm*kfmz6m $ FRML _G am6qnm = (am6qnm(-1)+JDam6qnm)*kvmnm*kfmz6q $ FRML _G am7qnm = (am7qnm(-1)+JDam7qnm)*kvmnm*kfmz7q $ FRML _G am8nm = (am8nm(-1)+JDam8nm)*kvmnm*kfmz8 $ FRML _G amsnm = (amsnm(-1)+JDamsnm)*kvmnm $ FRML _G angnm = (angnm(-1)+JDangnm)*kvenm + ((am3qnm(-1)+JDam3qnm)*kvenm-am3qnm) $ FRML _G anenm = (anenm(-1)+JDanenm)*kvenm $ FRML _G anmnm = (anmnm(-1)+JDanmnm)*kvmnm + ((am6mnm(-1)+JDam6mnm)*kvmnm-am6mnm) + ((am7qnm(-1)+JDam7qnm)*kvmnm-am7qnm) + ((am8nm(-1)+JDam8nm)*kvmnm-am8nm) $ FRML _G anknm = (anknm(-1)+JDanknm)*kvmnm + ((am5nm(-1)+JDam5nm)*kvmnm-am5nm) + ((am6qnm(-1)+JDam6qnm)*kvmnm-am6qnm) $ FRML _G anqnm = (anqnm(-1)+JDanqnm)*kvmnm $ FRML _G aqhnm = (aqhnm(-1)+JDaqhnm)*kvmnm $ FRML _G aqtnm = (aqtnm(-1)+JDaqtnm)*kvmnm $ FRML _G aqqnm = (aqqnm(-1)+JDaqqnm)*kvmnm $ FRML _G asinm = (asinm(-1)+JDasinm)*kvmnm $ FRML _G am3qnt = (am3qnt(-1)+JDam3qnt)*kvent*kfmz3q $ FRML _G am6mnt = (am6mnt(-1)+JDam6mnt)*kvmnt*kfmz6m $ FRML _G am6qnt = (am6qnt(-1)+JDam6qnt)*kvmnt*kfmz6q $ FRML _G am7bnt = (am7bnt(-1)+JDam7bnt)*kvmnt $ FRML _G am7ynt = (am7ynt(-1)+JDam7ynt)*kvmnt $ FRML _G am7qnt = (am7qnt(-1)+JDam7qnt)*kvmnt*kfmz7q $ FRML _G angnt = (angnt(-1)+JDangnt)*kvent + ((am3qnt(-1)+JDam3qnt)*kvent-am3qnt) $ FRML _G anent = (anent(-1)+JDanent)*kvent $ FRML _G anmnt = (anmnt(-1)+JDanmnt)*kvmnt + ((am6mnt(-1)+JDam6mnt)*kvmnt-am6mnt) + ((am7qnt(-1)+JDam7qnt)*kvmnt-am7qnt)* 0.60 $ FRML _G antnt = (antnt(-1)+JDantnt)*kvmnt + ((am6qnt(-1)+JDam6qnt)*kvmnt-am6qnt) + ((am7qnt(-1)+JDam7qnt)*kvmnt-am7qnt)* 0.40 $ FRML _G aqhnt = (aqhnt(-1)+JDaqhnt)*kvmnt $ FRML _G aqqnt = (aqqnt(-1)+JDaqqnt)*kvmnt $ FRML _G asint = (asint(-1)+JDasint)*kvmnt $ FRML _G am2nk = (am2nk(-1)+JDam2nk)*kvmnk*kfmz2 $ FRML _G am3qnk = (am3qnk(-1)+JDam3qnk)*kvenk*kfmz3q $ FRML _G am5nk = (am5nk(-1)+JDam5nk)*kvmnk*kfmz5 $ FRML _G am6mnk = (am6mnk(-1)+JDam6mnk)*kvmnk*kfmz6m $ FRML _G am6qnk = (am6qnk(-1)+JDam6qnk)*kvmnk*kfmz6q $ FRML _G am8nk = (am8nk(-1)+JDam8nk)*kvmnk*kfmz8 $ FRML _G angnk = (angnk(-1)+JDangnk)*kvenk + ((am3qnk(-1)+JDam3qnk)*kvenk-am3qnk) $ FRML _G anenk = (anenk(-1)+JDanenk)*kvenk $ FRML _G anfnk = (anfnk(-1)+JDanfnk)*kvmnk $ FRML _G anmnk = (anmnk(-1)+JDanmnk)*kvmnk + ((am6mnk(-1)+JDam6mnk)*kvmnk-am6mnk) $ FRML _G anknk = (anknk(-1)+JDanknk)*kvmnk + ((am2nk(-1)+JDam2nk)*kvmnk-am2nk) + ((am5nk(-1)+JDam5nk)*kvmnk-am5nk) $ FRML _G anqnk = (anqnk(-1)+JDanqnk)*kvmnk + ((am6qnk(-1)+JDam6qnk)*kvmnk-am6qnk) + ((am8nk(-1)+JDam8nk)*kvmnk-am8nk) $ FRML _G aqhnk = (aqhnk(-1)+JDaqhnk)*kvmnk $ FRML _G aqtnk = (aqtnk(-1)+JDaqtnk)*kvmnk $ FRML _G aqqnk = (aqqnk(-1)+JDaqqnk)*kvmnk $ FRML _G asink = (asink(-1)+JDasink)*kvmnk $ FRML _G am2nq = (am2nq(-1)+JDam2nq)*kvmnq*kfmz2 $ FRML _G am3knq = (am3knq(-1)+JDam3knq)*kvenq $ FRML _G am3qnq = (am3qnq(-1)+JDam3qnq)*kvenq*kfmz3q $ FRML _G am5nq = (am5nq(-1)+JDam5nq)*kvmnq*kfmz5 $ FRML _G am6mnq = (am6mnq(-1)+JDam6mnq)*kvmnq*kfmz6m $ FRML _G am6qnq = (am6qnq(-1)+JDam6qnq)*kvmnq*kfmz6q $ FRML _G am8nq = (am8nq(-1)+JDam8nq)*kvmnq*kfmz8 $ FRML _G angnq = (angnq(-1)+JDangnq)*kvenq + ((am3qnq(-1)+JDam3qnq)*kvenq-am3qnq) $ FRML _G anenq = (anenq(-1)+JDanenq)*kvenq $ FRML _G anbnq = (anbnq(-1)+JDanbnq)*kvmnq $ FRML _G anmnq = (anmnq(-1)+JDanmnq)*kvmnq + ((am6mnq(-1)+JDam6mnq)*kvmnq-am6mnq) $ FRML _G anknq = (anknq(-1)+JDanknq)*kvmnq $ FRML _G anqnq = (anqnq(-1)+JDanqnq)*kvmnq + ((am2nq(-1)+JDam2nq)*kvmnq-am2nq) + ((am5nq(-1)+JDam5nq)*kvmnq-am5nq) + ((am6qnq(-1)+JDam6qnq)*kvmnq-am6qnq) + ((am8nq(-1)+JDam8nq)*kvmnq-am8nq) $ FRML _G aqhnq = (aqhnq(-1)+JDaqhnq)*kvmnq $ FRML _G aqtnq = (aqtnq(-1)+JDaqtnq)*kvmnq $ FRML _G aqqnq = (aqqnq(-1)+JDaqqnq)*kvmnq $ FRML _G asinq = (asinq(-1)+JDasinq)*kvmnq $ FRML _G am2b = (am2b(-1)+JDam2b)*kvmb*kfmz2 $ FRML _G am3qb = (am3qb(-1)+JDam3qb)*kveb*kfmz3q $ FRML _G am5b = (am5b(-1)+JDam5b)*kvmb*kfmz5 $ FRML _G am6mb = (am6mb(-1)+JDam6mb)*kvmb*kfmz6m $ FRML _G am6qb = (am6qb(-1)+JDam6qb)*kvmb*kfmz6q $ FRML _G am7qb = (am7qb(-1)+JDam7qb)*kvmb*kfmz7q $ FRML _G am8b = (am8b(-1)+JDam8b)*kvmb*kfmz8 $ FRML _G amsb = (amsb(-1)+JDamsb)*kvmb $ FRML _G aab = (aab(-1)+JDaab)*kvmb $ FRML _G angb = (angb(-1)+JDangb)*kveb + ((am3qb(-1)+JDam3qb)*kveb-am3qb) $ FRML _G aneb = (aneb(-1)+JDaneb)*kveb $ FRML _G anbb = (anbb(-1)+JDanbb)*kvmb + ((am2b(-1)+JDam2b)*kvmb-am2b) + ((am6qb(-1)+JDam6qb)*kvmb-am6qb) $ FRML _G anmb = (anmb(-1)+JDanmb)*kvmb + ((am6mb(-1)+JDam6mb)*kvmb-am6mb) + ((am7qb(-1)+JDam7qb)*kvmb-am7qb) + ((am8b(-1)+JDam8b)*kvmb-am8b)* 0.60 $ FRML _G ankb = (ankb(-1)+JDankb)*kvmb + ((am5b(-1)+JDam5b)*kvmb-am5b) + ((am8b(-1)+JDam8b)*kvmb-am8b)* 0.40 $ FRML _G anqb = (anqb(-1)+JDanqb)*kvmb $ FRML _G abb = (abb(-1)+JDabb)*kvmb $ FRML _G aqhb = (aqhb(-1)+JDaqhb)*kvmb $ FRML _G aqtb = (aqtb(-1)+JDaqtb)*kvmb $ FRML _G aqfb = (aqfb(-1)+JDaqfb)*kvmb $ FRML _G aqqb = (aqqb(-1)+JDaqqb)*kvmb $ FRML _G aob = (aob(-1)+JDaob)*kvmb $ FRML _G asib = (asib(-1)+JDasib)*kvmb $ FRML _G am3qqh = (am3qqh(-1)+JDam3qqh)*kveqh*kfmz3q $ FRML _G am5qh = (am5qh(-1)+JDam5qh)*kvmqh*kfmz5 $ FRML _G am6qqh = (am6qqh(-1)+JDam6qqh)*kvmqh*kfmz6q $ FRML _G am8qh = (am8qh(-1)+JDam8qh)*kvmqh*kfmz8 $ FRML _G amsqh = (amsqh(-1)+JDamsqh)*kvmqh $ FRML _G angqh = (angqh(-1)+JDangqh)*kveqh + ((am3qqh(-1)+JDam3qqh)*kveqh-am3qqh) $ FRML _G aneqh = (aneqh(-1)+JDaneqh)*kveqh $ FRML _G anmqh = (anmqh(-1)+JDanmqh)*kvmqh $ FRML _G ankqh = (ankqh(-1)+JDankqh)*kvmqh + ((am5qh(-1)+JDam5qh)*kvmqh-am5qh) $ FRML _G anqqh = (anqqh(-1)+JDanqqh)*kvmqh + ((am6qqh(-1)+JDam6qqh)*kvmqh-am6qqh) + ((am8qh(-1)+JDam8qh)*kvmqh-am8qh) $ FRML _G abqh = (abqh(-1)+JDabqh)*kvmqh $ FRML _G aqhqh = (aqhqh(-1)+JDaqhqh)*kvmqh $ FRML _G aqsqh = (aqsqh(-1)+JDaqsqh)*kvmqh $ FRML _G aqtqh = (aqtqh(-1)+JDaqtqh)*kvmqh $ FRML _G aqfqh = (aqfqh(-1)+JDaqfqh)*kvmqh $ FRML _G aqqqh = (aqqqh(-1)+JDaqqqh)*kvmqh $ FRML _G aoqh = (aoqh(-1)+JDaoqh)*kvmqh $ FRML _G asiqh = (asiqh(-1)+JDasiqh)*kvmqh $ FRML _G am3qqs = (am3qqs(-1)+JDam3qqs)*kveqs*kfmz3q $ FRML _G amsqs = (amsqs(-1)+JDamsqs)*kvmqs*kfmzs $ FRML _G angqs = (angqs(-1)+JDangqs)*kveqs + ((am3qqs(-1)+JDam3qqs)*kveqs-am3qqs) $ FRML _G aneqs = (aneqs(-1)+JDaneqs)*kveqs $ FRML _G antqs = (antqs(-1)+JDantqs)*kvmqs + ((amsqs(-1)+JDamsqs)*kvmqs-amsqs) $ FRML _G aqsqs = (aqsqs(-1)+JDaqsqs)*kvmqs $ FRML _G aqtqs = (aqtqs(-1)+JDaqtqs)*kvmqs $ FRML _G aqqqs = (aqqqs(-1)+JDaqqqs)*kvmqs $ FRML _G asiqs = (asiqs(-1)+JDasiqs)*kvmqs $ FRML _G am3qqt = (am3qqt(-1)+JDam3qqt)*kveqt*kfmz3q $ FRML _G am7yqt = (am7yqt(-1)+JDam7yqt)*kvmqt $ FRML _G am7qqt = (am7qqt(-1)+JDam7qqt)*kvmqt*kfmz7q $ FRML _G amsqt = (amsqt(-1)+JDamsqt)*kvmqt $ FRML _G angqt = (angqt(-1)+JDangqt)*kveqt + ((am3qqt(-1)+JDam3qqt)*kveqt-am3qqt) $ FRML _G aneqt = (aneqt(-1)+JDaneqt)*kveqt $ FRML _G anqqt = (anqqt(-1)+JDanqqt)*kvmqt $ FRML _G abqt = (abqt(-1)+JDabqt)*kvmqt $ FRML _G aqhqt = (aqhqt(-1)+JDaqhqt)*kvmqt $ FRML _G aqsqt = (aqsqt(-1)+JDaqsqt)*kvmqt $ FRML _G aqtqt = (aqtqt(-1)+JDaqtqt)*kvmqt + ((am7qqt(-1)+JDam7qqt)*kvmqt-am7qqt) $ FRML _G aqfqt = (aqfqt(-1)+JDaqfqt)*kvmqt $ FRML _G aqqqt = (aqqqt(-1)+JDaqqqt)*kvmqt $ FRML _G aoqt = (aoqt(-1)+JDaoqt)*kvmqt $ FRML _G asiqt = (asiqt(-1)+JDasiqt)*kvmqt $ FRML _G am3qqf = (am3qqf(-1)+JDam3qqf)*kveqf*kfmz3q $ FRML _G amsqf = (amsqf(-1)+JDamsqf)*kvmqf $ FRML _G angqf = (angqf(-1)+JDangqf)*kveqf + ((am3qqf(-1)+JDam3qqf)*kveqf-am3qqf) $ FRML _G aneqf = (aneqf(-1)+JDaneqf)*kveqf $ FRML _G anqqf = (anqqf(-1)+JDanqqf)*kvmqf $ FRML _G abqf = (abqf(-1)+JDabqf)*kvmqf $ FRML _G aqtqf = (aqtqf(-1)+JDaqtqf)*kvmqf $ FRML _G aqfqf = (aqfqf(-1)+JDaqfqf)*kvmqf $ FRML _G aqqqf = (aqqqf(-1)+JDaqqqf)*kvmqf $ FRML _G asiqf = (asiqf(-1)+JDasiqf)*kvmqf $ FRML _G aoqf = (aoqf(-1)+JDaoqf)*kvmqf $ FRML _G am0qq = (am0qq(-1)+JDam0qq)*kvmqq*kfmz0 $ FRML _G am1qq = (am1qq(-1)+JDam1qq)*kvmqq*kfmz1 $ FRML _G am3qqq = (am3qqq(-1)+JDam3qqq)*kveqq*kfmz3q $ FRML _G am5qq = (am5qq(-1)+JDam5qq)*kvmqq*kfmz5 $ FRML _G am6qqq = (am6qqq(-1)+JDam6qqq)*kvmqq*kfmz6q $ FRML _G am7qqq = (am7qqq(-1)+JDam7qqq)*kvmqq*kfmz7q $ FRML _G am8qq = (am8qq(-1)+JDam8qq)*kvmqq*kfmz8 $ FRML _G amsqq = (amsqq(-1)+JDamsqq)*kvmqq $ FRML _G angqq = (angqq(-1)+JDangqq)*kveqq + ((am3qqq(-1)+JDam3qqq)*kveqq-am3qqq) $ FRML _G aneqq = (aneqq(-1)+JDaneqq)*kveqq $ FRML _G anfqq = (anfqq(-1)+JDanfqq)*kvmqq + ((am0qq(-1)+JDam0qq)*kvmqq-am0qq) $ FRML _G annqq = (annqq(-1)+JDannqq)*kvmqq + ((am1qq(-1)+JDam1qq)*kvmqq-am1qq) $ FRML _G anmqq = (anmqq(-1)+JDanmqq)*kvmqq $ FRML _G antqq = (antqq(-1)+JDantqq)*kvmqq $ FRML _G ankqq = (ankqq(-1)+JDankqq)*kvmqq + ((am5qq(-1)+JDam5qq)*kvmqq-am5qq) $ FRML _G anqqq = (anqqq(-1)+JDanqqq)*kvmqq + ((am6qqq(-1)+JDam6qqq)*kvmqq-am6qqq) + ((am7qqq(-1)+JDam7qqq)*kvmqq-am7qqq) + ((am8qq(-1)+JDam8qq)*kvmqq-am8qq) $ FRML _G abqq = (abqq(-1)+JDabqq)*kvmqq $ FRML _G aqhqq = (aqhqq(-1)+JDaqhqq)*kvmqq $ FRML _G aqtqq = (aqtqq(-1)+JDaqtqq)*kvmqq $ FRML _G aqfqq = (aqfqq(-1)+JDaqfqq)*kvmqq $ FRML _G aqqqq = (aqqqq(-1)+JDaqqqq)*kvmqq $ FRML _G aoqq = (aoqq(-1)+JDaoqq)*kvmqq $ FRML _G asiqq = (asiqq(-1)+JDasiqq)*kvmqq $ FRML _G am3qh = (am3qh(-1)+JDam3qh)*kveh*kfmz3q $ FRML _G am8h = (am8h(-1)+JDam8h)*kvmh*kfmz8 $ FRML _G angh = (angh(-1)+JDangh)*kveh + ((am3qh(-1)+JDam3qh)*kveh-am3qh) $ FRML _G aneh = (aneh(-1)+JDaneh)*kveh $ FRML _G abh = (abh(-1)+JDabh)*kvmh + ((am8h(-1)+JDam8h)*kvmh-am8h) $ FRML _G aqqh = (aqqh(-1)+JDaqqh)*kvmh $ FRML _G asih = (asih(-1)+JDasih)*kvmh $ FRML _G am0o = (am0o(-1)+JDam0o)*kvmo $ FRML _G am1o = (am1o(-1)+JDam1o)*kvmo $ FRML _G am2o = (am2o(-1)+JDam2o)*kvmo $ FRML _G am3ko = (am3ko(-1)+JDam3ko)*kveo $ FRML _G am3ro = (am3ro(-1)+JDam3ro)*kveo $ FRML _G am3qo = (am3qo(-1)+JDam3qo)*kveo $ FRML _G am5o = (am5o(-1)+JDam5o)*kvmo $ FRML _G am6mo = (am6mo(-1)+JDam6mo)*kvmo $ FRML _G am6qo = (am6qo(-1)+JDam6qo)*kvmo $ FRML _G am7bo = (am7bo(-1)+JDam7bo)*kvmo $ FRML _G am7yo = (am7yo(-1)+JDam7yo)*kvmo $ FRML _G am7qo = (am7qo(-1)+JDam7qo)*kvmo $ FRML _G am8o = (am8o(-1)+JDam8o)*kvmo $ FRML _G amso = (amso(-1)+JDamso)*kvmo $ FRML _G aao = (aao(-1)+JDaao)*kvmo $ FRML _G aeo = (aeo(-1)+JDaeo)*kveo $ FRML _G ango = (ango(-1)+JDango)*kveo $ FRML _G aneo = (aneo(-1)+JDaneo)*kveo $ FRML _G anfo = (anfo(-1)+JDanfo)*kvmo $ FRML _G anno = (anno(-1)+JDanno)*kvmo $ FRML _G anbo = (anbo(-1)+JDanbo)*kvmo $ FRML _G anmo = (anmo(-1)+JDanmo)*kvmo $ FRML _G anto = (anto(-1)+JDanto)*kvmo $ FRML _G anko = (anko(-1)+JDanko)*kvmo $ FRML _G anqo = (anqo(-1)+JDanqo)*kvmo $ FRML _G abo = (abo(-1)+JDabo)*kvmo $ FRML _G aqho = (aqho(-1)+JDaqho)*kvmo $ FRML _G aqso = (aqso(-1)+JDaqso)*kvmo $ FRML _G aqto = (aqto(-1)+JDaqto)*kvmo $ FRML _G aqfo = (aqfo(-1)+JDaqfo)*kvmo $ FRML _G aqqo = (aqqo(-1)+JDaqqo)*kvmo $ FRML _G aho = (aho(-1)+JDaho)*kvmo $ FRML _G aoo = (aoo(-1)+JDaoo)*kvmo $ FRML _G asio = (asio(-1)+JDasio)*kvmo $ () () () KOEFFICIENTER FOR ENDELIG ANVENDELSE () () FRML _G am0cf = (am0cf(-1)+JDam0cf)*kfmz0 $ FRML _G aacf = (aacf(-1)+JDaacf) + ((am0cf(-1)+JDam0cf)-am0cf)*0.25 $ FRML _G anfcf = (anfcf(-1)+JDanfcf) + ((am0cf(-1)+JDam0cf)-am0cf)*0.75 $ FRML _G am0cn = (am0cn(-1)+JDam0cn)*kfmz0 $ FRML _G am1cn = (am1cn(-1)+JDam1cn)*kfmz1 $ FRML _G anfcn = (anfcn(-1)+JDanfcn) + ((am0cn(-1)+JDam0cn)-am0cn) $ FRML _G anncn = (anncn(-1)+JDanncn) + ((am1cn(-1)+JDam1cn)-am1cn) $ FRML _G am0ci = (am0ci(-1)+JDam0ci)*kfmz0 $ FRML _G am1ci = (am1ci(-1)+JDam1ci)*kfmz1 $ FRML _G am2ci = (am2ci(-1)+JDam2ci)*kfmz2 $ FRML _G am3qci = (am3qci(-1)+JDam3qci)*kfmz3q $ FRML _G am5ci = (am5ci(-1)+JDam5ci)*kfmz5 $ FRML _G am6qci = (am6qci(-1)+JDam6qci)*kfmz6q $ FRML _G am8ci = (am8ci(-1)+JDam8ci)*kfmz8 $ FRML _G aaci = (aaci(-1)+JDaaci) + ((am0ci(-1)+JDam0ci)-am0ci) + ((am1ci(-1)+JDam1ci)-am1ci) + ((am2ci(-1)+JDam2ci)-am2ci) $ FRML _G ankci = (ankci(-1)+JDankci) + ((am3qci(-1)+JDam3qci)-am3qci) + ((am5ci(-1)+JDam5ci)-am5ci) + ((am8ci(-1)+JDam8ci)-am8ci)*0.15 $ FRML _G anqci = (anqci(-1)+JDanqci) + ((am6qci(-1)+JDam6qci)-am6qci) + ((am8ci(-1)+JDam8ci)-am8ci)*0.85 $ FRML _G am3qce = (am3qce(-1)+JDam3qce)*kfmz3q $ FRML _G angce = (angce(-1)+JDangce) + ((am3qce(-1)+JDam3qce)-am3qce) $ FRML _G am3qcg = (am3qcg(-1)+JDam3qcg)*kfmz3q $ FRML _G angcg = (angcg(-1)+JDangcg) + ((am3qcg(-1)+JDam3qcg)-am3qcg) $ FRML _G am7qcb = (am7qcb(-1)+JDam7qcb)*kfmz7q $ FRML _G antcb = (antcb(-1)+JDantcb) + ((am7qcb(-1)+JDam7qcb)-am7qcb) $ FRML _G am6mcv = (am6mcv(-1)+JDam6mcv)*kfmz6m $ FRML _G am6qcv = (am6qcv(-1)+JDam6qcv)*kfmz6q $ FRML _G am7qcv = (am7qcv(-1)+JDam7qcv)*kfmz7q $ FRML _G am8cv = (am8cv(-1)+JDam8cv)*kfmz8 $ FRML _G anmcv = (anmcv(-1)+JDanmcv) + ((am6mcv(-1)+JDam6mcv)-am6mcv) + ((am7qcv(-1)+JDam7qcv)-am7qcv) + ((am8cv(-1)+JDam8cv)-am8cv)*0.30 $ FRML _G ankcv = (ankcv(-1)+JDankcv) + ((am8cv(-1)+JDam8cv)-am8cv)*0.20 $ FRML _G anqcv = (anqcv(-1)+JDanqcv) + ((am6qcv(-1)+JDam6qcv)-am6qcv) + ((am8cv(-1)+JDam8cv)-am8cv)*0.50 $ FRML _G am6qcs = (am6qcs(-1)+JDam6qcs)*kfmz6q $ FRML _G anqcs = (anqcs(-1)+JDanqcs) + ((am6qcs(-1)+JDam6qcs)-am6qcs) $ FRML _G am6mim = (am6mim(-1)+JDam6mim)*kfmz6m*kaim $ FRML _G am6qim = (am6qim(-1)+JDam6qim)*kfmz6q*kaim $ () am7yim er s‘rbehandlet FRML _G am7bim = (am7bim(-1)+JDam7bim)*kfmz7b*kaim $ FRML _G am7qim = (am7qim(-1)+JDam7qim)*kfmz7q*kaim $ FRML _G am8im = (am8im(-1)+JDam8im)*kfmz8*kaim $ FRML _G amsim = (amsim(-1)+JDamsim)*kaim $ FRML _G aeim = (aeim(-1)+JDaeim)*kaim $ FRML _G anbim = (anbim(-1)+JDanbim)*kaim $ FRML _G anmim = (anmim(-1)+JDanmim)*kaim + ((am6mim(-1)+JDam6mim)*kaim-am6mim) + ((am7qim(-1)+JDam7qim)*kaim-am7qim) + ((am8im(-1)+JDam8im)*kaim-am8im)*0.75 $ () antim er s‘rbehandlet FRML _G ankim = (ankim(-1)+JDankim)*kaim $ FRML _G anqim = (anqim(-1)+JDanqim)*kaim + ((am6qim(-1)+JDam6qim)*kaim-am6qim) + ((am8im(-1)+JDam8im)*kaim-am8im)*0.25 $ FRML _G aqhim = (aqhim(-1)+JDaqhim)*kaim $ FRML _G aqqim = (aqqim(-1)+JDaqqim)*kaim $ FRML _G asiim = (asiim(-1)+JDasiim)*kaim $ () () () S’RBEHANDLEDE SAMMENBINDINGSKOEFFICIENTER () () FRML _G aeng = (beng*fXe)/fXng $ FRML _G aane = fane/fXne $ FRML _G aene = (bene*fXe)/fXne $ FRML _G aee3 = ((1-beng-bene)*fXe-aeo*fXo-aece*fCe-aeim*fIm-fIle)/ fE3 $ FRML _G ange3 = 1-aee3-anee3-aqhe3-am3re3-am3ke3 -am3qe3-asie3 $ FRML _G am3rng = dfm3rng*ZfM3rng/fXng + (1-dfm3rng)*(am3rng(-1)+JDam3rng)*kveng $ FRML _G am3kne = dfm3kne*Zfm3kne/fXne + (1-dfm3kne)*(am3kne(-1)+JDam3kne)*kvene $ FRML _G am3qne = (am3qne(-1)+JDam3qne)*kvene $ FRML _GJD aocs = aocs(-1)*(fCs(-1)/fCs)*(fYfo/fYfo(-1)) $ FRML _G aqqcs = 1-anmcs-anqcs-aqhcs-aqtcs-aqfcs-aocs -amscs-asics $ FRML _G am7yim = fM7yim/fIm $ FRML _G antim = (fImqs-fM7yim)/fIm + antim(-1) - (fImqs(-1)-fM7yim(-1))/fIm(-1) + JDantim$ FRML _I aaco = faco /fCo $ FRML _I abco = fbco /fCo $ FRML _I aqhco = fqhco /fCo $ FRML _I aqtco = fqtco /fCo $ FRML _I aqqco = fqqco /fCo $ FRML _I asico = fsico /fCo $ FRML _I aoco = foco /fCo $ () () () PRODUKTIONSV’RDIER I FASTE PRISER () FRML _GJRD log(fXaw) = log(fXae)+efxal*log((pne0/pwaw)*kfxa) $ FRML _GJRD Dlog(fXa) = dlog(fXae)+efxas*dlog((pne0/pwaw)*kfxa) +0.2*log(fXaw(-1)/fXa(-1)) $ FRML _I fXng = anga*fXa + ange*fXe + angng*fXng + angne*fXne + angnf*fXnf + angnn*fXnn + angnb*fXnb + angnm*fXnm + angnt*fXnt + angnk*fXnk + angnq*fXnq + angb*fXb + angqh*fXqh + angqs*fXqs + angqt*fXqt + angqf*fXqf + angqq*fXqq + angh*fXh + ango*fXo + angce*fCe + angcg*fCg + fIlng + ange3*fE3$ FRML _I fXne = anea*fXa + aneng*fXng + anene*fXne + anenf*fXnf + anenn*fXnn + anenb*fXnb + anenm*fXnm + anent*fXnt + anenk*fXnk + anenq*fXnq + aneb*fXb + aneqh*fXqh + aneqs*fXqs + aneqt*fXqt + aneqf*fXqf + aneqq*fXqq + aneh*fXh + aneo*fXo + anece*fCe + fIlne + anee3*fE3$ FRML _GJDD Dlog(fXnf) = Dlog(fXa-hostkor) $ FRML _I fXnn = annnn*fXnn + annqq*fXqq + anno*fXo + anncn*fCn + fIlnn + anne0*fE0 + anne1*fE1$ FRML _I fXnb = anbnb*fXnb + anbnq*fXnq + anbb*fXb + anbo*fXo + anbcv*fCv + anbim*fIm + fIlnb + anbe2*fE2 + anbe6*fE6$ FRML _I fXnm = anma*fXa + anme*fXe + anmng*fXng + anmnf*fXnf + anmnn*fXnn + anmnb*fXnb + anmnm*fXnm + anmnt*fXnt + anmnk*fXnk + anmnq*fXnq + anmb*fXb + anmqh*fXqh + anmqq*fXqq + anmo*fXo + anmcv*fCv + anmcs*fCs + anmim*fIm + fIlnm + anme2*fE2 + anme6*fE6 + anme7q*fE7q + anme8*fE8$ FRML _I fXnt = anta*fXa + ante*fXe + antnt*fXnt + antqs*fXqs + antqq*fXqq + anto*fXo + antcb*fCb + antcv*fCv + antim*fIm + fIlnt + ante7y*fE7y + ante7q*fE7q $ FRML _I fXnk = anka*fXa + anknf*fXnf + anknm*fXnm + anknk*fXnk + anknq*fXnq + ankb*fXb + ankqh*fXqh + ankqq*fXqq + anko*fXo + ankci*fCi + ankcv*fCv + ankim*fIm + fIlnk + anke2*fE2 + anke5*fE5 + anke6*fE6 + anke8*fE8$ FRML _I fXnq = anqnf*fXnf + anqnn*fXnn + anqnm*fXnm + anqnk*fXnk + anqnq*fXnq + anqb*fXb + anqqh*fXqh + anqqt*fXqt + anqqf*fXqf + anqqq*fXqq + anqo*fXo + anqci*fCi + anqcv*fCv + anqcs*fCs + anqim*fIm + fIlnq + anqe6*fE6 + anqe8*fE8$ FRML _I fXn = fXng + fXne + fXnf + fXnn + fXnb + fXnm + fXnt + fXnk + fXnq $ FRML _I fXb = aba*fXa + abne*fXne + abb*fXb + abqh*fXqh + abqt*fXqt + abqf*fXqf + abqq*fXqq + abh*fXh + abo*fXo + abch*fCh + abco*fCo + abib*fIb $ FRML _I fXqh = aqha*fXa + aqhnf*fXnf + aqhnb*fXnb + aqhnm*fXnm + aqhnt*fXnt + aqhnk*fXnk + aqhnq*fXnq + aqhb*fXb + aqhqh*fXqh + aqhqt*fXqt + aqhqq*fXqq + aqho*fXo + aqhcf*fCf + aqhcn*fCn + aqhci*fCi + aqhce*fCe + aqhcg*fCg + aqhcb*fCb + aqhcv*fCv + aqhcs*fCs + aqhco*fCo + aqhim*fIm + fIlqh + aqhe0*fE0 + aqhe1*fE1 + aqhe2*fE2 + aqhe3*fE3 + aqhe5*fE5 + aqhe6*fE6 + aqhe7q*fE7q + aqhe8*fE8 + aqhesq*fEsq $ FRML _I fXqs = aqsqh*fXqh + aqsqs*fXqs + aqsqt*fXqt + aqso*fXo + aqsck*fCk + fEss $ FRML _I fXqt = aqta*fXa + aqte*fXe + aqtng*fXng + aqtnf*fXnf + aqtnn*fXnn + aqtnb*fXnb + aqtnm*fXnm + aqtnk*fXnk + aqtnq*fXnq + aqtb*fXb + aqtqh*fXqh + aqtqs*fXqs + aqtqt*fXqt + aqtqf*fXqf + aqtqq*fXqq + aqto*fXo + aqtck*fCk + aqtcs*fCs + aqtco*fCo + aqtesq*fEsq $ FRML _I fXqf = aqfb*fXb + aqfqh*fXqh + aqfqt*fXqt + aqfqf*fXqf + aqfqq*fXqq + aqfo*fXo + aqfcs*fCs + aqfesq*fEsq - fYfqi $ FRML _I fXqq = aqqa*fXa + aqqe*fXe + aqqne*fXne + aqqnf*fXnf + aqqnn*fXnn + aqqnb*fXnb + aqqnm*fXnm + aqqnt*fXnt + aqqnk*fXnk + aqqnq*fXnq + aqqb*fXb + aqqqh*fXqh + aqqqs*fXqs + aqqqt*fXqt + aqqqf*fXqf + aqqqq*fXqq + aqqh*fXh + aqqo*fXo + aqqch*fCh + aqqcs*fCs + aqqco*fCo + aqqim*fIm + aqqib*fIb + fIlqq + aqqe8*fE8 + aqqesq*fEsq$ $ FRML _I fXh = aho*fXo + ahch*fCh $ () () Prisdeflator til energirelationerne () FRML _DJRD pklea = ((la/dthqa)/(102.6962/0.8464)) **(0.5*((102.6962*174.0979) /(102.6962*174.0979+0.0906*111924.000+1.4437*1802.7762) +(la*HQa)/(la*HQa+uima*fKma+pvea*fVea))) * ((uima/dtfkma)/(0.0906/0.8662)) **(0.5*((0.0906*111924.000) /(102.6962*174.0979+0.0906*111924.000+1.4437*1802.7762) +(uima*fKma)/(la*HQa+uima*fKma+pvea*fVea))) * ((pvea/dtfvea)/(1.4437/1.0000)) **(0.5*((1.4437* 1802.7762) /(102.6962*174.0979+0.0906*111924.000+1.4437*1802.7762) +(pvea*fVea)/(la*HQa+uima*fKma+pvea*fVea))) $ FRML _DJRD pklenf = ((lnf/dthqnf)/(143.4702/0.8786)) **(0.5*((143.4702*114.5334) /(143.4702*114.5334+0.0997*46551.3947+1.1511*1398.3126) +(lnf*HQnf)/(lnf*HQnf+uimnf*fKmnf+pvenf*fVenf))) * ((uimnf/dtfkmnf)/(0.0997/1.0297)) **(0.5*((0.0997*46551.3947) /(143.4702*114.5334+0.0997*46551.3947+1.1511*1398.3126) +(uimnf*fKmnf)/(lnf*HQnf+uimnf*fKmnf+pvenf*fVenf))) * ((pvenf/dtfvenf)/(1.1511/1.0000)) **(0.5*((1.1511*1398.3126) /(143.4702*114.5334+0.0997*46551.3947+1.1511*1398.3126) +(pvenf*fVenf)/(lnf*HQnf+uimnf*fKmnf+pvenf*fVenf))) $ FRML _DJRD pklenn = ((lnn/dthqnn)/(183.5064/0.8435)) **(0.5*((183.5064*11.6694) /(183.5064*11.6694+0.0997*5373.6053+1.2815*155.2817) +(lnn*HQnn)/(lnn*HQnn+uimnn*fKmnn+pvenn*fVenn))) * ((uimnn/dtfkmnn)/(0.0997/1.1121)) **(0.5*((0.0997* 5373.6053) /(183.5064*11.6694+0.0997*5373.6053+1.2815*155.2817) +(uimnn*fKmnn)/(lnn*HQnn+uimnn*fKmnn+pvenn*fVenn))) * ((pvenn/dtfvenn)/(1.2815/1.0000)) **(0.5*((1.2815*155.2817) /(183.5064*11.6694+0.0997*5373.6053+1.2815*155.2817) +(pvenn*fVenn)/(lnn*HQnn+uimnn*fKmnn+pvenn*fVenn))) $ FRML _DJRD pklenb = ((lnb/dthqnb)/(155.2532/0.9909)) **(0.5*((155.2532*47.1548) /(155.2532*47.1548+0.0928*23086.3750+1.1919*900.1561) +(lnb*HQnb)/(lnb*HQnb+uimnb*fKmnb+pvenb*fVenb))) * ((uimnb/dtfkmnb)/(0.0928/0.9371)) **(0.5*((0.0928*23086.3750) /(155.2532*47.1548+0.0928*23086.3750+1.1919*900.1561) +(uimnb*fKmnb)/(lnb*HQnb+uimnb*fKmnb+pvenb*fVenb))) * ((pvenb/dtfvenb)/(1.1919/1.0000)) **(0.5*((1.1919*900.1561) /(155.2532*47.1548+0.0928*23086.3750+1.1919*900.1561) +(pvenb*fVenb)/(lnb*HQnb+uimnb*fKmnb+pvenb*fVenb))) $ FRML _DJRD pklenm = ((lnm/dthqnm)/(167.6994/0.8703)) **(0.5*((167.6994*242.7291) /(167.6994*242.7291+0.1067*70994.0000+1.2082*1306.2947) +(lnm*HQnm)/(lnm*HQnm+uimnm*fKmnm+pvenm*fVenm))) * ((uimnm/dtfkmnm)/(0.1067/1.0677)) **(0.5*((0.1067*70994.0000) /(167.6994*242.7291+0.1067*70994.0000+1.2082*1306.2947) +(uimnm*fKmnm)/(lnm*HQnm+uimnm*fKmnm+pvenm*fVenm))) * ((pvenm/dtfvenm)/(1.2082/1.0000)) **(0.5*((1.2082*1306.2947) /(167.6994*242.7291+0.1067*70994.0000+1.2082*1306.2947) +(pvenm*fVenm)/(lnm*HQnm+uimnm*fKmnm+pvenm*fVenm))) $ FRML _DJRD pklent = ((lnt/dthqnt)/(164.7238/0.8726)) **(0.5*((164.7238*32.7703) /(164.7238*32.7703+0.1326*4849.0000+1.1929*157.1092) +(lnt*HQnt)/(lnt*HQnt+uimnt*fKmnt+pvent*fVent))) * ((uimnt/dtfkmnt)/(0.1326/1.6209)) **(0.5*((0.1326* 4849.0000) /(164.7238*32.7703+0.1326*4849.0000+1.1929*157.1092) +(uimnt*fKmnt)/(lnt*HQnt+uimnt*fKmnt+pvent*fVent))) * ((pvent/dtfvent)/(1.1929/1.0000)) **(0.5*((1.1929*157.1092) /(164.7238*32.7703+0.1326*4849.0000+1.1929*157.1092) +(pvent*fVent)/(lnt*HQnt+uimnt*fKmnt+pvent*fVent))) $ FRML _DJRD pklenk = ((lnk/dthqnk)/(177.5164/0.8867)) **(0.5*((177.5164*80.5210) /(177.5164*80.5210+0.0906*51414.1889+1.1862*958.0330) +(lnk*HQnk)/(lnk*HQnk+uimnk*fKmnk+pvenk*fVenk))) * ((uimnk/dtfkmnk)/(0.0906/0.9923)) **(0.5*((0.0906*51414.1889) /(177.5164*80.5210+0.0906*51414.1889+1.1862*958.0330) +(uimnk*fKmnk)/(lnk*HQnk+uimnk*fKmnk+pvenk*fVenk))) * ((pvenk/dtfvenk)/(1.1862/1.0000)) **(0.5*((1.1862*958.0330) /(177.5164*80.5210+0.0906*51414.1889+1.1862*958.0330) +(pvenk*fVenk)/(lnk*HQnk+uimnk*fKmnk+pvenk*fVenk))) $ FRML _DJRD pklenq = ((lnq/dthqnq)/(148.4532/0.9113)) **(0.5*((148.4532*155.3640) /(148.4532*155.3640+0.1046*52691.2119+1.1752*839.9384) +(lnq*HQnq)/(lnq*HQnq+uimnq*fKmnq+pvenq*fVenq))) * ((uimnq/dtfkmnq)/(0.1046/1.1105)) **(0.5*((0.1046*52691.2119) /(148.4532*155.3640+0.1046*52691.2119+1.1752*839.9384) +(uimnq*fKmnq)/(lnq*HQnq+uimnq*fKmnq+pvenq*fVenq))) * ((pvenq/dtfvenq)/(1.1752/1.0000)) **(0.5*((1.1752*839.9384) /(148.4532*155.3640+0.1046*52691.2119+1.1752*839.9384) +(pvenq*fVenq)/(lnq*HQnq+uimnq*fKmnq+pvenq*fVenq))) $ FRML _DJRD pkleb = ((lb/dthqb)/(167.1646/0.9681)) **(0.5*((167.1646*225.3938) /(167.1646*225.3938+0.1294*39866.0000+2.1405*701.6273) +(lb*HQb)/(lb*HQb+uimb*fKmb+pveb*fVeb))) * ((uimb/dtfkmb)/(0.1294/1.1083)) **(0.5*((0.1294*39866.0000) /(167.1646*225.3938+0.1294*39866.0000+2.1405*701.6273) +(uimb*fKmb)/(lb*HQb+uimb*fKmb+pveb*fVeb))) * ((pveb/dtfveb)/(2.1405/1.0000)) **(0.5*((2.1405*701.6273) /(167.1646*225.3938+0.1294*39866.0000+2.1405*701.6273) +(pveb*fVeb)/(lb*HQb+uimb*fKmb+pveb*fVeb))) $ FRML _DJRD pkleqh = ((lqh/dthqqh)/(136.2013/0.9424)) **(0.5*((136.2013*571.6224) /(136.2013*571.6224+0.1159*140579.341+1.4945*2402.2704) +(lqh*HQqh)/(lqh*HQqh+uimqh*fKmqh+pveqh*fVeqh))) * ((uimqh/dtfkmqh)/(0.1159/0.9622)) **(0.5*((0.1159*140579.341) /(136.2013*571.6224+0.1159*140579.341+1.4945*2402.2704) +(uimqh*fKmqh)/(lqh*HQqh+uimqh*fKmqh+pveqh*fVeqh))) * ((pveqh/dtfveqh)/(1.4945/1.0000)) **(0.5*((1.4945*2402.2704) /(136.2013*571.6224+0.1159*140579.341+1.4945*2402.2704) +(pveqh*fVeqh)/(lqh*HQqh+uimqh*fKmqh+pveqh*fVeqh))) $ FRML _DJRD pkleqt = ((lqt/dthqqt)/(162.9901/0.8752)) **(0.5*((162.9901*229.9257) /(162.9901*229.9257+0.1164*114613.000+2.2629*2230.6596) +(lqt*HQqt)/(lqt*HQqt+uimqt*fKmqt+pveqt*fVeqt))) * ((uimqt/dtfkmqt)/(0.1164/1.1290)) **(0.5*((0.1164*114613.000) /(162.9901*229.9257+0.1164*114613.000+2.2629*2230.6596) +(uimqt*fKmqt)/(lqt*HQqt+uimqt*fKmqt+pveqt*fVeqt))) * ((pveqt/dtfveqt)/(2.2629/1.0000)) **(0.5*((2.2629*2230.6596) /(162.9901*229.9257+0.1164*114613.000+2.2629*2230.6596) +(pveqt*fVeqt)/(lqt*HQqt+uimqt*fKmqt+pveqt*fVeqt))) $ FRML _DJRD pkleqf = ((lqf/dthqqf)/(235.4943/0.8606)) **(0.5*((235.4943*113.5969) /(235.4943*113.5969+0.1425*33337.0000+1.7306*211.9093) +(lqf*HQqf)/(lqf*HQqf+uimqf*fKmqf+pveqf*fVeqf))) * ((uimqf/dtfkmqf)/(0.1425/1.1521)) **(0.5*((0.1425*33337.0000) /(235.4943*113.5969+0.1425*33337.0000+1.7306*211.9093) +(uimqf*fKmqf)/(lqf*HQqf+uimqf*fKmqf+pveqf*fVeqf))) * ((pveqf/dtfveqf)/(1.7306/1.0000)) **(0.5*((1.7306*211.9093) /(235.4943*113.5969+0.1425*33337.0000+1.7306*211.9093) +(pveqf*fVeqf)/(lqf*HQqf+uimqf*fKmqf+pveqf*fVeqf))) $ FRML _DJRD pkleqq = ((lqq/dthqqq)/(139.8848/0.9339)) **(0.5*((139.8848*668.9147) /(139.8848*668.9147+0.1512*158691.589+1.4177*2439.8306) +(lqq*HQqq)/(lqq*HQqq+uimqq*fKmqq+pveqq*fVeqq))) * ((uimqq/dtfkmqq)/(0.1512/1.2128)) **(0.5*((0.1512*158691.589) /(139.8848*668.9147+0.1512*158691.589+1.4177*2439.8306) +(uimqq*fKmqq)/(lqq*HQqq+uimqq*fKmqq+pveqq*fVeqq))) * ((pveqq/dtfveqq)/(1.4177/1.0000)) **(0.5*((1.4177*2439.8306) /(139.8848*668.9147+0.1512*158691.589+1.4177*2439.8306) +(pveqq*fVeqq)/(lqq*HQqq+uimqq*fKmqq+pveqq*fVeqq))) $ FRML _DJRD pkleo = ((lo/1.0 )/(151.6462/1.0000)) **(0.5*((151.6462*1110.6751) /(151.6462*1110.6751+0.1271*70450.0000+1.8578*2345.5413) +(lo*HQo)/(lo*HQo+uimo*fKmo+pveo*fVeo))) * ((uimo/1.0 )/(0.1271/1.0000)) **(0.5*((0.1271*70450.0000) /(151.6462*1110.6751+0.1271*70450.0000+1.8578*2345.5413) +(uimo*fKmo)/(lo*HQo+uimo*fKmo+pveo*fVeo))) * ((pveo/dtfveo)/(1.8578/1.0000)) **(0.5*((1.8578*2345.5413) /(151.6462*1110.6751+0.1271*70450.0000+1.8578*2345.5413) +(pveo*fVeo)/(lo*HQo+uimo*fKmo+pveo*fVeo))) $ () () ENERGIFORBRUG I FASTE PRISER () FRML _DJRD log(fVeaw) = log(fXa-hostkor) - 3.50858 - 0.300397*log(pvea/pklea) - (1-0.300397)*log(dtfvea) $ FRML _SJRDF log(fVea) = log(fVeaw) $ FRML _GJRDF Dlog(fVeng) = Dlog(fXng) - Dlog(dtfveng) $ FRML _DJRD log(fVenfw) = log(fXnf) + (-2.45122/0.577624) - 0.234723*log(pvenf/pklenf) - (1-0.234723)*log(dtfvenf) $ FRML _SJRDF Dlog(fVenf) = (1-0.90000)*Dlog(fXnf) - 0.310939*Dlog(pvenf/pklenf) - 0.577624*(1-0.234723)*Dlog(dtfvenf) - 0.577624*log(fVenf(-1)/fVenfw(-1)) $ FRML _DJRD log(fVennw) = log(fXnn) - 4.10626 + 0.477687*d6672 - 0.203223*log(pvenn/pklenn) - (1-0.203223)*log(dtfvenn) $ FRML _SJRDF log(fVenn) = log(fVennw) $ FRML _DJRD log(fVenbw) = log(fXnb) - 3.48478 + 0.00153139*fros - 0.05*log(pvenb/pklenb) - (1-0.05)*log(dtfvenb) $ FRML _SJRDF log(fVenb) = log(fVenbw) $ FRML _DJRD log(fVenmw) = log(fXnm) + (-1.15525/0.251914) + 0.00172554*fros - 0.252587*log(pvenm/pklenm) - (1-0.252587)*log(dtfvenm) $ FRML _SJRDF Dlog(fVenm) = (1-0.621164)*Dlog(fXnm) + 0.00172554*Dif(fros) - 0.252587*Dlog(pvenm/pklenm) - 0.251914*(1-0.252587)*Dlog(dtfvenm) - 0.251914*log(fVenm(-1)/fVenmw(-1)) $ FRML _DJRD log(fVentw) = log(fXnt) - 4.86739 + 0.00245570*fros + 0.164101*d6692 - 0.146821*log(pvent/pklent) - (1-0.146821)*log(dtfvent) $ FRML _SJRDF log(fVent) = log(fVentw) $ FRML _DJRD log(fVenkw) = log(fXnk) - 4.01160 + 0.297305*d7377 - 0.254197*log(pvenk/pklenk) - (1-0.254197)*log(dtfvenk) $ FRML _SJRDF log(fVenk) = log(fVenkw) $ FRML _DJRD log(fVenqw) = log(fXnq) - 4.57951 + 0.00201564*fros - 0.219536*log(pvenq/pklenq) - (1-0.219536)*log(dtfvenq) $ FRML _SJRDF log(fVenq) = log(fVenqw) $ FRML _DJRD log(fVebw) = log(fXb) + (-2.48206/0.491038) + 0.235572*d6692 - 0.197837*log(pveb/pkleb) - (1-0.197837)*log(dtfveb) $ FRML _SJRDF Dlog(fVeb) = (1-0.382744)*Dlog(fXb) + 0.235572*Dif(d6692) - 0.197837*Dlog(pveb/pkleb) - 0.491038*(1-0.197837)*Dlog(dtfveb) - 0.491038*log(fVeb(-1)/fVebw(-1)) $ FRML _DJRD log(fVeqhw) = log(fXqh) + (-1.15051/0.257296) + 0.00156721*fros + 0.187375*d6692 - 0.148651*log(pveqh/pkleqh) - (1-0.148651)*log(dtfveqh) $ FRML _SJRDF Dlog(fVeqh) = (1-0.90000)*Dlog(fXqh) + 0.00156721*Dif(fros) + 0.187375*Dif(d6692) - 0.148651*Dlog(pveqh/pkleqh) - 0.257296*(1-0.148651)*Dlog(dtfveqh) - 0.257296*log(fVeqh(-1)/fVeqhw(-1)) $ FRML _GJRDF Dlog(fVeqs) = Dlog(fXqs) - Dlog(dtfveqs) $ FRML _DJRD log(fVeqtw) = log(fXqt) - 3.76317 - 0.126430*log(pveqt/pkleqt) - (1-0.126430)*log(dtfveqt) $ FRML _SJRDF log(fVeqt) = log(fVeqtw) $ FRML _DJRD log(fVeqfw) = log(fXqf) + (-1.68377/0.299545) + 0.948700*d6692 - 0.249465*log(pveqf/pkleqf) - (1-0.249465)*log(dtfveqf) $ FRML _SJRDF Dlog(fVeqf) = (1-0.842888)*Dlog(fXqf) + 0.948700*Dif(d6692) - 0.249465*Dlog(pveqf/pkleqf) - 0.299545*(1-0.249465)*Dlog(dtfveqf) - 0.299545*log(fVeqf(-1)/fVeqfw(-1)) $ FRML _DJRD log(fVeqqw) = log(fXqq) - 4.81981 + 0.00189132*fros + 0.252450*d6692 - 0.234478*log(pveqq/pkleqq) - (1-0.234478)*log(dtfveqq) $ FRML _SJRDF log(fVeqq) = log(fVeqqw) $ FRML _GJRDF Dlog(fVeh) = Dlog(fXh) - Dlog(dtfveh) $ FRML _DJRD log(fVeow) = log(fXo) - 4.90210 + 0.00201679*fros + 0.566491*d6692 - 0.116876*log(pveo/pkleo) - (1-0.116876)*log(dtfveo) $ FRML _SJRDF log(fVeo) = log(fVeow) $ () () () MATERIALEFORBRUG I FASTE PRISER () () FRML _GJRDF Dlog(fVma) = Dlog(fXa-hostkor) $ FRML _GJRDF Dlog(fVme) = Dlog(fXe) $ FRML _GJRDF Dlog(fVmng) = Dlog(fXng) $ FRML _GJRDF Dlog(fVmnf) = Dlog(fXnf) $ FRML _GJRDF Dlog(fVmnn) = Dlog(fXnn) $ FRML _GJRDF Dlog(fVmnb) = Dlog(fXnb) $ FRML _GJRDF Dlog(fVmnm) = Dlog(fXnm) $ FRML _GJRDF Dlog(fVmnt) = Dlog(fXnt) $ FRML _GJRDF Dlog(fVmnk) = Dlog(fXnk) $ FRML _GJRDF Dlog(fVmnq) = Dlog(fXnq) $ FRML _GJRDF Dlog(fVmb) = Dlog(fXb) $ FRML _GJRDF Dlog(fVmqh) = Dlog(fXqh) $ FRML _GJRDF Dlog(fVmqs) = Dlog(fXqs) $ FRML _GJRDF Dlog(fVmqt) = Dlog(fXqt) $ FRML _GJRDF Dlog(fVmqf) = Dlog(fXqf) $ FRML _GJRDF Dlog(fVmqq) = Dlog(fXqq) $ FRML _GJRDF Dlog(fVmh) = Dlog(fXh) $ FRML _GJRDF fVmo = fVmo(-1)*fYfo/fYfo(-1) + fVmox + JDfVmo $ () () () PRISER PÅ MATERIALFORBRUG () () FRML _I pvma = (Va -pvea *fVea )/fVma $ FRML _I pvme = (Ve -pvee *fVee )/fVme $ FRML _I pvmng = (Vng-pveng*fVeng)/fVmng $ FRML _I pvmne = (Vne-pvene*fVene)/fVmne $ FRML _I pvmnf = (Vnf-pvenf*fVenf)/fVmnf $ FRML _I pvmnn = (Vnn-pvenn*fVenn)/fVmnn $ FRML _I pvmnb = (Vnb-pvenb*fVenb)/fVmnb $ FRML _I pvmnm = (Vnm-pvenm*fVenm)/fVmnm $ FRML _I pvmnt = (Vnt-pvent*fVent)/fVmnt $ FRML _I pvmnk = (Vnk-pvenk*fVenk)/fVmnk $ FRML _I pvmnq = (Vnq-pvenq*fVenq)/fVmnq $ FRML _I pvmb = (Vb -pveb*fVeb )/fVmb $ FRML _I pvmqh = (Vqh-pveqh*fVeqh)/fVmqh $ FRML _I pvmqs = (Vqs-pveqs*fVeqs)/fVmqs $ FRML _I pvmqt = (Vqt-pveqt*fVeqt)/fVmqt $ FRML _I pvmqf = (Vqf-pveqf*fVeqf)/fVmqf $ FRML _I pvmqq = (Vqq-pveqq*fVeqq)/fVmqq $ FRML _I pvmh = (Vh -pveh*fVeh )/fVmh $ FRML _I pvmo = (fVo*pvo-pveo*fVeo)/fVmo $ () () () BRUTTOFAKTORINDKOMST I FASTE PRISER () () FRML _I fYfa = fXa - fVea - fVma $ FRML _I fYfe = fXe - fVee - fVme $ FRML _I fYfng = fXng - fVeng - fVmng $ FRML _I fYfne = fXne - fVene - fVmne $ FRML _I fYfnf = fXnf - fVenf - fVmnf $ FRML _I fYfnn = fXnn - fVenn - fVmnn $ FRML _I fYfnb = fXnb - fVenb - fVmnb $ FRML _I fYfnm = fXnm - fVenm - fVmnm $ FRML _I fYfnt = fXnt - fVent - fVmnt $ FRML _I fYfnk = fXnk - fVenk - fVmnk $ FRML _I fYfnq = fXnq - fVenq - fVmnq $ FRML _I fYfb = fXb - fVeb - fVmb $ FRML _I fYfqh = fXqh - fVeqh - fVmqh $ FRML _I fYfqs = fXqs - fVeqs - fVmqs $ FRML _I fYfqt = fXqt - fVeqt - fVmqt $ FRML _I fYfqf = fXqf - fVeqf - fVmqf $ FRML _I fYfqq = fXqq - fVeqq - fVmqq $ FRML _I fYfh = fXh - fVeh - fVmh $ FRML _I fYfqi = Yfqi/pyqi $ FRML _I fYfn = fYfng + fYfne + fYfnf + fYfnn + fYfnb + fYfnm + fYfnt + fYfnk + fYfnq $ FRML _I fYf = fYfa + fYfe + fYfng + fYfne + fYfnf + fYfnn + fYfnb + fYfnm + fYfnt + fYfnk + fYfnq + fYfb + fYfqh + fYfqs + fYfqt + fYfqf + fYfqq + fYfh + fYfo + fYfqi $ () () () ERHVERVENES FAKTOREFTERSPØRGSEL (MASKINKAPITAL OG ARBEJDSKRAFT) () () () ----------------------------------------------------- () a-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimae = 0.25*Rpimae(-1) + 0.75*(pima/pima(-1)-1) $ FRML _DJ_D bfknma = fKnma/fKma $ FRML _DJRD uima = bfknma*pima*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvma-0.50*Rpimae) $ FRML _DJRD fKmaw = (1/dtfkma)*0.34046**(0.51387/(1-0.51387)) *(((fXa-hostkor)/65741.89638)/1.18142) *( ( ((la*174.09789)/(uima*111924.00000)) *(dtfkma/dthqa) ) **(1-0.51387) *((1-0.34046)/0.34046)**0.51387+1 ) **(0.51387/(1-0.51387))*111924.00000 $ FRML _SJRDF Dlog(fKma) = 0.13916*Dlog(fKmaw) + 0.26134*(log(fKmaw(-1))-log(fKma(-1))) + rofkma *( Dlog(fKma(-1)) -0.13916*Dlog(fKmaw(-1)) -0.26134*(log(fKmaw(-2))-log(fKma(-2))) ) $ FRML _DJ_D fKmak = fKma $ FRML _DJRD fIma = Dif(fKma) + bfivma*fKma(-1) $ FRML _DJRD fKnma = fIma + (1-bfinvma)*fKnma(-1) $ FRML _DJRD HQan = (1/dthqa) *( (1/(1-0.34046)) *(((fXa-hostkor)/65741.89638)/1.18142) **(-(1/0.51387-1)) -(0.34046/(1-0.34046)) *(dtfkma*fKmak/111924.00000)**(-(1/0.51387-1)) ) **(-(1/(1/0.51387-1)))*174.09789 $ FRML _SJRDF log(HQa) = 0.34222*(log(HQan)-log(Hgn))+log(Hgn) + (1-0.34222+(-0.42891)) *(log(HQan(-1))-log(Hgn(-1))) - (-0.42891)*(log(HQan(-2))-log(Hgn(-2))) + rohqa *( log(HQa(-1)) -( 0.34222*(log(HQan(-1))-log(Hgn(-1))) +(1-0.34222+(-0.42891)) *(log(HQan(-2))-log(Hgn(-2)))-(-0.42891) *(log(HQan(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qa = HQa/Hgn*1000 $ FRML _D Qsa = bqsa*Qa $ FRML _I Qwa = Qa - Qsa $ FRML _G Ywa = lnakk*Hgn*Qwa*0.001*kla $ FRML _DJRD la = (Ywa+Siqal)/(Qwa*Hgn)*1000 $ FRML _DJRD HQaw = (1/dthqa)*(1-0.34046)**(0.51387/(1-0.51387)) *(((fXa-hostkor)/65741.89638)/1.18142) *( ( ((uima*111924.00000)/(la*174.09789)) *(dthqa/dtfkma) ) **(1-0.51387) *(0.34046/(1-0.34046))**0.51387+1 ) **(0.51387/(1-0.51387))*174.09789 $ () ----------------------------------------------------- () ng-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnge = 0.25*Rpimnge(-1) + 0.75*(pimng/pimng(-1)-1) $ FRML _DJ_D bfknmng = fKnmng/fKmng $ FRML _DJRD uimng = bfknmng*pimng*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmng-0.50*Rpimnge) $ FRML _DJRD fKmngw = (1/dtfkmng)*0.72553**(0.29967/(1-0.29967)) *((fXng/8756.43262)/0.98630) *( ( ((lng*1.39862)/(uimng*13844.00000)) *(dtfkmng/dthqng) ) **(1-0.29967) *((1-0.72553)/0.72553)**0.29967+1 ) **(0.29967/(1-0.29967))*13844.00000 $ FRML _SJRDF Dlog(fKmng) = 0.20*Dlog(fKmngw) + 0.20*Dlog(fKmngw(-1)) + 0.20*Dlog(fKmngw(-2)) + 0.20*Dlog(fKmngw(-3)) + 0.20*Dlog(fKmngw(-4)) $ FRML _DJRD fImng = Dif(fKmng) + bfivmng*fKmng(-1) $ FRML _DJRD fKnmng = fImng + (1-bfinvmng)*fKnmng(-1) $ FRML _DJRD HQngw = (1/dthqng)*(1-0.72553)**(0.29967/(1-0.29967)) *((fXng/8756.43262)/0.98630) *( ( ((uimng*13844.00000)/(lng*1.39862)) *(dthqng/dtfkmng) ) **(1-0.29967) *(0.72553/(1-0.72553))**0.29967+1 ) **(0.29967/(1-0.29967))*1.39862 $ FRML _SJRDF Dlog(HQng) = 0.65*(Dlog(HQngw)-Dlog(Hgn)) + Dlog(Hgn) + 0.20*(Dlog(HQngw(-1))-Dlog(Hgn(-1))) + 0.15*(Dlog(HQngw(-2))-Dlog(Hgn(-2))) $ FRML _DJRD Qng = HQng/Hgn*1000 $ FRML _D Qsng = bqsng*Qng $ FRML _I Qwng = Qng - Qsng $ FRML _G Ywng = lnakk*Hgn*Qwng*0.001*klng $ FRML _DJRD lng = (Ywng+Siqngl) /(Qwng*Hgn)*1000 $ () ----------------------------------------------------- () nf-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnfe = 0.25*Rpimnfe(-1) + 0.75*(pimnf/pimnf(-1)-1) $ FRML _DJ_D bfknmnf = fKnmnf/fKmnf $ FRML _DJRD uimnf = bfknmnf*pimnf*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnf-0.50*Rpimnfe) $ FRML _DJRD fKmnfw = (1/dtfkmnf)*0.34173**(0.30062/(1-0.30062)) *((fXnf/104743.64063)/1.03529) *( ( ((lnf*114.53336)/(uimnf*46551.39453)) *(dtfkmnf/dthqnf) ) **(1-0.30062) *((1-0.34173)/0.34173)**0.30062+1 ) **(0.30062/(1-0.30062))*46551.39453 $ FRML _SJRDF Dlog(fKmnf) = 0.094150*Dlog(fKmnfw) + 0.17251*(log(fKmnfw(-1))-log(fKmnf(-1))) + rofkmnf *( Dlog(fKmnf(-1)) -0.094150*Dlog(fKmnfw(-1)) -0.17251*(log(fKmnfw(-2))-log(fKmnf(-2))) ) $ FRML _DJ_D fKmnfk = fKmnf $ FRML _DJRD fImnf = Dif(fKmnf) + bfivmnf*fKmnf(-1) $ FRML _DJRD fKnmnf = fImnf + (1-bfinvmnf)*fKnmnf(-1) $ FRML _DJRD HQnfn = (1/dthqnf) *( (1/(1-0.34173)) *((fXnf/104743.64063)/1.03529) **(-(1/0.30062-1)) -(0.34173/(1-0.34173)) *(dtfkmnf*fKmnfk/46551.39453)**(-(1/0.30062-1)) ) **(-(1/(1/0.30062-1)))*114.53336 $ FRML _SJRDF log(HQnf) = 0.56405*(log(HQnfn)-log(Hgn))+log(Hgn) + (1-0.56405+(-0.30598)) *(log(HQnfn(-1))-log(Hgn(-1))) - (-0.30598)*(log(HQnfn(-2))-log(Hgn(-2))) + rohqnf *( log(HQnf(-1)) -( 0.56405*(log(HQnfn(-1))-log(Hgn(-1))) +(1-0.56405+(-0.30598)) *(log(HQnfn(-2))-log(Hgn(-2)))-(-0.30598) *(log(HQnfn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnf = HQnf/Hgn*1000 $ FRML _D Qsnf = bqsnf*Qnf $ FRML _I Qwnf = Qnf - Qsnf $ FRML _G Ywnf = lnakk*Hgn*Qwnf*0.001*klnf $ FRML _DJRD lnf = (Ywnf+Siqnfl)/(Qwnf*Hgn)*1000 $ FRML _DJRD HQnfw = (1/dthqnf)*(1-0.34173)**(0.30062/(1-0.30062)) *((fXnf/104743.64063)/1.03529) *( ( ((uimnf*46551.39453)/(lnf*114.53336)) *(dthqnf/dtfkmnf) ) **(1-0.30062) *(0.34173/(1-0.34173))**0.30062+1 ) **(0.30062/(1-0.30062))*114.53336 $ () ----------------------------------------------------- () nn-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnne = 0.25*Rpimnne(-1) + 0.75*(pimnn/pimnn(-1)-1) $ FRML _DJ_D bfknmnn = fKnmnn/fKmnn $ FRML _DJRD uimnn = bfknmnn*pimnn*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnn-0.50*Rpimnne) $ FRML _DJRD fKmnnw = (1/dtfkmnn)*0.42423**(0.30040/(1-0.30040)) *((fXnn/12090.46973)/1.03891) *( ( ((lnn*11.66936)/(uimnn*5373.60547)) *(dtfkmnn/dthqnn) ) **(1-0.30040) *((1-0.42423)/0.42423)**0.30040+1 ) **(0.30040/(1-0.30040))*5373.60547 $ FRML _SJRDF Dlog(fKmnn) = 0.10000*Dlog(fKmnnw) + 0.15984*(log(fKmnnw(-1))-log(fKmnn(-1))) + rofkmnn *( Dlog(fKmnn(-1)) -0.10000*Dlog(fKmnnw(-1)) -0.15984*(log(fKmnnw(-2))-log(fKmnn(-2))) ) $ FRML _DJ_D fKmnnk = fKmnn $ FRML _DJRD fImnn = Dif(fKmnn) + bfivmnn*fKmnn(-1) $ FRML _DJRD fKnmnn = fImnn + (1-bfinvmnn)*fKnmnn(-1) $ FRML _DJRD HQnnn = (1/dthqnn) *( (1/(1-0.42423)) *((fXnn/12090.46973)/1.03891) **(-(1/0.30040-1)) -(0.42423/(1-0.42423)) *(dtfkmnn*fKmnnk/5373.60547)**(-(1/0.30040-1)) ) **(-(1/(1/0.30040-1)))*11.66936 $ FRML _SJRDF log(HQnn) = 0.24287*(log(HQnnn)-log(Hgn))+log(Hgn) + (1-0.24287+(-0.26379)) *(log(HQnnn(-1))-log(Hgn(-1))) - (-0.26379)*(log(HQnnn(-2))-log(Hgn(-2))) + rohqnn *( log(HQnn(-1)) -( 0.24287*(log(HQnnn(-1))-log(Hgn(-1))) +(1-0.24287+(-0.26379)) *(log(HQnnn(-2))-log(Hgn(-2)))-(-0.26379) *(log(HQnnn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnn = HQnn/Hgn*1000 $ FRML _D Qsnn = bqsnn*Qnn $ FRML _I Qwnn = Qnn - Qsnn $ FRML _G Ywnn = lnakk*Hgn*Qwnn*0.001*klnn $ FRML _DJRD lnn = (Ywnn+Siqnnl)/(Qwnn*Hgn)*1000 $ FRML _DJRD HQnnw = (1/dthqnn)*(1-0.42423)**(0.30040/(1-0.30040)) *((fXnn/12090.46973)/1.03891) *( ( ((uimnn*5373.60547)/(lnn*11.66936)) *(dthqnn/dtfkmnn) ) **(1-0.30040) *(0.42423/(1-0.42423))**0.30040+1 ) **(0.30040/(1-0.30040))*11.66936 $ () ----------------------------------------------------- () nb-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnbe = 0.25*Rpimnbe(-1) + 0.75*(pimnb/pimnb(-1)-1) $ FRML _DJ_D bfknmnb = fKnmnb/fKmnb $ FRML _DJRD uimnb = bfknmnb*pimnb*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnb-0.50*Rpimnbe) $ FRML _DJRD fKmnbw = (1/dtfkmnb)*0.23548**(0.43174/(1-0.43174)) *((fXnb/27016.24805)/0.94871) *( ( ((lnb*47.15480)/(uimnb*23086.37500)) *(dtfkmnb/dthqnb) ) **(1-0.43174) *((1-0.23548)/0.23548)**0.43174+1 ) **(0.43174/(1-0.43174))*23086.37500 $ FRML _SJRDF Dlog(fKmnb) = 0.096747*Dlog(fKmnbw) + 0.22517*(log(fKmnbw(-1))-log(fKmnb(-1))) + rofkmnb *( Dlog(fKmnb(-1)) -0.096747*Dlog(fKmnbw(-1)) -0.22517*(log(fKmnbw(-2))-log(fKmnb(-2))) ) $ FRML _DJ_D fKmnbk = fKmnb $ FRML _DJRD fImnb = Dif(fKmnb) + bfivmnb*fKmnb(-1) $ FRML _DJRD fKnmnb = fImnb + (1-bfinvmnb)*fKnmnb(-1) $ FRML _DJRD HQnbn = (1/dthqnb) *( (1/(1-0.23548)) *((fXnb/27016.24805)/0.94871) **(-(1/0.43174-1)) -(0.23548/(1-0.23548)) *(dtfkmnb*fKmnbk/23086.37500)**(-(1/0.43174-1)) ) **(-(1/(1/0.43174-1)))*47.15480 $ FRML _SJRDF log(HQnb) = 0.50582*(log(HQnbn)-log(Hgn))+log(Hgn) + (1-0.50582+(-0.21773)) *(log(HQnbn(-1))-log(Hgn(-1))) - (-0.21773)*(log(HQnbn(-2))-log(Hgn(-2))) + rohqnb *( log(HQnb(-1)) -( 0.50582*(log(HQnbn(-1))-log(Hgn(-1))) +(1-0.50582+(-0.21773)) *(log(HQnbn(-2))-log(Hgn(-2)))-(-0.21773) *(log(HQnbn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnb = HQnb/Hgn*1000 $ FRML _D Qsnb = bqsnb*Qnb $ FRML _I Qwnb = Qnb - Qsnb $ FRML _G Ywnb = lnakk*Hgn*Qwnb*0.001*klnb $ FRML _DJRD lnb = (Ywnb+Siqnbl)/(Qwnb*Hgn)*1000 $ FRML _DJRD HQnbw = (1/dthqnb)*(1-0.23548)**(0.43174/(1-0.43174)) *((fXnb/27016.24805)/0.94871) *( ( ((uimnb*23086.37500)/(lnb*47.15480)) *(dthqnb/dtfkmnb) ) **(1-0.43174) *(0.23548/(1-0.23548))**0.43174+1 ) **(0.43174/(1-0.43174))*47.15480 $ () ----------------------------------------------------- () nm-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnme = 0.25*Rpimnme(-1) + 0.75*(pimnm/pimnm(-1)-1) $ FRML _DJ_D bfknmnm = fKnmnm/fKmnm $ FRML _DJRD uimnm = bfknmnm*pimnm*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnm-0.50*Rpimnme) $ FRML _DJRD fKmnmw = (1/dtfkmnm)*0.28420**(0.42444/(1-0.42444)) *((fXnm/131459.39063)/1.00569) *( ( ((lnm*242.72913)/(uimnm*70994.00000)) *(dtfkmnm/dthqnm) ) **(1-0.42444) *((1-0.28420)/0.28420)**0.42444+1 ) **(0.42444/(1-0.42444))*70994.00000 $ FRML _SJRDF Dlog(fKmnm) = 0.13429*Dlog(fKmnmw) + 0.20918*(log(fKmnmw(-1))-log(fKmnm(-1))) + rofkmnm *( Dlog(fKmnm(-1)) -0.13429*Dlog(fKmnmw(-1)) -0.20918*(log(fKmnmw(-2))-log(fKmnm(-2))) ) $ FRML _DJ_D fKmnmk = fKmnm $ FRML _DJRD fImnm = Dif(fKmnm) + bfivmnm*fKmnm(-1) $ FRML _DJRD fKnmnm = fImnm + (1-bfinvmnm)*fKnmnm(-1) $ FRML _DJRD HQnmn = (1/dthqnm) *( (1/(1-0.28420)) *((fXnm/131459.39063)/1.00569) **(-(1/0.42444-1)) -(0.28420/(1-0.28420)) *(dtfkmnm*fKmnmk/70994.00000)**(-(1/0.42444-1)) ) **(-(1/(1/0.42444-1)))*242.72913 $ FRML _SJRDF log(HQnm) = 0.56315*(log(HQnmn)-log(Hgn))+log(Hgn) + (1-0.56315+(-0.17039)) *(log(HQnmn(-1))-log(Hgn(-1))) - (-0.17039)*(log(HQnmn(-2))-log(Hgn(-2))) + rohqnm *( log(HQnm(-1)) -( 0.56315*(log(HQnmn(-1))-log(Hgn(-1))) +(1-0.56315+(-0.17039)) *(log(HQnmn(-2))-log(Hgn(-2)))-(-0.17039) *(log(HQnmn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnm = HQnm/Hgn*1000 $ FRML _D Qsnm = bqsnm*Qnm $ FRML _I Qwnm = Qnm - Qsnm $ FRML _G Ywnm = lnakk*Hgn*Qwnm*0.001*klnm $ FRML _DJRD lnm = (Ywnm+Siqnml)/(Qwnm*Hgn)*1000 $ FRML _DJRD HQnmw = (1/dthqnm)*(1-0.28420)**(0.42444/(1-0.42444)) *((fXnm/131459.39063)/1.00569) *( ( ((uimnm*70994.00000)/(lnm*242.72913)) *(dthqnm/dtfkmnm) ) **(1-0.42444) *(0.28420/(1-0.28420))**0.42444+1 ) **(0.42444/(1-0.42444))*242.72913 $ () ----------------------------------------------------- () nt-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnte = 0.25*Rpimnte(-1) + 0.75*(pimnt/pimnt(-1)-1) $ FRML _DJ_D bfknmnt = fKnmnt/fKmnt $ FRML _DJRD uimnt = bfknmnt*pimnt*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnt-0.50*Rpimnte) $ FRML _DJRD fKmntw = (1/dtfkmnt)*0.39050**(0.46355/(1-0.46355)) *((fXnt/17040.36719)/0.95843) *( ( ((lnt*32.77029)/(uimnt*4849.00000)) *(dtfkmnt/dthqnt) ) **(1-0.46355) *((1-0.39050)/0.39050)**0.46355+1 ) **(0.46355/(1-0.46355))*4849.00000 $ FRML _SJRDF Dlog(fKmnt) = 0.086882*Dlog(fKmntw) + 0.19550*(log(fKmntw(-1))-log(fKmnt(-1))) + rofkmnt *( Dlog(fKmnt(-1)) -0.086882*Dlog(fKmntw(-1)) -0.19550*(log(fKmntw(-2))-log(fKmnt(-2))) ) $ FRML _DJ_D fKmntk = fKmnt $ FRML _DJRD fImnt = Dif(fKmnt) + bfivmnt*fKmnt(-1) $ FRML _DJRD fKnmnt = fImnt + (1-bfinvmnt)*fKnmnt(-1) $ FRML _DJRD HQntn = (1/dthqnt) *( (1/(1-0.39050)) *((fXnt/17040.36719)/0.95843) **(-(1/0.46355-1)) -(0.39050/(1-0.39050)) *(dtfkmnt*fKmntk/4849.00000)**(-(1/0.46355-1)) ) **(-(1/(1/0.46355-1)))*32.77029 $ FRML _SJRDF log(HQnt) = 0.46932*(log(HQntn)-log(Hgn))+log(Hgn) + (1-0.46932+(-0.14922)) *(log(HQntn(-1))-log(Hgn(-1))) - (-0.14922)*(log(HQntn(-2))-log(Hgn(-2))) + rohqnt *( log(HQnt(-1)) -( 0.46932*(log(HQntn(-1))-log(Hgn(-1))) +(1-0.46932+(-0.14922)) *(log(HQntn(-2))-log(Hgn(-2)))-(-0.14922) *(log(HQntn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnt = HQnt/Hgn*1000 $ FRML _D Qsnt = bqsnt*Qnt $ FRML _I Qwnt = Qnt - Qsnt $ FRML _G Ywnt = lnakk*Hgn*Qwnt*0.001*klnt $ FRML _DJRD lnt = (Ywnt+Siqntl)/(Qwnt*Hgn)*1000 $ FRML _DJRD HQntw = (1/dthqnt)*(1-0.39050)**(0.46355/(1-0.46355)) *((fXnt/17040.36719)/0.95843) *( ( ((uimnt*4849.00000)/(lnt*32.77029)) *(dthqnt/dtfkmnt) ) **(1-0.46355) *(0.39050/(1-0.39050))**0.46355+1 ) **(0.46355/(1-0.46355))*32.77029 $ () ----------------------------------------------------- () nk-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnke = 0.25*Rpimnke(-1) + 0.75*(pimnk/pimnk(-1)-1) $ FRML _DJ_D bfknmnk = fKnmnk/fKmnk $ FRML _DJRD uimnk = bfknmnk*pimnk*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnk-0.50*Rpimnke) $ FRML _DJRD fKmnkw = (1/dtfkmnk)*0.36555**(0.35734/(1-0.35734)) *((fXnk/55882.23828)/1.08005) *( ( ((lnk*80.52103)/(uimnk*51414.18750)) *(dtfkmnk/dthqnk) ) **(1-0.35734) *((1-0.36555)/0.36555)**0.35734+1 ) **(0.35734/(1-0.35734))*51414.18750 $ FRML _SJRDF Dlog(fKmnk) = 0.10106*Dlog(fKmnkw) + 0.24353*(log(fKmnkw(-1))-log(fKmnk(-1))) + rofkmnk *( Dlog(fKmnk(-1)) -0.10106*Dlog(fKmnkw(-1)) -0.24353*(log(fKmnkw(-2))-log(fKmnk(-2))) ) $ FRML _DJ_D fKmnkk = fKmnk $ FRML _DJRD fImnk = Dif(fKmnk) + bfivmnk*fKmnk(-1) $ FRML _DJRD fKnmnk = fImnk + (1-bfinvmnk)*fKnmnk(-1) $ FRML _DJRD HQnkn = (1/dthqnk) *( (1/(1-0.36555)) *((fXnk/55882.23828)/1.08005) **(-(1/0.35734-1)) -(0.36555/(1-0.36555)) *(dtfkmnk*fKmnkk/51414.18750)**(-(1/0.35734-1)) ) **(-(1/(1/0.35734-1)))*80.52103 $ FRML _SJRDF log(HQnk) = 0.49433*(log(HQnkn)-log(Hgn))+log(Hgn) + (1-0.49433+(-0.25375)) *(log(HQnkn(-1))-log(Hgn(-1))) - (-0.25375)*(log(HQnkn(-2))-log(Hgn(-2))) + rohqnk *( log(HQnk(-1)) -( 0.49433*(log(HQnkn(-1))-log(Hgn(-1))) +(1-0.49433+(-0.25375)) *(log(HQnkn(-2))-log(Hgn(-2)))-(-0.25375) *(log(HQnkn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnk = HQnk/Hgn*1000 $ FRML _D Qsnk = bqsnk*Qnk $ FRML _I Qwnk = Qnk - Qsnk $ FRML _G Ywnk = lnakk*Hgn*Qwnk*0.001*klnk $ FRML _DJRD lnk = (Ywnk+Siqnkl)/(Qwnk*Hgn)*1000 $ FRML _DJRD HQnkw = (1/dthqnk)*(1-0.36555)**(0.35734/(1-0.35734)) *((fXnk/55882.23828)/1.08005) *( ( ((uimnk*51414.18750)/(lnk*80.52103)) *(dthqnk/dtfkmnk) ) **(1-0.35734) *(0.36555/(1-0.36555))**0.35734+1 ) **(0.35734/(1-0.35734))*80.52103 $ () ----------------------------------------------------- () nq-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimnqe = 0.25*Rpimnqe(-1) + 0.75*(pimnq/pimnq(-1)-1) $ FRML _DJ_D bfknmnq = fKnmnq/fKmnq $ FRML _DJRD uimnq = bfknmnq*pimnq*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmnq-0.50*Rpimnqe) $ FRML _DJRD fKmnqw = (1/dtfkmnq)*0.48006**(0.18608/(1-0.18608)) *((fXnq/75197.39844)/1.00318) *( ( ((lnq*155.36397)/(uimnq*52691.21094)) *(dtfkmnq/dthqnq) ) **(1-0.18608) *((1-0.48006)/0.48006)**0.18608+1 ) **(0.18608/(1-0.18608))*52691.21094 $ FRML _SJRDF Dlog(fKmnq) = 0.12212*Dlog(fKmnqw) + 0.25599*(log(fKmnqw(-1))-log(fKmnq(-1))) + rofkmnq *( Dlog(fKmnq(-1)) -0.12212*Dlog(fKmnqw(-1)) -0.25599*(log(fKmnqw(-2))-log(fKmnq(-2))) ) $ FRML _DJ_D fKmnqk = fKmnq $ FRML _DJRD fImnq = Dif(fKmnq) + bfivmnq*fKmnq(-1) $ FRML _DJRD fKnmnq = fImnq + (1-bfinvmnq)*fKnmnq(-1) $ FRML _DJRD HQnqn = (1/dthqnq) *( (1/(1-0.48006)) *((fXnq/75197.39844)/1.00318) **(-(1/0.18608-1)) -(0.48006/(1-0.48006)) *(dtfkmnq*fKmnqk/52691.21094)**(-(1/0.18608-1)) ) **(-(1/(1/0.18608-1)))*155.36397 $ FRML _SJRDF log(HQnq) = 0.58898*(log(HQnqn)-log(Hgn))+log(Hgn) + (1-0.58898+(-0.14532)) *(log(HQnqn(-1))-log(Hgn(-1))) - (-0.14532)*(log(HQnqn(-2))-log(Hgn(-2))) + rohqnq *( log(HQnq(-1)) -( 0.58898*(log(HQnqn(-1))-log(Hgn(-1))) +(1-0.58898+(-0.14532)) *(log(HQnqn(-2))-log(Hgn(-2)))-(-0.14532) *(log(HQnqn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qnq = HQnq/Hgn*1000 $ FRML _D Qsnq = bqsnq*Qnq $ FRML _I Qwnq = Qnq - Qsnq $ FRML _G Ywnq = lnakk*Hgn*Qwnq*0.001*klnq $ FRML _DJRD lnq = (Ywnq+Siqnql)/(Qwnq*Hgn)*1000 $ FRML _DJRD HQnqw = (1/dthqnq)*(1-0.48006)**(0.18608/(1-0.18608)) *((fXnq/75197.39844)/1.00318) *( ( ((uimnq*52691.21094)/(lnq*155.36397)) *(dthqnq/dtfkmnq) ) **(1-0.18608) *(0.48006/(1-0.48006))**0.18608+1 ) **(0.18608/(1-0.18608))*155.36397 $ () ----------------------------------------------------- () b-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimbe = 0.25*Rpimbe(-1) + 0.75*(pimb/pimb(-1)-1) $ FRML _DJ_D bfknmb = fKnmb/fKmb $ FRML _DJRD uimb = bfknmb*pimb*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmb-0.50*Rpimbe) $ FRML _DJRD fKmbw = (1/dtfkmb)*0.28351**(0.20010/(1-0.20010)) *((fXb/114577.46094)/1.02587) *( ( ((lb*225.39381)/(uimb*39866.00000)) *(dtfkmb/dthqb) ) **(1-0.20010) *((1-0.28351)/0.28351)**0.20010+1 ) **(0.20010/(1-0.20010))*39866.00000 $ FRML _SJRDF Dlog(fKmb) = 0.31011*Dlog(fKmbw) + 0.18816*(log(fKmbw(-1))-log(fKmb(-1))) + rofkmb *( Dlog(fKmb(-1)) -0.31011*Dlog(fKmbw(-1)) -0.18816*(log(fKmbw(-2))-log(fKmb(-2))) ) $ FRML _DJ_D fKmbk = fKmb $ FRML _DJRD fImb = Dif(fKmb) + bfivmb*fKmb(-1) $ FRML _DJRD fKnmb = fImb + (1-bfinvmb)*fKnmb(-1) $ FRML _DJRD HQbn = (1/dthqb) *( (1/(1-0.28351)) *((fXb/114577.46094)/1.02587) **(-(1/0.20010-1)) -(0.28351/(1-0.28351)) *(dtfkmb*fKmbk/39866.00000)**(-(1/0.20010-1)) ) **(-(1/(1/0.20010-1)))*225.39381 $ FRML _SJRDF log(HQb) = 0.65115*(log(HQbn)-log(Hgn))+log(Hgn) + (1-0.65115+(-0.16985)) *(log(HQbn(-1))-log(Hgn(-1))) - (-0.16985)*(log(HQbn(-2))-log(Hgn(-2))) + rohqb *( log(HQb(-1)) -( 0.65115*(log(HQbn(-1))-log(Hgn(-1))) +(1-0.65115+(-0.16985)) *(log(HQbn(-2))-log(Hgn(-2)))-(-0.16985) *(log(HQbn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qb = HQb/Hgn*1000 $ FRML _D Qsb = bqsb*Qb $ FRML _I Qwb = Qb - Qsb $ FRML _G Ywb = lnakk*Hgn*Qwb*0.001*klb $ FRML _DJRD lb = (Ywb+Siqbl)/(Qwb*Hgn)*1000 $ FRML _DJRD HQbw = (1/dthqb)*(1-0.28351)**(0.20010/(1-0.20010)) *((fXb/114577.46094)/1.02587) *( ( ((uimb*39866.00000)/(lb*225.39381)) *(dthqb/dtfkmb) ) **(1-0.20010) *(0.28351/(1-0.28351))**0.20010+1 ) **(0.20010/(1-0.20010))*225.39381 $ () ----------------------------------------------------- () qh-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimqhe = 0.25*Rpimqhe(-1) + 0.75*(pimqh/pimqh(-1)-1) $ FRML _DJ_D bfknmqh = fKnmqh/fKmqh $ FRML _DJRD uimqh = bfknmqh*pimqh*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmqh-0.50*Rpimqhe) $ FRML _DJRD fKmqhw = (1/dtfkmqh)*0.20742**(0.15918/(1-0.15918)) *((fXqh/185435.45313)/1.01199) *( ( ((lqh*571.62238)/(uimqh*140579.34375)) *(dtfkmqh/dthqqh) ) **(1-0.15918) *((1-0.20742)/0.20742)**0.15918+1 ) **(0.15918/(1-0.15918))*140579.34375 $ FRML _SJRDF Dlog(fKmqh) = 0.28443*Dlog(fKmqhw) + 0.40410*(log(fKmqhw(-1))-log(fKmqh(-1))) + rofkmqh *( Dlog(fKmqh(-1)) -0.28443*Dlog(fKmqhw(-1)) -0.40410*(log(fKmqhw(-2))-log(fKmqh(-2))) ) $ FRML _DJ_D fKmqhk = fKmqh $ FRML _DJRD fImqh = Dif(fKmqh) + bfivmqh*fKmqh(-1) $ FRML _DJRD fKnmqh = fImqh + (1-bfinvmqh)*fKnmqh(-1) $ FRML _DJRD HQqhn = (1/dthqqh) *( (1/(1-0.20742)) *((fXqh/185435.45313)/1.01199) **(-(1/0.15918-1)) -(0.20742/(1-0.20742)) *(dtfkmqh*fKmqhk/140579.34375)**(-(1/0.15918-1)) ) **(-(1/(1/0.15918-1)))*571.62238 $ FRML _SJRDF log(HQqh) = 0.46332*(log(HQqhn)-log(Hgn))+log(Hgn) + (1-0.46332+(-0.30157)) *(log(HQqhn(-1))-log(Hgn(-1))) - (-0.30157)*(log(HQqhn(-2))-log(Hgn(-2))) + rohqqh *( log(HQqh(-1)) -( 0.46332*(log(HQqhn(-1))-log(Hgn(-1))) +(1-0.46332+(-0.30157)) *(log(HQqhn(-2))-log(Hgn(-2)))-(-0.30157) *(log(HQqhn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qqh = HQqh/Hgn*1000 $ FRML _D Qsqh = bqsqh*Qqh $ FRML _I Qwqh = Qqh - Qsqh $ FRML _G Ywqh = lnakk*Hgn*Qwqh*0.001*klqh $ FRML _DJRD lqh = (Ywqh+Siqqhl)/(Qwqh*Hgn)*1000 $ FRML _DJRD HQqhw = (1/dthqqh)*(1-0.20742)**(0.15918/(1-0.15918)) *((fXqh/185435.45313)/1.01199) *( ( ((uimqh*140579.34375)/(lqh*571.62238)) *(dthqqh/dtfkmqh) ) **(1-0.15918) *(0.20742/(1-0.20742))**0.15918+1 ) **(0.15918/(1-0.15918))*571.62238 $ () ----------------------------------------------------- () qs-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimqse = 0.25*Rpimqse(-1) + 0.75*(pimqs/pimqs(-1)-1) $ FRML _DJ_D bfknmqs = fKnmqs/fKmqs $ FRML _DJRD uimqs = bfknmqs*pimqs*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmqs-0.50*Rpimqse) $ FRML _DJRD fKmqsw = (1/dtfkmqs)*0.82978**(0.15027/(1-0.15027)) *((fXqs/41561.28125)/1.23428) *( ( ((lqs*29.04266)/(uimqs*102423.00000)) *(dtfkmqs/dthqqs) ) **(1-0.15027) *((1-0.82978)/0.82978)**0.15027+1 ) **(0.15027/(1-0.15027))*102423.00000 $ FRML _SJRDF Dlog(fKmqs) = 0.20*Dlog(fKmqsw) + 0.20*Dlog(fKmqsw(-1)) + 0.20*Dlog(fKmqsw(-2)) + 0.20*Dlog(fKmqsw(-3)) + 0.20*Dlog(fKmqsw(-4)) $ FRML _DJRD fImqs = Dif(fKmqs) + bfivmqs*fKmqs(-1) $ FRML _DJRD fKnmqs = fImqs + (1-bfinvmqs)*fKnmqs(-1) $ FRML _DJRD HQqsw = (1/dthqqs)*(1-0.82978)**(0.15027/(1-0.15027)) *((fXqs/41561.28125)/1.23428) *( ( ((uimqs*102423.00000)/(lqs*29.04266)) *(dthqqs/dtfkmqs) ) **(1-0.15027) *(0.82978/(1-0.82978))**0.15027+1 ) **(0.15027/(1-0.15027))*29.04266 $ FRML _SJRDF Dlog(HQqs) = 0.65*(Dlog(HQqsw)-Dlog(Hgn)) + Dlog(Hgn) + 0.20*(Dlog(HQqsw(-1))-Dlog(Hgn(-1))) + 0.15*(Dlog(HQqsw(-2))-Dlog(Hgn(-2))) $ FRML _DJRD Qqs = HQqs/Hgn*1000 $ FRML _D Qsqs = bqsqs*Qqs $ FRML _I Qwqs = Qqs - Qsqs $ FRML _G Ywqs = lnakk*Hgn*Qwqs*0.001*klqs $ FRML _DJRD lqs = (Ywqs+Siqqsl) /(Qwqs*Hgn)*1000 $ () ----------------------------------------------------- () qt-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimqte = 0.25*Rpimqte(-1) + 0.75*(pimqt/pimqt(-1)-1) $ FRML _DJ_D bfknmqt = fKnmqt/fKmqt $ FRML _DJRD uimqt = bfknmqt*pimqt*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmqt-0.50*Rpimqte) $ FRML _DJRD fKmqtw = (1/dtfkmqt)*0.58488**(0.21492/(1-0.21492)) *((fXqt/106955.57031)/1.00781) *( ( ((lqt*229.92566)/(uimqt*114613.00000)) *(dtfkmqt/dthqqt) ) **(1-0.21492) *((1-0.58488)/0.58488)**0.21492+1 ) **(0.21492/(1-0.21492))*114613.00000 $ FRML _SJRDF Dlog(fKmqt) = 0.22254*Dlog(fKmqtw) + 0.32218*(log(fKmqtw(-1))-log(fKmqt(-1))) + rofkmqt *( Dlog(fKmqt(-1)) -0.22254*Dlog(fKmqtw(-1)) -0.32218*(log(fKmqtw(-2))-log(fKmqt(-2))) ) $ FRML _DJ_D fKmqtk = fKmqt $ FRML _DJRD fImqt = Dif(fKmqt) + bfivmqt*fKmqt(-1) $ FRML _DJRD fKnmqt = fImqt + (1-bfinvmqt)*fKnmqt(-1) $ FRML _DJRD HQqtn = (1/dthqqt) *( (1/(1-0.58488)) *((fXqt/106955.57031)/1.00781) **(-(1/0.21492-1)) -(0.58488/(1-0.58488)) *(dtfkmqt*fKmqtk/114613.00000)**(-(1/0.21492-1)) ) **(-(1/(1/0.21492-1)))*229.92566 $ FRML _SJRDF log(HQqt) = 0.43494*(log(HQqtn)-log(Hgn))+log(Hgn) + (1-0.43494+(-0.32322)) *(log(HQqtn(-1))-log(Hgn(-1))) - (-0.32322)*(log(HQqtn(-2))-log(Hgn(-2))) + rohqqt *( log(HQqt(-1)) -( 0.43494*(log(HQqtn(-1))-log(Hgn(-1))) +(1-0.43494+(-0.32322)) *(log(HQqtn(-2))-log(Hgn(-2)))-(-0.32322) *(log(HQqtn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qqt = HQqt/Hgn*1000 $ FRML _D Qsqt = bqsqt*Qqt $ FRML _I Qwqt = Qqt - Qsqt $ FRML _G Ywqt = lnakk*Hgn*Qwqt*0.001*klqt $ FRML _DJRD lqt = (Ywqt+Siqqtl)/(Qwqt*Hgn)*1000 $ FRML _DJRD HQqtw = (1/dthqqt)*(1-0.58488)**(0.21492/(1-0.21492)) *((fXqt/106955.57031)/1.00781) *( ( ((uimqt*114613.00000)/(lqt*229.92566)) *(dthqqt/dtfkmqt) ) **(1-0.21492) *(0.58488/(1-0.58488))**0.21492+1 ) **(0.21492/(1-0.21492))*229.92566 $ () ----------------------------------------------------- () qf-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimqfe = 0.25*Rpimqfe(-1) + 0.75*(pimqf/pimqf(-1)-1) $ FRML _DJ_D bfknmqf = fKnmqf/fKmqf $ FRML _DJRD uimqf = bfknmqf*pimqf*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmqf-0.50*Rpimqfe) $ FRML _DJRD fKmqfw = (1/dtfkmqf)*0.68915**(0.10000/(1-0.10000)) *((fXqf/65028.85938)/1.10404) *( ( ((lqf*113.59689)/(uimqf*33337.00000)) *(dtfkmqf/dthqqf) ) **(1-0.10000) *((1-0.68915)/0.68915)**0.10000+1 ) **(0.10000/(1-0.10000))*33337.00000 $ FRML _SJRDF Dlog(fKmqf) = 0.20*Dlog(fKmqfw) + 0.20*Dlog(fKmqfw(-1)) + 0.20*Dlog(fKmqfw(-2)) + 0.20*Dlog(fKmqfw(-3)) + 0.20*Dlog(fKmqfw(-4)) $ FRML _DJRD fImqf = Dif(fKmqf) + bfivmqf*fKmqf(-1) $ FRML _DJRD fKnmqf = fImqf + (1-bfinvmqf)*fKnmqf(-1) $ FRML _DJRD HQqfw = (1/dthqqf)*(1-0.68915)**(0.10000/(1-0.10000)) *((fXqf/65028.85938)/1.10404) *( ( ((uimqf*33337.00000)/(lqf*113.59689)) *(dthqqf/dtfkmqf) ) **(1-0.10000) *(0.68915/(1-0.68915))**0.10000+1 ) **(0.10000/(1-0.10000))*113.59689 $ FRML _SJRDF Dlog(HQqf) = 0.65*(Dlog(HQqfw)-Dlog(Hgn)) + Dlog(Hgn) + 0.20*(Dlog(HQqfw(-1))-Dlog(Hgn(-1))) + 0.15*(Dlog(HQqfw(-2))-Dlog(Hgn(-2))) $ FRML _DJRD Qqf = HQqf/Hgn*1000 $ FRML _D Qsqf = bqsqf*Qqf $ FRML _I Qwqf = Qqf - Qsqf $ FRML _G Ywqf = lnakk*Hgn*Qwqf*0.001*klqf $ FRML _DJRD lqf = (Ywqf+Siqqfl) /(Qwqf*Hgn)*1000 $ () ----------------------------------------------------- () qq-erhvervet () ----------------------------------------------------- () FRML _DJ_D Rpimqqe = 0.25*Rpimqqe(-1) + 0.75*(pimqq/pimqq(-1)-1) $ FRML _DJ_D bfknmqq = fKnmqq/fKmqq $ FRML _DJRD uimqq = bfknmqq*pimqq*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmqq-0.50*Rpimqqe) $ FRML _DJRD fKmqqw = (1/dtfkmqq)*0.35744**(0.40000/(1-0.40000)) *((fXqq/254401.78125)/0.95070) *( ( ((lqq*668.91473)/(uimqq*158691.59375)) *(dtfkmqq/dthqqq) ) **(1-0.40000) *((1-0.35744)/0.35744)**0.40000+1 ) **(0.40000/(1-0.40000))*158691.59375 $ FRML _SJRDF Dlog(fKmqq) = 0.13222*Dlog(fKmqqw) + 0.41825*(log(fKmqqw(-1))-log(fKmqq(-1))) + rofkmqq *( Dlog(fKmqq(-1)) -0.13222*Dlog(fKmqqw(-1)) -0.41825*(log(fKmqqw(-2))-log(fKmqq(-2))) ) $ FRML _DJ_D fKmqqk = fKmqq $ FRML _DJRD fImqq = Dif(fKmqq) + bfivmqq*fKmqq(-1) $ FRML _DJRD fKnmqq = fImqq + (1-bfinvmqq)*fKnmqq(-1) $ FRML _DJRD HQqqn = (1/dthqqq) *( (1/(1-0.35744)) *((fXqq/254401.78125)/0.95070) **(-(1/0.40000-1)) -(0.35744/(1-0.35744)) *(dtfkmqq*fKmqqk/158691.59375)**(-(1/0.40000-1)) ) **(-(1/(1/0.40000-1)))*668.91473 $ FRML _SJRDF log(HQqq) = 0.44275*(log(HQqqn)-log(Hgn))+log(Hgn) + (1-0.44275+(-0.28207)) *(log(HQqqn(-1))-log(Hgn(-1))) - (-0.28207)*(log(HQqqn(-2))-log(Hgn(-2))) + rohqqq *( log(HQqq(-1)) -( 0.44275*(log(HQqqn(-1))-log(Hgn(-1))) +(1-0.44275+(-0.28207)) *(log(HQqqn(-2))-log(Hgn(-2)))-(-0.28207) *(log(HQqqn(-3))-log(Hgn(-3)))+log(Hgn(-1)) ) ) $ FRML _DJRD Qqq = HQqq/Hgn*1000 $ FRML _D Qsqq = bqsqq*Qqq $ FRML _I Qwqq = Qqq - Qsqq $ FRML _G Ywqq = lnakk*Hgn*Qwqq*0.001*klqq $ FRML _DJRD lqq = (Ywqq+Siqqql)/(Qwqq*Hgn)*1000 $ FRML _DJRD HQqqw = (1/dthqqq)*(1-0.35744)**(0.40000/(1-0.40000)) *((fXqq/254401.78125)/0.95070) *( ( ((uimqq*158691.59375)/(lqq*668.91473)) *(dthqqq/dtfkmqq) ) **(1-0.40000) *(0.35744/(1-0.35744))**0.40000+1 ) **(0.40000/(1-0.40000))*668.91473 $ () () EL, GAS OG FJERNVARME (NE) () () Usercost FRML _DJ_D bfknbne = fKnbne/fKbne $ FRML _DJRD uibne = bfknbne*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbne-0.50*Rpibpe) $ FRML _DJ_D Rpimnee = 0.25*Rpimnee(-1) + 0.75*(pimne/pimne(-1)-1) $ FRML _DJ_D bfknmne = fKnmne/fKmne $ FRML _DJRD uimne = bfknmne*pimne*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmne-0.50*Rpimnee) $ () KAPACITET (PK, dtk, PKE, K*, K) FRML _D__D pkzne = pkzne(-1) *(pvmne/pvmne(-1)) **(0.5*( (pvmne*bfvmne) /(pvmne*bfvmne+lne*bhqne+uimne*bfkmne+uibne*bfkbne) +(pvmne(-1)*bfvmne(-1)) /(pvmne(-1)*bfvmne(-1)+lne(-1)*bhqne(-1) +uimne(-1)*bfkmne(-1)+uibne(-1)*bfkbne(-1)) )) *(lne/lne(-1)) **(0.5*( (lne*bhqne) /(pvmne*bfvmne+lne*bhqne+uimne*bfkmne+uibne*bfkbne) +(lne(-1)*bhqne(-1)) /(pvmne(-1)*bfvmne(-1)+lne(-1)*bhqne(-1) +uimne(-1)*bfkmne(-1)+uibne(-1)*bfkbne(-1)) )) *(uimne/uimne(-1)) **(0.5*( (uimne*bfkmne) /(pvmne*bfvmne+lne*bhqne+uimne*bfkmne+uibne*bfkbne) +(uimne(-1)*bfkmne(-1)) /(pvmne(-1)*bfvmne(-1)+lne(-1)*bhqne(-1) +uimne(-1)*bfkmne(-1)+uibne(-1)*bfkbne(-1)) )) *(uibne/uibne(-1)) **(0.5*( (uibne*bfkbne) /(pvmne*bfvmne+lne*bhqne+uimne*bfkmne+uibne*bfkbne) +(uibne(-1)*bfkbne(-1)) /(pvmne(-1)*bfvmne(-1)+lne(-1)*bhqne(-1) +uimne(-1)*bfkmne(-1)+uibne(-1)*bfkbne(-1)) )) $ FRML _D log(dtfkzne) = 0.20*log(dthqne) + 0.12*log(dtfkmne) + 0.52*log(dtfkbne) + 0.16*log(dtfvmne) $ FRML _D__D log(pwne1) = (1/(1-0.22412)) *log( 0.0004273**0.22412 * (pkzne/dtfkzne)**(1-0.22412) +0.0011374**0.22412 * (pvene/dtfvene)**(1-0.22412) ) $ FRML _DJRD log(fKznew) = log(fXne/1.00000) - 0.22412*log(pkzne/pwne1) - (1-0.22412)*log(dtfkzne) + 0.090109*d81 + 0.22412*log(0.0004273) $ FRML _SJRD Dlog(fKzne) = 0.18854*Dlog(fXne) + 0.18854*(-0.22412)*Dlog(pkzne/pwne1) - 0.30000*(1-0.22412)*Dlog(dtfkzne) + 0.090109*Dif(d81) - 0.30000*log(fKzne(-1)/fKznew(-1)) $ () ENERGI (E*, E) FRML _DJRD log(fVenew) = log(fXne/1.00000) - 0.22412*log(pvene/pwne1) - (1-0.22412)*log(dtfvene) + (-0.28161)*d81 + 0.22412*log(0.0011374) $ FRML _SJRDF Dlog(fVene) = 1.31304*Dlog(fXne) + 1.31304*(-0.22412)*Dlog(pvene/pwne1) - 0.60451*(1-0.22412)*Dlog(dtfvene) + (-0.28161)*Dif(d81) - 0.60451*log(fVene(-1)/fVenew(-1)) $ () Udsplitning af Kapacitet på underliggende faktorer () Bygningskapital FRML _DJRD fKbnew = bfkbne*fKznew*(dtfkzne/dtfkbne) $ FRML _GJRDF Dlog(fKbne) = Dlog(bfkbne) + 0.18854*Dlog(fXne) + 0.18854*(-0.22412)*Dlog(pkzne/pwne1) - 0.30000*(1-0.22412)*Dlog(dtfkzne) + 0.090109*Dif(d81) - 0.30000*log(fKbne(-1)/fKbnew(-1)) $ FRML _DJRD fIbne = Dif(fKbne) + bfivbne*fKbne(-1) $ FRML _DJRD fKnbne = fIbne + (1-bfinvbne)*fKnbne(-1) + (-33*d99) $ () Maskinkapital FRML _DJRD fKmnew = bfkmne*fKznew*(dtfkzne/dtfkmne) $ FRML _GJRDF Dlog(fKmne) = Dlog(bfkmne)+0.18854*Dlog(fXne) + 0.18854*(-0.22412)*Dlog(pkzne/pwne1) - 0.30000*(1-0.22412)*Dlog(dtfkzne) + 0.090109*Dif(d81) - 0.30000*log(fKmne(-1)/fKmnew(-1)) $ FRML _DJRD fImne = Dif(fKmne) + bfivmne*fKmne(-1) $ FRML _DJRD fKnmne = fImne + (1-bfinvmne)*fKnmne(-1) $ () Arbejdskraft FRML _DJRD HQnew = bhqne*fKznew*(dtfkzne/dthqne) $ FRML _GJRDF Dlog(HQne) = Dlog(bhqne)+0.18854*Dlog(fXne) + 0.18854*(-0.22412)*Dlog(pkzne/pwne1) - 0.30000*(1-0.22412)*Dlog(dtfkzne) + 0.090109*Dif(d81) - 0.30000*log(HQne(-1)/HQnew(-1)) $ FRML _DJRD Qne = HQne/Hgn*1000 $ FRML _D Qsne = bqsne*Qne $ FRML _I Qwne = Qne-Qsne $ FRML _G Ywne = lnakk*Hgn*Qwne*0.001*klne $ FRML _DJRD lne = (Ywne+Siqnel) /(Qwne*Hgn)*1000 $ () Materialer FRML _DJRD fVmnew = bfvmne*fKznew*(dtfkzne/dtfvmne) $ FRML _GJRDF Dlog(fVmne) = Dlog(bfvmne)+0.18854*Dlog(fXne) + 0.18854*(-0.22412)*Dlog(pkzne/pwne1) - 0.30000*(1-0.22412)*Dlog(dtfkzne) + 0.090109*Dif(d81) - 0.30000*log(fVmne(-1)/fVmnew(-1)) $ () SEKTORPRIS FRML _D pwnew = (pvene*fVenew+pkzne*fKznew+Siqne-Siqnel-.006*Siqej)/fXne $ FRML _D pwneve = pvene*fVene/fXne $ FRML _DJRD log(pxnew) = log(pwnew) $ FRML _SJRDF Dlog(pxne) = 0.89585*Dlog(pwneve)*(pwneve(-1)/pxne(-1)) + 0.10415*Dlog(pwneve(-1))*(pwneve(-1)/pxne(-1)) - 0.50000*log(pxne(-1)/pxnew(-1)) $ () () BRUNKUL, RÅOLIE OG NATURGAS () FRML _GJRD fIme = kfime *(1/dtfkme*(dtfkme(-1)*fIme(-1))*(fXe/fXe(-3))**(1/3)) $ FRML _DJRD Dif(fKme) = fIme - bfivme*fKme(-1) $ FRML _DJRD Dif(fKnme) = fIme - bfinvme*fKnme(-1) $ FRML _DJ_D Rpimee = 0.25*Rpimee(-1) + 0.75*(pime/pime(-1)-1) $ FRML _DJ_D bfknme = fKnme/fKme $ FRML _DJRD uime = bfknme*pime*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvme-0.50*Rpimee) $ FRML _DJ_D bfknbe = (fKnbe+d6680)/(fKbe+d6680) $ FRML _DJRD uibe = bfknbe*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbe-0.50*Rpibpe) $ FRML _DJRD Dif(fKbe) = fIbe - bfivbe*fKbe(-1) $ FRML _DJRD Dif(fKnbe) = fIbe - bfinvbe*fKnbe(-1) $ FRML _GJRD HQe = 1/dthqe*(dthqe(-1)*HQe(-1))*(fXe/fXe(-1)) $ FRML _DJRD Qe = HQe/Hgn*1000 $ FRML _D Qse = bqse*Qe $ FRML _I Qwe = Qe-Qse $ FRML _G Ywe = lnakk*Hgn*Qwe*0.001*kle $ FRML _DJRD le = (Ywe+Siqel)/(Qwe*Hgn)*1000 $ () () BOLIGBENYTTELSE () FRML _GJRD fImh = 1/dtfkmh*(dtfkmh(-1)*fImh(-1))*(fXh/fXh(-3))**(1/3) $ FRML _DJRD Dif(fKmh) = fImh - bfivmh*fKmh(-1) $ FRML _DJRD Dif(fKnmh) = fImh - bfinvmh*fKnmh(-1) $ FRML _DJ_D Rpimhe = 0.25*Rpimhe(-1) + 0.75*(pimh/pimh(-1)-1) $ FRML _DJ_D bfknmh = fKnmh/fKmh $ FRML _DJRD uimh = bfknmh*pimh*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmh-0.50*Rpimhe) $ FRML _GJRD HQh = 1/dthqh*(dthqh(-1)*HQh(-1))*(fXh/fXh(-1)) $ FRML _DJRD Qh = HQh/Hgn*1000 $ FRML _D Qsh = bqsh*Qh $ FRML _I Qwh = Qh-Qsh $ FRML _G Ywh = lnakk*Hgn*Qwh*0.001*klh $ FRML _DJRD lh = (Ywh+Siqhl)/(Qwh*Hgn)*1000 $ () () OFFENTLIGE TJENESTER () FRML _DJRD Dif(fKmo) = fImo - bfivmo*fKmo(-1) $ FRML _DJRD Dif(fKnmo) = fImo - bfinvmo*fKnmo(-1) $ FRML _I fInvmo = bfinvmo*fKnmo(-1) $ FRML _DJ_D bfknmo = fKnmo/fKmo $ FRML _DJ_D Rpimoe = 0.25*Rpimoe(-1) + 0.75*(pimo/pimo(-1)-1) $ FRML _DJRD uimo = bfknmo*pimo*(1-tsdsu1*bivmu)/(1-tsdsu1) *((1-tsdsu1)*iwlo+bfinvmo-0.50*Rpimoe) $ FRML _DJRD Dif(fKbo) = fIbo - bfivbo*fKbo(-1) $ FRML _DJRD Dif(fKnbo) = fIbo - bfinvbo*fKnbo(-1) + (-242*d99) $ FRML _I fInvbo = bfinvbo*fKnbo(-1) $ FRML _DJ_D bfknbo = fKnbo/fKbo $ FRML _DJRD uibo = bfknbo*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbo-0.50*Rpibpe) $ FRML _D Qso = bqso/(1-bqso)*Qwo $ FRML _I Qo = Qwo + Qso $ FRML _DJRD HQo = Qo*Hgn/1000 $ FRML _GJRD Ywo = lohkk*Qwo*(1-bqo/2)*0.001 $ FRML _DJRD lo = (Ywo+Siqol)/(Qwo*Hgn)*1000 $ FRML _D fYfo = klohh*Ha*Qwo*(1-bqo/2) + fInvmo + fInvbo $ FRML _I fVo = fVeo + fVmo $ FRML _I fXo = fYfo + fVo $ FRML _I Yfo = Ywo + (fInvmo*pimo+fInvbo*pibo)*kivo + Siqo $ FRML _I Xo = Yfo + pveo*fVeo + pvmo*fVmo $ FRML _I pvo = Vo/fVo $ FRML _I pxo = Xo/fXo $ FRML _GJRDF faco = faco(-1) *fXo/fXo(-1) + JDfaco $ FRML _GJRDF fbco = fbco(-1) *fXo/fXo(-1) + JDfbco $ FRML _GJRDF fqhco = fqhco(-1)*fXo/fXo(-1) + JDfqhco $ FRML _GJRDF fqtco = fqtco(-1)*fXo/fXo(-1) + JDfqtco $ FRML _GJRDF fqqco = fqqco(-1)*fXo/fXo(-1) + JDfqqco $ FRML _GJRDF fsico = fsico(-1)*fXo/fXo(-1) + JDfsico $ FRML _I foco = fXo - (aob*fXb+aoqh*fXqh+aoqt*fXqt+aoqf*fXqf +aoqq*fXqq+aoo*fXo+aocs*fCs+aoesq*fEsq) $ FRML _I fCo = foco + faco + fbco + fqhco + fqtco + fqqco + fsico $ FRML _G Co = (foco*pxo +faco*pxa+fbco*pxb+fqhco*pxqh+fqtco*pxqt+fqqco*pxqq )*kpnco*(1+btgo*tg) $ FRML _I pco = Co/fCo $ FRML _GJ_D fVmox = (Tfon-kfvmo)*kfvmo0 + (Tfon(-1)-kfvmo)*kfvmo1 + (Tfon(-2)-kfvmo)*kfvmo2 + (Tfon(-3)-kfvmo)*kfvmo3 $ () MEMOPOSTER FRML _G Xo1 = Co + (Xo-pxo*foco)*kxo1 $ FRML _G Vo1 = Vo*kvo1 $ FRML _I Yfo1 = Xo1 - Vo1 $ FRML _G Ywo1 = Yfo1 - Ivo1 - Siqo*ksiqo1 $ FRML _I fIo1 = fImo1 + fIbo1 $ FRML _G Qo1 = Qo*kqo1 $ FRML _I Qp1 = Q - Qo1 $ FRML _GJRD Coii = Coii(-1)*Xo1/Xo1(-1) $ FRML _GJRD Coim = Coim(-1)*Xo1/Xo1(-1) $ () () () FAKTOREFTERSPØRGSEL (BYGNINGSKAPITAL) () () INFLATIONSFORVENTNINGER FRML _DJ_D Rpibpe = 0.75*Rpibpe(-1) + 0.25*(pibp/pibp(-1)-1) $ () () LANDBRUG Mv. () FRML _DJ_D bfknba = fKnba /fKba $ FRML _DJRD uiba = bfknba*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvba-0.50*Rpibpe) $ FRML _DJRDF log(fKbaw) = ( 1.3187) + log(fXa-hostkor) -0.0822*log(uiba/pxa) - log(dtfkba) $ FRML _SJRDF Dlog(fKba) = 0.0429*Dlog(fXa-hostkor) - 0.1*(log(fKba(-1))-log(fKbaw(-1))) + rofkba*(Dlog(fKba(-1))- 0.0429*Dlog(fXa(-1)-hostkor(-1)) +0.1*(log(fKba(-2))-log(fKbaw(-2)))) $ FRML _DJRD fIba = Dif(fKba) + bfivba*fKba(-1) $ FRML _DJRD fKnba = fIba + (1-bfinvba)*fKnba(-1) + (-2459 * d99) $ () () OLIERAFFINADERIER () FRML _DJ_D bfknbng = fKnbng /fKbng $ FRML _DJRD uibng = bfknbng*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbng-0.50*Rpibpe) $ FRML _DJRDF log(fKbngw) = ( -0.4614) + log(fXng) -0.0822*log(uibng/pxng) - log(dtfkbng) $ FRML _SJRDF Dlog(fKbng) = 0.0429*Dlog(fXng) - 0.1*(log(fKbng(-1))-log(fKbngw(-1))) + rofkbng*(Dlog(fKbng(-1))- 0.0429*Dlog(fXng(-1)) +0.1*(log(fKbng(-2))-log(fKbngw(-2)))) $ FRML _DJRD fIbng = Dif(fKbng) + bfivbng*fKbng(-1) $ FRML _DJRD fKnbng = fIbng + (1-bfinvbng)*fKnbng(-1) + (-5 * d99) $ () () NÆRINGSMIDDELINDUSTRI () FRML _DJ_D bfknbnf = fKnbnf /fKbnf $ FRML _DJRD uibnf = bfknbnf*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnf-0.50*Rpibpe) $ FRML _DJRDF log(fKbnfw) = ( -1.0287) + log(fXnf) -0.0822*log(uibnf/pxnf) - log(dtfkbnf) $ FRML _SJRDF Dlog(fKbnf) = 0.0429*Dlog(fXnf) - 0.1*(log(fKbnf(-1))-log(fKbnfw(-1))) + rofkbnf*(Dlog(fKbnf(-1))- 0.0429*Dlog(fXnf(-1)) +0.1*(log(fKbnf(-2))-log(fKbnfw(-2)))) $ FRML _DJRD fIbnf = Dif(fKbnf) + bfivbnf*fKbnf(-1) $ FRML _DJRD fKnbnf = fIbnf + (1-bfinvbnf)*fKnbnf(-1) + (-50 * d99) $ () () NYDELSESMIDDELINDUSTRI () FRML _DJ_D bfknbnn = fKnbnn /fKbnn $ FRML _DJRD uibnn = bfknbnn*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnn-0.50*Rpibpe) $ FRML _DJRDF log(fKbnnw) = ( -1.3747) + log(fXnn) -0.0822*log(uibnn/pxnn) - log(dtfkbnn) $ FRML _SJRDF Dlog(fKbnn) = 0.0429*Dlog(fXnn) - 0.1*(log(fKbnn(-1))-log(fKbnnw(-1))) + rofkbnn*(Dlog(fKbnn(-1))- 0.0429*Dlog(fXnn(-1)) +0.1*(log(fKbnn(-2))-log(fKbnnw(-2)))) $ FRML _DJRD fIbnn = Dif(fKbnn) + bfivbnn*fKbnn(-1) $ FRML _DJRD fKnbnn = fIbnn + (1-bfinvbnn)*fKnbnn(-1) + (-6 * d99) $ () () LEVERANDØRER TIL BYGGERI () FRML _DJ_D bfknbnb = fKnbnb /fKbnb $ FRML _DJRD uibnb = bfknbnb*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnb-0.50*Rpibpe) $ FRML _DJRDF log(fKbnbw) = ( -0.8097) + log(fXnb) -0.0822*log(uibnb/pxnb) - log(dtfkbnb) $ FRML _SJRDF Dlog(fKbnb) = 0.0429*Dlog(fXnb) - 0.1*(log(fKbnb(-1))-log(fKbnbw(-1))) + rofkbnb*(Dlog(fKbnb(-1))- 0.0429*Dlog(fXnb(-1)) +0.1*(log(fKbnb(-2))-log(fKbnbw(-2)))) $ FRML _DJRD fIbnb = Dif(fKbnb) + bfivbnb*fKbnb(-1) $ FRML _DJRD fKnbnb = fIbnb + (1-bfinvbnb)*fKnbnb(-1) + (-16 * d99) $ () () JERN- OG METALINDUSTRI () FRML _DJ_D bfknbnm = fKnbnm /fKbnm $ FRML _DJRD uibnm = bfknbnm*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnm-0.50*Rpibpe) $ FRML _DJRDF log(fKbnmw) = ( -0.9427) + log(fXnm) -0.0822*log(uibnm/pxnm) - log(dtfkbnm) $ FRML _SJRDF Dlog(fKbnm) = 0.0429*Dlog(fXnm) - 0.1*(log(fKbnm(-1))-log(fKbnmw(-1))) + rofkbnm*(Dlog(fKbnm(-1))- 0.0429*Dlog(fXnm(-1)) +0.1*(log(fKbnm(-2))-log(fKbnmw(-2)))) $ FRML _DJRD fIbnm = Dif(fKbnm) + bfivbnm*fKbnm(-1) $ FRML _DJRD fKnbnm = fIbnm + (1-bfinvbnm)*fKnbnm(-1) + (-45 * d99) $ () () TRANSPORTMIDDELINDUSTRI () FRML _DJ_D bfknbnt = fKnbnt /fKbnt $ FRML _DJRD uibnt = bfknbnt*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnt-0.50*Rpibpe) $ FRML _DJRDF log(fKbntw) = ( -1.1628) + log(fXnt) -0.0822*log(uibnt/pxnt) - log(dtfkbnt) $ FRML _SJRDF Dlog(fKbnt) = 0.0429*Dlog(fXnt) - 0.1*(log(fKbnt(-1))-log(fKbntw(-1))) + rofkbnt*(Dlog(fKbnt(-1))- 0.0429*Dlog(fXnt(-1)) +0.1*(log(fKbnt(-2))-log(fKbntw(-2)))) $ FRML _DJRD fIbnt = Dif(fKbnt) + bfivbnt*fKbnt(-1) $ FRML _DJRD fKnbnt = fIbnt + (1-bfinvbnt)*fKnbnt(-1) + (-181 * d99) $ () () KEMISK INDUSTRI Mv. () FRML _DJ_D bfknbnk = fKnbnk /fKbnk $ FRML _DJRD uibnk = bfknbnk*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnk-0.50*Rpibpe) $ FRML _DJRDF log(fKbnkw) = ( -0.4572) + log(fXnk) -0.0822*log(uibnk/pxnk) - log(dtfkbnk) $ FRML _SJRDF Dlog(fKbnk) = 0.0429*Dlog(fXnk) - 0.1*(log(fKbnk(-1))-log(fKbnkw(-1))) + rofkbnk*(Dlog(fKbnk(-1))- 0.0429*Dlog(fXnk(-1)) +0.1*(log(fKbnk(-2))-log(fKbnkw(-2)))) $ FRML _DJRD fIbnk = Dif(fKbnk) + bfivbnk*fKbnk(-1) $ FRML _DJRD fKnbnk = fIbnk + (1-bfinvbnk)*fKnbnk(-1) + (-42 * d99) $ () () ANDEN FREMSTILLINGSVIRKSOMHED () FRML _DJ_D bfknbnq = fKnbnq /fKbnq $ FRML _DJRD uibnq = bfknbnq*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbnq-0.50*Rpibpe) $ FRML _DJRDF log(fKbnqw) = ( -0.9834) + log(fXnq) -0.0822*log(uibnq/pxnq) - log(dtfkbnq) $ FRML _SJRDF Dlog(fKbnq) = 0.0429*Dlog(fXnq) - 0.1*(log(fKbnq(-1))-log(fKbnqw(-1))) + rofkbnq*(Dlog(fKbnq(-1))- 0.0429*Dlog(fXnq(-1)) +0.1*(log(fKbnq(-2))-log(fKbnqw(-2)))) $ FRML _DJRD fIbnq = Dif(fKbnq) + bfivbnq*fKbnq(-1) $ FRML _DJRD fKnbnq = fIbnq + (1-bfinvbnq)*fKnbnq(-1) + (-39 * d99) $ () () BYGGE- OG ANLÆGSVIRKSOMHED () FRML _DJ_D bfknbb = fKnbb /fKbb $ FRML _DJRD uibb = bfknbb*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbb-0.50*Rpibpe) $ FRML _DJRDF log(fKbbw) = ( -1.5953) + log(fXb) - log(dtfkbb) $ FRML _SJRDF Dlog(fKbb) = 0.0429*Dlog(fXb) - 0.1*(log(fKbb(-1))-log(fKbbw(-1))) + rofkbb*(Dlog(fKbb(-1))- 0.0429*Dlog(fXb(-1)) +0.1*(log(fKbb(-2))-log(fKbbw(-2)))) $ FRML _DJRD fIbb = Dif(fKbb) + bfivbb*fKbb(-1) $ FRML _DJRD fKnbb = fIbb + (1-bfinvbb)*fKnbb(-1) + (-22 * d99) $ () () HANDEL () FRML _DJ_D bfknbqh = fKnbqh /fKbqh $ FRML _DJRD uibqh = bfknbqh*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbqh-0.50*Rpibpe) $ FRML _DJRDF log(fKbqhw) = ( 0.0743) + log(fXqh) - log(dtfkbqh) $ FRML _SJRDF Dlog(fKbqh) = 0.0429*Dlog(fXqh) - 0.1*(log(fKbqh(-1))-log(fKbqhw(-1))) + rofkbqh*(Dlog(fKbqh(-1))- 0.0429*Dlog(fXqh(-1)) +0.1*(log(fKbqh(-2))-log(fKbqhw(-2)))) $ FRML _DJRD fIbqh = Dif(fKbqh) + bfivbqh*fKbqh(-1) $ FRML _DJRD fKnbqh = fIbqh + (1-bfinvbqh)*fKnbqh(-1) + (-99 * d99) $ () () SØTRANSPORT () FRML _DJ_D bfknbqs = fKnbqs /fKbqs $ FRML _DJRD uibqs = bfknbqs*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbqs-0.50*Rpibpe) $ FRML _DJRDF log(fKbqsw) = ( -0.6881) + log(fXqs) -0.0822*log(uibqs/pxqs) - log(dtfkbqs) $ FRML _SJRDF Dlog(fKbqs) = 0.0429*Dlog(fXqs) - 0.1*(log(fKbqs(-1))-log(fKbqsw(-1))) + 0.1534 * d9696 + rofkbqs*(Dlog(fKbqs(-1))- 0.0429*Dlog(fXqs(-1)) +0.1*(log(fKbqs(-2))-log(fKbqsw(-2)))) $ FRML _DJRD fIbqs = Dif(fKbqs) + bfivbqs*fKbqs(-1) $ FRML _DJRD fKnbqs = fIbqs + (1-bfinvbqs)*fKnbqs(-1) + (-4 * d99) $ () () ANDEN TRANSPORT Mv. () FRML _DJ_D bfknbqt = fKnbqt /fKbqt $ FRML _DJRD uibqt = bfknbqt*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbqt-0.50*Rpibpe) $ FRML _DJRDF log(fKbqtw) = ( 0.2273) + log(fXqt) - log(dtfkbqt) $ FRML _SJRDF Dlog(fKbqt) = 0.0429*Dlog(fXqt) - 0.1*(log(fKbqt(-1))-log(fKbqtw(-1))) + rofkbqt*(Dlog(fKbqt(-1))- 0.0429*Dlog(fXqt(-1)) +0.1*(log(fKbqt(-2))-log(fKbqtw(-2)))) $ FRML _DJRD fIbqt = Dif(fKbqt) + bfivbqt*fKbqt(-1) $ FRML _DJRD fKnbqt = fIbqt + (1-bfinvbqt)*fKnbqt(-1) + (-66 * d99) $ () () FINANSIEL VIRKSOMHED () FRML _DJ_D bfknbqf = fKnbqf /fKbqf $ FRML _DJRD uibqf = bfknbqf*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbqf-0.50*Rpibpe) $ FRML _DJRDF log(fKbqfw) = ( 0.7108) + log(fXqf) - log(dtfkbqf) $ FRML _SJRDF Dlog(fKbqf) = 0.0429*Dlog(fXqf) - 0.1*(log(fKbqf(-1))-log(fKbqfw(-1))) + rofkbqf*(Dlog(fKbqf(-1))- 0.0429*Dlog(fXqf(-1)) +0.1*(log(fKbqf(-2))-log(fKbqfw(-2)))) $ FRML _DJRD fIbqf = Dif(fKbqf) + bfivbqf*fKbqf(-1) $ FRML _DJRD fKnbqf = fIbqf + (1-bfinvbqf)*fKnbqf(-1) + (-65 * d99) $ () () ANDRE TJENESTEYDENDE ERHVERV () FRML _DJ_D bfknbqq = fKnbqq /fKbqq $ FRML _DJRD uibqq = bfknbqq*pibp*(1-tsdsu1*bivbu)/(1-tsdsu1) *((1-tsdsu1)*iwbz+0.2*tqej+bfinvbqq-0.50*Rpibpe) $ FRML _DJRDF log(fKbqqw) = ( 0.5793) + log(fXqq) -0.0822*log(uibqq/pxqq) - log(dtfkbqq) $ FRML _SJRDF Dlog(fKbqq) = 0.0429*Dlog(fXqq) - 0.1*(log(fKbqq(-1))-log(fKbqqw(-1))) + rofkbqq*(Dlog(fKbqq(-1))- 0.0429*Dlog(fXqq(-1)) +0.1*(log(fKbqq(-2))-log(fKbqqw(-2)))) $ FRML _DJRD fIbqq = Dif(fKbqq) + bfivbqq*fKbqq(-1) $ FRML _DJRD fKnbqq = fIbqq + (1-bfinvbqq)*fKnbqq(-1) + (-659 * d99) $ () () () ARBEJDSUDBUD () () FRML _SJDD Ua = ( 0.29925*Dif(Q/(U1564-Uu)) +0.5*Dif(0.34322/(1+exp(-0.20616*(tid-1976.91)))) +(Ua(-1)+Upe(-1))/(U1564(-1)-Uu(-1)) ) *(U1564-Uu) - Upe $ () () () ARBEJDSLSHED () () FRML _I Uw = Ua - (Q-Qw) $ FRML _I Ul = Ua - Q $ FRML _GJ_D Ulf = bulf*Ul $ FRML _GJ_D Ulfd = bulfd*Ulf $ FRML _GJ_D Ulfu = bulfu*(Ulf-Ulfd) $ FRML _I Ulu = Ulfu + Ul - Ulf $ FRML _D Ulfhk = Ulf - 0.5*Ulfd - Ulfu $ FRML _D bul = Ul/Uw $ () () () ARBEJDStid I INDUSTRIEN () () FRML _SJ_D log(Hgn) = 0.12619*Dlog(fXn) +log((Ha+Hdag)*(1-bqn/2)) - 0.04033*d73- 0.03606*d85 -0.04882 $ () () SaMLEt BESK’FTIGELSE () () FRML _I Q = Qa+Qe+Qb+Qh+Qo +Qng+Qne+Qnf+Qnn+Qnb+Qnm+Qnt+Qnk+Qnq +Qqh+QqS+Qqt+Qqf+Qqq+Qres $ FRML _I Qw = Q-Qsa-Qse-Qsb-Qsh-Qso -Qsng-Qsne-Qsnf-Qsnn-Qsnb-Qsnm-Qsnt-Qsnk-Qsnq -Qsqh-Qsqs-Qsqt-Qsqf-Qsqq $ FRML _I Qs = Q-Qw $ FRML _I Qwp = Qw-Qwo $ FRML _I Qsp = Qs-Qso $ () () IMPORTPRISER () FRML _GJR pm3k = pm3k(-1)*kpm3k*pm3r/pm3r(-1) $ FRML _GJR pm3q = pm3q(-1)*kpm3q*pm3r/pm3r(-1) $ () () () PRISER PÅ ERHVERVENES PRODUKTIONSVÆRDIER (SEKTORPRISER) () () LANDBRUG Mv. () FRML _DJRD pwaw = ( uima*fKmaw+uiba*fKbaw+la*HQaw+pvea*fVeaw +pvma*fVma+Siqa-.094*Siqej-Siqal )/fXa $ FRML _SJRD Dlog(pxa) = 0.89219*Dlog(pne0)+0.10781*Dlog(pne0(-1)) $ () () BRUNKUL, RÅOLIE OG NATURGAS () FRML _GJR pxe = pxe(-1)*((pm3r+tm3r)/(pm3r(-1)+tm3r(-1))) $ () () OLIERAFFINADERIER () FRML _GJR pxng = pxng(-1)*((pm3q+tm3q)/(pm3q(-1)+tm3q(-1))) $ () () BOLIGBENYTTELSE () FRML _GJ_D pxh = kpxh*(pnch - ( abch*pxb + aqqch*pxqq))/ahch $ () () NÆRINGSMIDDELINDUSTRI () FRML _D pwnfw = ( uimnf*fKmnfw+uibnf*fKbnfw+lnf*HQnfw+pvenf*fVenfw +pvmnf*fVmnf+Siqnf-.008*Siqej-Siqnfl )/fXnf $ FRML _D pwnfvv = Vnf/fXnf $ FRML _D pwnfvl = (lnf*HQnfn)/fXnf $ FRML _DJRD log(pxnfw) = log(pwnfw) $ FRML _SJRD Dlog(pxnf) = 0.83994*Dlog(pne0)+0.16006*Dlog(pne0(-1)) $ () () NYDELSESMIDDELINDUSTRI () FRML _D pwnnw = ( uimnn*fKmnnw+uibnn*fKbnnw+lnn*HQnnw+pvenn*fVennw +pvmnn*fVmnn+Siqnn-.003*Siqej-Siqnnl )/fXnn $ FRML _D pwnnvv = Vnn/fXnn $ FRML _D pwnnvl = (lnn*HQnnn)/fXnn $ FRML _DJRD log(pxnnw) = log(pwnnw) $ FRML _SJRD Dlog(pxnn) = 0.73949*Dlog(pwnnvl)*pwnnvl(-1)/pxnn(-1) + 1.00136*Dlog(pwnnvv)*pwnnvv(-1)/pxnn(-1) + 0.26051*Dlog(pwnnvl(-1))*pwnnvl(-1)/pxnn(-1) - 0.20000*log(pxnn(-1)/pxnnw(-1)) $ () () LEVERANDØRER TIL BYGGERI () FRML _D pwnbw = ( uimnb*fKmnbw+uibnb*fKbnbw+lnb*HQnbw+pvenb*fVenbw +pvmnb*fVmnb+Siqnb-.006*Siqej-Siqnbl )/fXnb $ FRML _D pwnbvv = Vnb/fXnb $ FRML _D pwnbvl = (lnb*HQnbn)/fXnb $ FRML _DJRD log(pxnbw) = log(pwnbw) $ FRML _SJRD Dlog(pxnb) = 0.82407*Dlog(pwnbvl)*pwnbvl(-1)/pxnb(-1) + 1.12462*Dlog(pwnbvv)*pwnbvv(-1)/pxnb(-1) + 0.35925*Dlog(pwnbvl(-1))*pwnbvl(-1)/pxnb(-1) - 0.20000*log(pxnb(-1)/pxnbw(-1)) $ () () JERN- OG METALINDUSTRI () FRML _D pwnmw = ( uimnm*fKmnmw+uibnm*fKbnmw+lnm*HQnmw+pvenm*fVenmw +pvmnm*fVmnm+Siqnm-.018*Siqej-Siqnml )/fXnm $ FRML _D pwnmvv = Vnm/fXnm $ FRML _D pwnmvl = (lnm*HQnmn)/fXnm $ FRML _DJRD log(pxnmw) = log(pwnmw) $ FRML _SJRD Dlog(pxnm) = 0.65862*Dlog(pwnmvl)*pwnmvl(-1)/pxnm(-1) + 0.75403*Dlog(pwnmvv)*pwnmvv(-1)/pxnm(-1) + 0.34138*Dlog(pwnmvl(-1))*pwnmvl(-1)/pxnm(-1) + 0.32444*Dlog(pwnmvv(-1))*pwnmvv(-1)/pxnm(-1) - 0.20000*log(pxnm(-1)/pxnmw(-1)) $ () () TRANSPORTMIDDELINDUSTRI () FRML _D pwntw = ( uimnt*fKmntw+uibnt*fKbntw+lnt*HQntw+pvent*fVentw +pvmnt*fVmnt+Siqnt-.003*Siqej-Siqntl )/fXnt $ FRML _D pwntvv = Vnt/fXnt $ FRML _D pwntvl = (lnt*HQntn)/fXnt $ FRML _DJRD log(pxntw) = log(pwntw) $ FRML _SJRD Dlog(pxnt) = 0.44332*Dlog(pwntvl)*pwntvl(-1)/pxnt(-1) + 0.76814*Dlog(pwntvv)*pwntvv(-1)/pxnt(-1) + 0.55668*Dlog(pwntvl(-1))*pwntvl(-1)/pxnt(-1) + 0.23186*Dlog(pwntvv(-1))*pwntvv(-1)/pxnt(-1) - 0.28290*log(pxnt(-1)/pxntw(-1)) $ () () KEMISK INDUSTRI Mv. () FRML _D pwnkw = ( uimnk*fKmnkw+uibnk*fKbnkw+lnk*HQnkw+pvenk*fVenkw +pvmnk*fVmnk+Siqnk-.009*Siqej-Siqnkl )/fXnk $ FRML _D pwnkvv = Vnk/fXnk $ FRML _D pwnkvl = (lnk*HQnkn)/fXnk $ FRML _DJRD log(pxnkw) = log(pwnkw) $ FRML _SJRD Dlog(pxnk) = 0.61672*Dlog(pwnkvl)*pwnkvl(-1)/pxnk(-1) + 0.85709*Dlog(pwnkvv)*pwnkvv(-1)/pxnk(-1) + 0.88631*Dlog(pwnkvl(-1))*pwnkvl(-1)/pxnk(-1) + 0.14292*Dlog(pwnkvv(-1))*pwnkvv(-1)/pxnk(-1) - 0.20000*log(pxnk(-1)/pxnkw(-1)) $ () () ANDEN FREMSTILLINGSVIRKSOMHED () FRML _D pwnqw = ( uimnq*fKmnqw+uibnq*fKbnqw+lnq*HQnqw+pvenq*fVenqw +pvmnq*fVmnq+Siqnq-.011*Siqej-Siqnql )/fXnq $ FRML _D pwnqvv = Vnq/fXnq $ FRML _D pwnqvl = (lnq*HQnqn)/fXnq $ FRML _DJRD log(pxnqw) = log(pwnqw) $ FRML _SJRD Dlog(pxnq) = 0.67383*Dlog(pwnqvl)*pwnqvl(-1)/pxnq(-1) + 0.80014*Dlog(pwnqvv)*pwnqvv(-1)/pxnq(-1) + 0.32617*Dlog(pwnqvl(-1))*pwnqvl(-1)/pxnq(-1) + 0.22253*Dlog(pwnqvv(-1))*pwnqvv(-1)/pxnq(-1) - 0.36110*log(pxnq(-1)/pxnqw(-1)) $ () () BYGGE- OG ANLÆGSVIRKSOMHED () FRML _D pwbw = ( uimb*fKmbw+uibb*fKbbw+lb*HQbw+pveb*fVebw +pvmb*fVmb+Siqb-.006*Siqej-Siqbl )/fXb $ FRML _D pwbvv = Vb/fXb $ FRML _D pwbvl = (lb*HQbn)/fXb $ FRML _DJRD log(pxbw) = log(pwbw) $ FRML _SJRD Dlog(pxb) = 0.50532*Dlog(pwbvl)*pwbvl(-1)/pxb(-1) + 0.83056*Dlog(pwbvv)*pwbvv(-1)/pxb(-1) + 0.49468*Dlog(pwbvl(-1))*pwbvl(-1)/pxb(-1) + 0.19543*Dlog(pwbvv(-1))*pwbvv(-1)/pxb(-1) - 0.47631*log(pxb(-1)/pxbw(-1)) $ () () HANDEL () FRML _D pwqhw = ( uimqh*fKmqhw+uibqh*fKbqhw+lqh*HQqhw+pveqh*fVeqhw +pvmqh*fVmqh+Siqqh-.056*Siqej-Siqqhl )/fXqh $ FRML _D pwqhvv = Vqh/fXqh $ FRML _D pwqhvl = (lqh*HQqhn)/fXqh $ FRML _DJRD log(pxqhw) = log(pwqhw) $ FRML _SJRD Dlog(pxqh) = 0.93446*Dlog(pwqhvl)*pwqhvl(-1)/pxqh(-1) + 1.30586*Dlog(pwqhvv)*pwqhvv(-1)/pxqh(-1) + 0.60505*Dlog(pwqhvl(-1))*pwqhvl(-1)/pxqh(-1) - 0.20000*log(pxqh(-1)/pxqhw(-1)) $ () () ANDEN TRANSPORT Mv. () FRML _D pwqtw = ( uimqt*fKmqtw+uibqt*fKbqtw+lqt*HQqtw+pveqt*fVeqtw +pvmqt*fVmqt+Siqqt-.017*Siqej-Siqqtl )/fXqt $ FRML _D pwqtvv = Vqt/fXqt $ FRML _D pwqtvl = (lqt*HQqtn)/fXqt $ FRML _DJRD log(pxqtw) = log(pwqtw) $ FRML _SJRD Dlog(pxqt) = 0.64053*Dlog(pwqtvl)*pwqtvl(-1)/pxqt(-1) + 0.70718*Dlog(pwqtvv)*pwqtvv(-1)/pxqt(-1) + 0.35947*Dlog(pwqtvl(-1))*pwqtvl(-1)/pxqt(-1) + 0.29282*Dlog(pwqtvv(-1))*pwqtvv(-1)/pxqt(-1) - 0.20000*log(pxqt(-1)/pxqtw(-1)) $ () () ANDRE TJENESTEYDENDE ERHVERV () FRML _D pwqqw = ( uimqq*fKmqqw+uibqq*fKbqqw+lqq*HQqqw+pveqq*fVeqqw +pvmqq*fVmqq+Siqqq-.136*Siqej-Siqqql )/fXqq $ FRML _D pwqqvv = Vqq/fXqq $ FRML _D pwqqvl = (lqq*HQqqn)/fXqq $ FRML _DJRD log(pxqqw) = log(pwqqw) $ FRML _SJRD Dlog(pxqq) = 0.76338*Dlog(pwqqvl)*pwqqvl(-1)/pxqq(-1) + 0.67826*Dlog(pwqqvv)*pwqqvv(-1)/pxqq(-1) + 0.23663*Dlog(pwqqvl(-1))*pwqqvl(-1)/pxqq(-1) + 0.36921*Dlog(pwqqvv(-1))*pwqqvv(-1)/pxqq(-1) - 0.20000*log(pxqq(-1)/pxqqw(-1)) $ () () FINANSIEL VIRKSOMHED () FRML _D pwqfw = ( uimqf*fKmqfw+uibqf*fKbqfw+lqf*HQqfw+pveqf*fVeqfw +pvmqf*fVmqf+Siqqf-.016*Siqej-Siqqfl )/fXqf $ FRML _D pwqfwv = (lqf*HQqfw+pveqf*fVeqfw+pvmqf*fVmqf)/fXqf $ FRML _S__DF Dlog(pxqf) = 0.33102*(Dlog(pwqfwv)-Dlog(pwqfwv(-1))) - 0.24049*(Dlog(pxqf(-1))-Dlog(pwqfw(-1))) + Dlog(pxqf(-1)) + Dlog(1+JRpxqf) $ FRML _GJ_ pyqi = pxqf*kpyqi $ FRML _I pxn = (pxne*fXne+pxng*fXng+pxnf*fXnf+pxnn*fXnn+pxnb*fXnb +pxnk*fXnk+pxnq*fXnq+pxnm*fXnm+pxnt*fXnt) /(fXne+fXng+fXnf+fXnn+fXnb+fXnk+fXnq+fXnm+fXnt) $ FRML _I pxq = (pxqf*fXqf+pxqh*fXqh+pxqt*fXqt+pxqs*fXqs+pxqq*fXqq) /(fXqf+fXqh+fXqt+fXqs+fXqq) $ () () () Erhvervenes k›b af varer og tjenester i l›bende priser () () FRML _GJ_D Va = ( aaa*pxa + anga*pxng + anea*pxne + anfa*pxnf + anma*pxnm + anta*pxnt + anka*pxnk + aba*pxb + aqha*pxqh + aqta*pxqt + aqqa*pxqq + am0a*(pm0+tm0) + am2a*(pm2+tm2) + am3ka*(pm3k+tm3k) + am3qa*(pm3q+tm3q) + am5a*(pm5+tm5) ) *kpnva*fXa + Sipxa + Sigxa $ FRML _GJ_D Ve = ( ange*pxng + anme*pxnm + ante*pxnt + aqte*pxqt + aqqe*pxqq + am3qe*(pm3q+tm3q) + am7qe*(pm7q+tm7q) + amse*pms ) *kpnve*fXe + Sipxe + Sigxe $ FRML _GJ_D Vng = ( aeng*pxe + angng*pxng + aneng*pxne + anmng*pxnm + aqtng*pxqt + am3rng*(pm3r+tm3r) + am3qng*(pm3q+tm3q) + am5ng*(pm5+tm5) ) *kpnvng*fXng + Sipxng + Sigxng $ FRML _GJ_D Vne = ( aane*pxa + aene*pxe + angne*pxng + anene*pxne + abne*pxb + aqqne*pxqq + am3kne*(pm3k+tm3k) + am3qne*(pm3q+tm3q) + am7qne*(pm7q+tm7q) ) *kpnvne*fXne + Sipxne + Sigxne $ FRML _GJ_D Vnf = ( aanf*pxa + angnf*pxng + anenf*pxne + anfnf*pxnf + anmnf*pxnm + anknf*pxnk + anqnf*pxnq + aqhnf*pxqh + aqtnf*pxqt + aqqnf*pxqq + am0nf*(pm0+tm0) + am2nf*(pm2+tm2) + am3knf*(pm3k+tm3k) + am3qnf*(pm3q+tm3q) + am5nf*(pm5+tm5) + am6mnf*(pm6m+tm6m) + am6qnf*(pm6q+tm6q) ) *kpnvnf*fXnf + Sipxnf + Sigxnf $ FRML _GJ_D Vnn = ( aann*pxa + angnn*pxng + anenn*pxne + annnn*pxnn + anmnn*pxnm + anqnn*pxnq + aqtnn*pxqt + aqqnn*pxqq + am1nn*(pm1+tm1) + am3knn*(pm3k+tm3k) + am3qnn*(pm3q+tm3q) + am6qnn*(pm6q+tm6q) ) *kpnvnn*fXnn + Sipxnn + Sigxnn $ FRML _GJ_D Vnb = ( aanb*pxa + angnb*pxng + anenb*pxne + anbnb*pxnb + anmnb*pxnm + aqhnb*pxqh + aqtnb*pxqt + aqqnb*pxqq + am2nb*(pm2+tm2) + am3knb*(pm3k+tm3k) + am3qnb*(pm3q+tm3q) + am5nb*(pm5+tm5) + am6mnb*(pm6m+tm6m) + am6qnb*(pm6q+tm6q) ) *kpnvnb*fXnb + Sipxnb + Sigxnb $ FRML _GJ_D Vnm = ( angnm*pxng + anenm*pxne + anmnm*pxnm + anknm*pxnk + anqnm*pxnq + aqhnm*pxqh + aqtnm*pxqt + aqqnm*pxqq + am3qnm*(pm3q+tm3q) + am5nm*(pm5+tm5) + am6mnm*(pm6m+tm6m) + am6qnm*(pm6q+tm6q) + am7qnm*(pm7q+tm7q) + am8nm*(pm8+tm8) + amsnm*pms ) *kpnvnm*fXnm + Sipxnm + Sigxnm $ FRML _GJ_D Vnt = ( angnt*pxng + anent*pxne + anmnt*pxnm + antnt*pxnt + aqhnt*pxqh + aqqnt*pxqq + am3qnt*(pm3q+tm3q) + am6mnt*(pm6m+tm6m) + am6qnt*(pm6q+tm6q) + am7bnt*(pm7b+tm7b) + am7ynt*(pm7y+tm7y) + am7qnt*(pm7q+tm7q) ) *kpnvnt*fXnt + Sipxnt + Sigxnt $ FRML _GJ_D Vnk = ( angnk*pxng + anenk*pxne + anfnk*pxnf + anmnk*pxnm + anknk*pxnk + anqnk*pxnq + aqhnk*pxqh + aqtnk*pxqt + aqqnk*pxqq + am2nk*(pm2+tm2) + am3qnk*(pm3q+tm3q) + am5nk*(pm5+tm5) + am6mnk*(pm6m+tm6m) + am6qnk*(pm6q+tm6q) + am8nk*(pm8+tm8) ) *kpnvnk*fXnk + Sipxnk + Sigxnk $ FRML _GJ_D Vnq = ( angnq*pxng + anenq*pxne + anbnq*pxnb + anmnq*pxnm + anknq*pxnk + anqnq*pxnq + aqhnq*pxqh + aqtnq*pxqt + aqqnq*pxqq + am2nq*(pm2+tm2) + am3knq*(pm3k+tm3k) + am3qnq*(pm3q+tm3q) + am5nq*(pm5+tm5) + am6mnq*(pm6m+tm6m) + am6qnq*(pm6q+tm6q) + am8nq*(pm8+tm8) ) *kpnvnq*fXnq + Sipxnq + Sigxnq $ FRML _GJ_D Vb = ( aab*pxa + angb*pxng + aneb*pxne + anbb*pxnb + anmb*pxnm + ankb*pxnk + anqb*pxnq + abb*pxb + aqhb*pxqh + aqtb*pxqt + aqfb*pxqf + aqqb*pxqq + aob*pxo + am2b*(pm2+tm2) + am3qb*(pm3q+tm3q) + am5b*(pm5+tm5) + am6mb*(pm6m+tm6m) + am6qb*(pm6q+tm6q) + am7qb*(pm7q+tm7q) + am8b*(pm8+tm8) + amsb*pms ) *kpnvb*fXb + Sipxb + Sigxb $ FRML _GJ_D Vqh = ( angqh*pxng + aneqh*pxne + anmqh*pxnm + ankqh*pxnk + anqqh*pxnq + abqh*pxb + aqhqh*pxqh + aqsqh*pxqs + aqtqh*pxqt + aqfqh*pxqf + aqqqh*pxqq + aoqh*pxo + am3qqh*(pm3q+tm3q) + am5qh*(pm5+tm5) + am6qqh*(pm6q+tm6q) + am8qh*(pm8+tm8) + amsqh*pms ) *kpnvqh*fXqh + Sipxqh + Sigxqh $ FRML _GJ_D Vqs = ( angqs*pxng + aneqs*pxne + antqs*pxnt + aqsqs*pxqs + aqtqs*pxqt + aqqqs*pxqq + am3qqs*(pm3q+tm3q) + amsqs*pms ) *kpnvqs*fXqs + Sipxqs + Sigxqs $ FRML _GJ_D Vqt = ( angqt*pxng + aneqt*pxne + anqqt*pxnq + abqt*pxb + aqhqt*pxqh + aqsqt*pxqs + aqtqt*pxqt + aqfqt*pxqf + aqqqt*pxqq + aoqt*pxo + am3qqt*(pm3q+tm3q) + am7yqt*(pm7y+tm7y) + am7qqt*(pm7q+tm7q) + amsqt*pms ) *kpnvqt*fXqt + Sipxqt + Sigxqt $ FRML _GJ_D Vqf = ( angqf*pxng + aneqf*pxne + anqqf*pxnq + abqf*pxb + aqtqf*pxqt + aqfqf*pxqf + aqqqf*pxqq + aoqf*pxo + am3qqf*(pm3q+tm3q) + amsqf*pms ) *kpnvqf*fXqf + Sipxqf + Sigxqf $ FRML _GJ_D Vqq = ( angqq*pxng + aneqq*pxne + anfqq*pxnf + annqq*pxnn + anmqq*pxnm + antqq*pxnt + ankqq*pxnk + anqqq*pxnq + abqq*pxb + aqhqq*pxqh + aqtqq*pxqt + aqfqq*pxqf + aqqqq*pxqq + aoqq*pxo + am0qq*(pm0+tm0) + am1qq*(pm1+tm1) + am3qqq*(pm3q+tm3q) + am5qq*(pm5+tm5) + am6qqq*(pm6q+tm6q) + am7qqq*(pm7q+tm7q) + am8qq*(pm8+tm8) + amsqq*pms ) *kpnvqq*fXqq + Sipxqq + Sigxqq $ FRML _GJ_D Vh = ( angh*pxng + aneh*pxne + abh*pxb + aqqh*pxqq + am3qh*(pm3q+tm3q) + am8h*(pm8+tm8) ) *kpnvh*fXh + Sipxh + Sigxh $ FRML _GJ_D Vo = ( aao*pxa + aeo*pxe + ango*pxng + aneo*pxne + anfo*pxnf + anno*pxnn + anbo*pxnb + anmo*pxnm + anto*pxnt + anko*pxnk + anqo*pxnq + abo*pxb + aqho*pxqh + aqso*pxqs + aqto*pxqt + aqfo*pxqf + aqqo*pxqq + aho*pxh + aoo*pxo + am0o*(pm0+tm0) + am1o*(pm1+tm1) + am2o*(pm2+tm2) + am3ko*(pm3k+tm3k) + am3ro*(pm3r+tm3r) + am3qo*(pm3q+tm3q) + am5o*(pm5+tm5) + am6mo*(pm6m+tm6m) + am6qo*(pm6q+tm6q) + am7bo*(pm7b+tm7b) + am7yo*(pm7y+tm7y) + am7qo*(pm7q+tm7q) + am8o*(pm8+tm8) + amso*pms ) *kpnvo*fXo + Sipxo + Sigxo $ FRML _GJ_D pncf = ( aacf*pxa + anfcf*pxnf + aqhcf*pxqh + am0cf*(pm0+tm0) )*kpncf*kkp $ FRML _GJ_D pncn = ( anfcn*pxnf + anncn*pxnn + aqhcn*pxqh + am0cn*(pm0+tm0) + am1cn*(pm1+tm1) )*kpncn*kkp $ FRML _GJ_D pnci = ( aaci*pxa + ankci*pxnk + anqci*pxnq + aqhci*pxqh + am0ci*(pm0+tm0) + am1ci*(pm1+tm1) + am2ci*(pm2+tm2) + am3qci*(pm3q+tm3q) + am5ci*(pm5+tm5) + am6qci*(pm6q+tm6q) + am8ci*(pm8+tm8) )*kpnci*kkp $ FRML _GJ_D pnce = ( aece*pxe + angce*pxng + anece*pxne + aqhce*pxqh + am3kce*(pm3k+tm3k) + am3qce*(pm3q+tm3q) )*kpnce*kkp $ FRML _GJ_D pncg = ( angcg*pxng + aqhcg*pxqh + am3qcg*(pm3q+tm3q) )*kpncg*kkp $ FRML _GJ_D pncb = ( antcb*pxnt + aqhcb*pxqh + am7bcb*(pm7b+tm7b) + am7qcb*(pm7q+tm7q) )*kpncb*kkp $ FRML _GJ_D pncv = ( anbcv*pxnb + anmcv*pxnm + antcv*pxnt + ankcv*pxnk + anqcv*pxnq + aqhcv*pxqh + am6mcv*(pm6m+tm6m) + am6qcv*(pm6q+tm6q) + am7ycv*(pm7y+tm7y) + am7qcv*(pm7q+tm7q) + am8cv*(pm8+tm8) )*kpncv*kkp $ FRML _GJRD Dlog(pnch) = 0.1488*Dlog(pibh) + 0.06808*log( pibh(-1)*fKnbh(-2)* (iwbz(-1)-0.5*rpibhe(-1)+bfinvbh(-1)) /(yrh(-1)-fKbhe(-1)/fKbhl(-1)*(Ywh+Siqh-Siqejh)) )$ FRML _GJ_D pnck = ( aqsck*pxqs + aqtck*pxqt + amsck*pms )*kpnck*kkp $ FRML _GJ_D pncs = ( anmcs*pxnm + anqcs*pxnq + aqhcs*pxqh + aqtcs*pxqt + aqfcs*pxqf + aqqcs*pxqq + aocs*pxo + amscs*pms )*kpncs*kkp $ FRML _I pct = pmt $ FRML _GJ_D pnim = ( aeim*pxe + anbim*pxnb + anmim*pxnm + antim*pxnt + ankim*pxnk + anqim*pxnq + aqhim*pxqh + aqqim*pxqq + am6mim*(pm6m+tm6m) + am6qim*(pm6q+tm6q) + am7bim*(pm7b+tm7b) + am7yim*(pm7y+tm7y) + am7qim*(pm7q+tm7q) + am8im*(pm8+tm8) + amsim*pms )*kpnim*kkp $ FRML _GJ_ pnimp1 = pnim*kpnimp $ FRML _GJ_ pnimo1 = pnim*kpnimo $ FRML _GJ_D pnib = ( abib*pxb + aqqib*pxqq + am5ib*(pm5+tm5) + am6qib*(pm6q+tm6q) )*kpnib*kkp $ FRML _GJ_ pnibp1 = pnib*kpnibp $ FRML _GJ_ pnibo1 = pnib*kpnibo $ FRML _GJ_ pnibh = pnib*kpnibh $ FRML _GJ_ pit = aait*pxa + am0it*(pm0+tm0) $ FRML _GJ_ pnil = ( ( fIla*pxa+fIle*pxe+fIlng*pxng +fIlne*pxne+fIlnf*pxnf+fIlnn*pxnn+fIlnb*pxnb +fIlnm*pxnm+fIlnt*pxnt+fIlnk*pxnk+fIlnq*pxnq +fIlqh*pxqh+fIlqq*pxqq +fIlm0*(pm0+tm0)+fIlm1*(pm1+tm1)+fIlm2*(pm2+tm2) +fIlm3k*(pm3k+tm3k)+fIlm3r*(pm3r+tm3r) +fIlm3q*(pm3q+tm3q)+fIlm5*(pm5+tm5) +fIlm6m*(pm6m+tm6m)+fIlm6q*(pm6q+tm6q) +fIlm7b*(pm7b+tm7b)+fIlm7q*(pm7q+tm7q) +fIlm8*(pm8 +tm8)+ fIlm7y*(pm7y+tm7y) ) /fIl ) $ () () () INVESTERINGSPRISER () () FRML _I piba = kpiba*pibp $ FRML _I pibe = kpibe*pibp $ FRML _I pibng = kpibng*pibp $ FRML _I pibne = kpibne*pibp $ FRML _I pibnf = kpibnf*pibp $ FRML _I pibnn = kpibnn*pibp $ FRML _I pibnb = kpibnb*pibp $ FRML _I pibnm = kpibnm*pibp $ FRML _I pibnt = kpibnt*pibp $ FRML _I pibnk = kpibnk*pibp $ FRML _I pibnq = kpibnq*pibp $ FRML _I pibb = kpibb*pibp $ FRML _I pibqh = kpibqh*pibp $ FRML _I pibqs = kpibqs*pibp $ FRML _I pibqt = kpibqt*pibp $ FRML _I pibqf = kpibqf*pibp $ FRML _I pibqq = kpibqq*pibp $ FRML _I pibo = kpibo*pibo1 $ FRML _I pima = kpima*pimp $ FRML _I pime = kpime*pimp $ FRML _I pimng = kpimng*pimp $ FRML _I pimne = kpimne*pimp $ FRML _I pimnf = kpimnf*pimp $ FRML _I pimnn = kpimnn*pimp $ FRML _I pimnb = kpimnb*pimp $ FRML _I pimnm = kpimnm*pimp $ FRML _I pimnt = kpimnt*pimp $ FRML _I pimnk = kpimnk*pimp $ FRML _I pimnq = kpimnq*pimp $ FRML _I pimb = kpimb*pimp $ FRML _I pimqh = kpimqh*pimp $ FRML _I pimqs = kpimqs*pimp $ FRML _I pimqt = kpimqt*pimp $ FRML _I pimqf = kpimqf*pimp $ FRML _I pimqq = kpimqq*pimp $ FRML _I pimh = kpimh*pimp $ FRML _I pimo = kpimo*pimo1 $ FRML _GJRD pne0 = pe0 - Sipe0/fE0 $ FRML _GJ_D pe1 = ( anne1*pxnn + aqhe1*pxqh + am1e1*(pm1+tm1) )*kpe1 $ FRML _GJ_D pe2 = ( aae2*pxa + anfe2*pxnf + anbe2*pxnb + anme2*pxnm + anke2*pxnk + aqhe2*pxqh + am2e2*(pm2+tm2) )*kpe2 $ FRML _GJ_D pe3 = ( aee3*pxe + ange3*pxng + anee3*pxne + aqhe3*pxqh + am3ke3*(pm3k+tm3k) + am3re3*(pm3r+tm3r) + am3qe3*(pm3q+tm3q) )*kpe3 $ FRML _GJ_D pe5 = ( anfe5*pxnf + anke5*pxnk + aqhe5*pxqh + am5e5*(pm5+tm5) )*kpe5 $ FRML _GJ_D pe6 = ( anbe6*pxnb + anme6*pxnm + anke6*pxnk + anqe6*pxnq + aqhe6*pxqh + am6me6*(pm6m+tm6m) + am6qe6*(pm6q+tm6q) )*kpe6 $ FRML _GJ_D pne7y = ( ante7y*pxnt + am7ye7y*(pm7y+tm7y) )*kpne7y $ FRML _GJ_D pe7q = ( anme7q*pxnm + ante7q*pxnt + aqhe7q*pxqh + am7be7q*(pm7b+tm7b) + am7qe7q*(pm7q+tm7q) )*kpe7q $ FRML _GJ_D pe8 = ( anme8*pxnm + anke8*pxnk + anqe8*pxnq + aqhe8*pxqh + aqqe8*pxqq + am8e8*(pm8+tm8) )*kpe8 $ FRML _GJ_D pesq = ( aqhesq*pxqh +aqtesq*pxqt +aqfesq*pxqf +aqqesq*pxqq +aoesq*pxo)*kpesq $ FRML _GJ_D pess = pxqs*kpess $ FRML _GJ_D pes = (fEsq/fEs)*pesq+(fEss/fEs)*pess $ FRML _GJ_D pet = ( 0.25*pcf+0.14*pcn+0.05*pci+0.06*pcg +0.05*pcv+0.07*pck+0.38*pcs ) *kpet $ () () () Overgang fra nettopriser til priser () () FRML _G pcf = (1+btgf*tg)*(pncf+tpf) $ FRML _G pcn = (1+btgn*tg)*(pncn+tpn) $ FRML _G pci = (1+btgi*tg)*(pnci+tpi) $ FRML _G pce = (1+btge*tg)*(pnce+tpe) $ FRML _G pcg = (1+btgg*tg)*(pncg+tpg) $ FRML _G pcb = (1+btgb*tg)*(pncb+tpb)*(1+trb) $ FRML _G pcv = (1+btgv*tg)*(pncv+tpv) $ FRML _G pch = (1+btgh*tg)*(pnch+tph) $ FRML _G pck = (1+btgk*tg)*(pnck+tpk) $ FRML _G pcs = (1+btgs*tg)*(pncs+tps) $ FRML _G pimp1 = (1+btgimp*tg)*(pnimp1+tpimp)*(1+trimp) $ FRML _G pimo1 = (1+btgimo*tg)*(pnimo1+tpimo) $ FRML _G pibp1 = (1+btgibp*tg)*(pnibp1+tpibp) $ FRML _G pibo1 = (1+btgibo*tg)*(pnibo1+tpibo) $ FRML _G pibh = (1+btgibh*tg)*(pnibh+tpibh) $ FRML _I pibp = pibp1*kpibp $ FRML _I pimp = pimp1*kpimp $ FRML _G pil = (1+btgil*tg)*(pnil+tpil) $ FRML _G pe7y = pne7y + Sipe7y/fE7y $ () () () PRISER P ERHVERVENES ENERGIFORBRUG () () FRML _G pvea = (1+btgxa*tg)*(tvea+bhvea*pxqh + (anga*pxng + anea*pxne + am3ka*(pm3k+tm3k) + am3qa*(pm3q+tm3q) ) *kpvea*fXa/fVea) $ FRML _G pvee = (1+btgxe*tg)*(tvee+bhvee*pxqh + (ange*pxng + am3qe*(pm3q+tm3q) ) *kpvee*fXe/fVee) $ FRML _G pveng = (1+btgxng*tg)*(tveng+bhveng*pxqh + (aeng*pxe + angng*pxng + aneng*pxne + am3rng*(pm3r+tm3r) + am3qng*(pm3q+tm3q) ) *kpveng*fXng/fVeng) $ FRML _G pvene = (1+btgxne*tg)*(tvene+bhvene*pxqh + (aane*pxa + aene*pxe + angne*pxng + anene*pxne + am3kne*(pm3k+tm3k) + am3qne*(pm3q+tm3q) ) *kpvene*fXne/fVene) $ FRML _G pvenf = (1+btgxnf*tg)*(tvenf+bhvenf*pxqh + (angnf*pxng + anenf*pxne + am3knf*(pm3k+tm3k) + am3qnf*(pm3q+tm3q) ) *kpvenf*fXnf/fVenf) $ FRML _G pvenn = (1+btgxnn*tg)*(tvenn+bhvenn*pxqh + (angnn*pxng + anenn*pxne + am3knn*(pm3k+tm3k) + am3qnn*(pm3q+tm3q) ) *kpvenn*fXnn/fVenn) $ FRML _G pvenb = (1+btgxnb*tg)*(tvenb+bhvenb*pxqh + (angnb*pxng + anenb*pxne + am3knb*(pm3k+tm3k) + am3qnb*(pm3q+tm3q) ) *kpvenb*fXnb/fVenb) $ FRML _G pvenm = (1+btgxnm*tg)*(tvenm+bhvenm*pxqh + (angnm*pxng + anenm*pxne + am3qnm*(pm3q+tm3q) ) *kpvenm*fXnm/fVenm) $ FRML _G pvent = (1+btgxnt*tg)*(tvent+bhvent*pxqh + (angnt*pxng + anent*pxne + am3qnt*(pm3q+tm3q) ) *kpvent*fXnt/fVent) $ FRML _G pvenk = (1+btgxnk*tg)*(tvenk+bhvenk*pxqh + (angnk*pxng + anenk*pxne + am3qnk*(pm3q+tm3q) ) *kpvenk*fXnk/fVenk) $ FRML _G pvenq = (1+btgxnq*tg)*(tvenq+bhvenq*pxqh + (angnq*pxng + anenq*pxne + am3knq*(pm3k+tm3k) + am3qnq*(pm3q+tm3q) ) *kpvenq*fXnq/fVenq) $ FRML _G pveb = (1+btgxb*tg)*(tveb+bhveb*pxqh + (angb*pxng + aneb*pxne + am3qb*(pm3q+tm3q) ) *kpveb*fXb/fVeb) $ FRML _G pveqh = (1+btgxqh*tg)*(tveqh+bhveqh*pxqh + (angqh*pxng + aneqh*pxne + am3qqh*(pm3q+tm3q) ) *kpveqh*fXqh/fVeqh) $ FRML _G pveqs = (1+btgxqs*tg)*(tveqs+bhveqs*pxqh + (angqs*pxng + aneqs*pxne + am3qqs*(pm3q+tm3q) ) *kpveqs*fXqs/fVeqs) $ FRML _G pveqt = (1+btgxqt*tg)*(tveqt+bhveqt*pxqh + (angqt*pxng + aneqt*pxne + am3qqt*(pm3q+tm3q) ) *kpveqt*fXqt/fVeqt) $ FRML _G pveqf = (1+btgxqf*tg)*(tveqf+bhveqf*pxqh + (angqf*pxng + aneqf*pxne + am3qqf*(pm3q+tm3q) ) *kpveqf*fXqf/fVeqf) $ FRML _G pveqq = (1+btgxqq*tg)*(tveqq+bhveqq*pxqh + (angqq*pxng + aneqq*pxne + am3qqq*(pm3q+tm3q) ) *kpveqq*fXqq/fVeqq) $ FRML _G pveh = (1+btgxh*tg)*(tveh+bhveh*pxqh + (angh*pxng + aneh*pxne + am3qh*(pm3q+tm3q) )* kpveh*fXh/fVeh) $ FRML _G pveo = (1+btgxo*tg)*(tveo+bhveo*pxqh + (aeo*pxe + ango*pxng + aneo*pxne + am3ko*(pm3k+tm3k) + am3ro*(pm3r+tm3r) + am3qo*(pm3q+tm3q) ) *kpveo*fXo/fVeo) $ () () () LN () () FRML _D btyd = (Tyd/Ulfhk)/(lah*(1-tsda)*0.001) $ FRML _D kqyfnl = (fYfnf+fYfnn+fYfnb+fYfnk+fYfnm+fYfnq+fYfnt)/ (Hqnf+Hqnn+Hqnb+Hqnk+Hqnm+Hqnq+Hqnt) $ FRML _D pyfnl = (Yfnf+Yfnn+Yfnb+Yfnk+Yfnm+Yfnq+Yfnt)/ (fYfnf+fYfnn+fYfnb+fYfnk+fYfnm+fYfnq+fYfnt) $ FRML _DJ_D tss0u = tsda + (1-tsda)*(tss0 + tssp0) $ FRML _D taqwh = Saqw1/(Qw*Hgn*0.001) $ FRML _D lnap = lna + taqwh $ FRML _SJRDF Dlog(lna) = 0.6480*0.5*(log(pxn)-log(pxn(-2))) - Dlog((lna+btaqwh*taqwh)/lna) + 0.2358*0.5*(log(pcp/pxn)-log(pcp(-2)/pxn(-2))) - 0.2358*0.5*(log(1-tss0u)-log(1-tss0u(-2))) - 1.2198*((1/3)*Dif(bul)+(2/3)*Dif(bul(-1))) + 0.0655*(log(kqyfnl)-log(kqyfnl(-1))) - 0.2126*log(lnak(-2)/(pyfnl(-2)*kqyfnl(-2))) - 1.0024*bul(-2) + 0.1235*btYd(-2) +0.0336*d4795 - 0.0300 $ FRML _GJ_ lnakk = lna + taqwh + (taqp+tadf)*(1-bqn/2)/Hgn $ FRML _GJ_ lnak = lnakk + (tqu+Tiqab)*(1-bqn/2)/Hgn $ FRML _GJ_ lah = lna*Ha $ FRML _GJ_ lnahk = lnak*Hgn/(1-bqn/2) $ FRML _GJDD loh = loh(-1)*((lah/lah(-1))*(1+JRloh)) $ FRML _GJ_ lohkk = loh + (Saqw/(Qw*.001)) $ FRML _GJ_ lohk = lohkk + 2/3*tqu + Tiqab $ FRML _GJRD lih = lih(-1)*(lnap/lnap(-1)) $ FRML _I Tiqab = Siqab/Qw*1000 $ FRML _I Yw = Ywa+Ywe+Ywng+Ywne+Ywnf+Ywnn+Ywnb+Ywnm +Ywnt+Ywnk+Ywnq+Ywb+Ywqh+Ywqs+Ywqt +Ywqf+Ywqq+Ywh+Ywo$ () () () INDKOMStOVeRFRSLER Mv. () () FRML _GJ_D Rlisa = ((lih(-2)*Ha(-2))/(lih(-3)*Ha(-3))-1)*(1-Dlisa) + Dlisa*(pcpn(-2)/pcpn(-3)-1) $ FRML _GJRD btb1 = (Tbhsl+Tbhsk+Saqw1)/Ysda2 $ FRML _GJRD ptty1 = ptty1(-1)*(1+0.5*(Rlisa+RliSa(-1)))*Dsr2 + ptty1(-1)*(1+Rlisa)*((1-tsda)/(1-tsda(-1))) *(1-btb1(-2))/(1-btb1(-3))*(1-Dsr2) $ FRML _GJ_D Typsfp = .001*ttypsfp*ptty1*Ufp $ FRML _GJ_D Typsfo = .001*ttypsfo*ptty1*Ufo $ FRML _D Typsr = Typsrd*ptty1 $ FRML _I Typs = Typsfp + Typsfo + Typsr $ FRML _GJ_D Typw = ktypw*Wobz(-1) $ FRML _D Typr1 = Typrd1*ptty1 $ FRML _GJ_D Typri = Typr1/ktypr1 $ FRML _I Typ = Typs + Typw + Typr1 $ FRML _GJ_D Tyd = 0.001*Ulfhk*ttyd1*ptty1 $ FRML _GJ_D Tysas = 0.001*Qw*ttysas1*ptty1 $ FRML _GJ_D Tysae = 0.001*Upe*ttysae1*ptty1 $ FRML _GJ_D Tysao = 0.001*Umf*ttysao1*ptty1 $ FRML _GJ_D Tysar = Tysard1*ptty1 $ FRML _I Tysa = Tysas+Tysae+Tysao+Tysar $ FRML _GJ_D Tysb = Tysbd1*ptty1 $ FRML _GJ_D Tyks = (0.001*Ulu*ttyks1*ptty1+5000*ptty1)*(1-Dsr2) $ FRML _GJ_D Tykr = Tykrd1*ptty1*(1-Dsr2) + (0.001*Ulu*ttyk1*ptty1+5250*ptty1)*Dsr2 $ FRML _I Tyk = Tyks+Tykr $ FRML _GJ_D Tyrr = Tyrrd1*ptty1 $ FRML _I Ty = Tyd+Typ+Tysa+Tysb+Tyk+Tyrr $ () () () DIREKTE SKATTER Mv. () () FRML _GJ_D Usy = (Ua+Ufp+Ufo+Upe+Umf)*kusy1 $ FRML _GJDD pcrs1 = pcrs1(-1)*(1+Rlisa)*(1-btb1(-2))/(1-btb1(-3)) *(1-tsda)/(1-tsda(-1)) $ FRML _GJ_D Yas = ( Yw+Twen+Tyd+Typ+Tysa+Tyks +Typshl+Tphhlu+Tpdmpu+Tpspu -Sdu-Saqw1/(1-tsda)-Saqp-Saqo -(Tbhsl+Tbhsk)/(1-tsda) -Typri)*kyas2 $ FRML _GJ_D Yspps = (Tpdmpi+Saqwy+Tpspi)*kyspps $ FRML _DJ_D Ivmps = bivmp0*pimp1*fImp1 + (1+d8291*(ptty1/ptty1(-1)-1)) *( (bivmp(-1)*(1-bivmp1(-1)) -(1-bivmp(-1))*bivmp0(-1) )*pimp1(-1)*fImp1(-1) +(1-(bivmp+bivmp(-1))/2)*Ivmps(-1)*bivmp/bivmp(-1)) $ FRML _DJ_D Ivbps = bivbp0*pibp1*fIbp1 + (1+d8291*(ptty1/ptty1(-1)-1)) *( (bivbp(-1)*(bivbpw(-1)-bivbp0(-1)) -(1-bivbp(-1))*bivbp0(-1) )*pibp1(-1)*fIbp1(-1) +(1-(bivbp+bivbp(-1))/2)*Ivbps(-1)*bivbp/bivbp(-1) ) $ FRML _D Ivps = Ivmps + Ivbps $ FRML _D Yrr1 = Yrp - 0.85*Yrh - (Iph/(I-Io1))*Ivps $ FRML _GJ_D Yrpss1 = (0.5*Yrr1+0.5*Yrr1(-1))*kyrpss2 $ FRML _GJ_D Yrphs = phv*fKnbhe(-1)*tsdl*kyrphs $ FRML _GJ_D Tippps1 = Tippp*ktippps1 $ FRML _DJ_D Ysp = Yas+Yrpss1-ktops1*(Tphhli+Tphhki) -ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -Yspps+ kysprs1*(Yw+Yrr1) $ FRML _DJ_D Ys = Ysp + Yrphs + Tippps1 - (Safm + kylws*Yw) - kyl3s1*(Yw+Yrr1) + Tysb + kysrs2*(Yw+Yrr1) $ FRML _D kbys = (Ys*Usye*pcrs1e-Yse*Usy*pcrs1)/(Yse*Usy*pcrs1) $ FRML _D kbysp = ((Ysp+d93)*Usye*pcrs1e-(Yspe+d93)*Usy*pcrs1) /((Yspe+d93)*Usy*pcrs1) $ FRML _GJ_D Ssys = (tss0+tss1*kbys)*Ys*kssy1 $ FRML _GJ_D Ssysp = (tssp0+tssp1*kbysp)*Ysp*kssyp $ FRML _GJ_D Ssya = ((pimp1*fKnmp+pibp1*fKnbp)*iwbz)*kssya $ FRML _GJ_D Ssyej = fKnbhe(-1)*phv*tqkej*kssyej $ FRML _D Ssy1 = Ssys + Ssysp + Ssya + Ssyej $ FRML _G Sdk1 = bssy0*Ssy1 + bssy1(-1)*Ssy1(-1) + bssy2(-2)*Ssy1(-2) + Sksi(-1) + Ssf + Skrc1 $ FRML _G Sdu = tdu*Qw*(1-bq/2)*0.001 $ FRML _DJ_D Ysda2 = Yw - Typri + 0.75*(0.5*Yrr1+0.5*Yrr1(-1)) $ FRML _DJ_D Tarn = Tyd + Tysas + Tysae + Tysao - Safm - Saqp $ FRML _G tsda = tsdae + ((Tarn(-2)-Tarne(-2))/(Ysda2(-2)*3))*(1-Dtsda) $ FRML _GJ_D Sda = (tsda*Ysda2)*ksda2 $ FRML _GJ_D Sdv = tsdv*(Kcb+Kcb(-1))/2 $ FRML _D Ivpsbk = (fKnmqf/fKnmp)*Ivmps+(fKnbqf/fKnbp)*Ivbps $ FRML _GJ_D iwbzu = iwbz $ FRML _D kwpbu = ( (1-(1+iwbzu)**(-nwpb)) /(1-(1+iwbn)**(-nwpb)) ) *(iwbn/iwbzu)$ FRML _D Wbbzk = Wbbzk(-1)*(kwpbu/kwpbu(-1)) + Dif(Wbbz) $ FRML _DJRD Ysdsbk = Yrqf+Tibn+Yfqi-(Ivpsbk+Ivpsbk(-1))/2 $ FRML _GJ_D Sdsbk = ksdsbk1 *(tsds1*(1/2)*bsdsbk*Ysdsbk +ktsds(-1)*tsds1(-1)*(1-(1/2)*bsdsbk(-1))*Ysdsbk(-1)) +0.83720*(1-Dsdsk) *(tsds1*(1/2)*bsdsbk *(Wbbzk(-1)*((kwpbu-kwpbu(-1))/kwpbu(-1))*0.6) +ktsds(-1)*tsds1(-1)*(1-(1/2)*bsdsbk(-1)) *(Wbbzk(-2)*((kwpbu(-1)-kwpbu(-2))/kwpbu(-2))*0.6)) +2054.04*d88 $ FRML _DJRD Ysdsr = Yrs+Tipps -( (1-(Iph/(I-Io1)))*Ivps-Ivpsbk +(1-(Iph(-1)/(I(-1)-Io1(-1))))*Ivps(-1)-Ivpsbk(-1) )/2 $ FRML _GJRD Sdsr = ksdsr1 *(tsds1*(1/2)*bsds*Ysdsr +ktsds(-1)*tsds1(-1)*(1-(1/2)*bsds(-1))*Ysdsr(-1)) $ FRML _I Sds = Sdsbk+Sdsr $ FRML _GJRD iwbr = 0.9*((Tifpn(-1)+Tifpn(-2))/(2*Wabz(-2))) + 0.1*iwbz - 0.0003 $ FRML _D pcpn = ( (pncb*fCb/0.467752)+(pnce*fCe/0.715931) +(pncf*fCf/0.833212)+(pncg*fCg/0.470535) +(pnch*fCh/0.998333)+(pnci*fCi/0.835350) +(pnck*fCk/0.922677)+(pncn*fCn/0.372328) +(pncs*fCs/0.871860)+(pct*fCt/1) +(pncv*fCv/0.821248) ) /(fCp+fEt) $ FRML _GJ_D tsdr = 0.99 *( ( ( iwbr-0.035 -( 1.035*(1/2+(1/2*d84)) *( ((pcpn(-1)/pcpn(-2))-1)+(1-d84) *((pcpn(-2)/pcpn(-3))-1) ) ) ) )/iwbr )$ FRML _GJ_D Sdra = ksdra*tsdra*iwbz*(fKnmp*pimp1+fKnbp*pibp1) $ FRML _GJ_D Sdrld = ksdrld*tsdr*iwpp*Wld(-1) +Sdra*Wld(-1)/(Wpp(-1)+Wld(-1)+Wdmp(-1)+Wsp(-1)) $ FRML _GJ_D Sdrdmp = ksdrdmp*tsdr*iwpp*Wdmp(-1) +Sdra*Wdmp(-1)/(Wpp(-1)+Wld(-1)+Wdmp(-1)+Wsp(-1)) $ FRML _GJ_D Sdrsp = ksdrsp*tsdr*iwpp*Wsp(-1) +Sdra*Wsp(-1)/(Wpp(-1)+Wld(-1)+Wdmp(-1)+Wsp(-1)) $ FRML _GJ_D Sdrp = ksdrp1*tsdr*bsdr*(Tipphpp+Tipphpb) +Sdra*Wpp(-1)/(Wpp(-1)+Wld(-1)+Wdmp(-1)+Wsp(-1)) $ FRML _GJ_D Sdrpp = ksdrpp*tsdr*bsdr*Tipphpp +Sdra*ktipphpp *Wpp(-1)/(Wpp(-1)+Wld(-1)+Wdmp(-1)+Wsp(-1)) $ FRML _I Sdrph = Sdrp-Sdrpp $ FRML _I Sdr = Sdrp+Sdrld+Sdrdmp+Sdrsp $ FRML _GJ_D Sdp1 = ksdp*tsdp*(Typshk+Tphhku+Tpldu) + Sdpr $ FRML _I Sd = Sdk1 + Sda + Sdu + Sdp1 + Sdv + Sds + Sdr $ FRML _G Saqw1 = (1-tsda)*taqw1*Qw*(1-bq/2)*.001 +ktaqwul*taqw1*(Ulfhk+Ulu)*.001 $ FRML _G Saqwy = taqwy1*(ksda2*Ysda2-(Saqw1+Tbhsk+Tbhsp) +ksaqwy*(Tyd+Tysas+Tyks)) $ FRML _I Saqw = Saqw1+Saqwy $ FRML _G Saqo = taqo*Qwo*(1-bqo/2)*0.001 $ FRML _G Saqp = taqp*Qwp*(1-bqp/2)*0.001 $ FRML _G Safma = Tafma*ptty1*(Qw*(1-bq/2)+Ulfhk+Umf+Upe+Qs)*0.001 $ FRML _G Safme = Tafme*ptty1*bsafme*(Qw*(1-bq/2)+Ulfhk+Umf+Qs)*0.001 $ FRML _I Safm = Safma+Safme $ FRML _I Saso = Saqw + Saqo + Saqp + Safm + Sasr $ FRML _I Sa = Sak + Saso $ FRML _I S = Sd + Siaf + Sa $ () () () INDIREKTE SKATTER () () FRML _G Sim = fM0*tm0 + fM1*tm1 + fM2*tm2 + fM3k*tm3k + fM3r*tm3r + fM3q*tm3q + fM5*tm5 + fM6m*tm6m + fM6q*tm6q + fM7b*tm7b + fM7y*tm7y + fM7q*tm7q + fM8*tm8 $ FRML _G Sipe0 = Sipee + Sipeq $ FRML _G Sipxa = tvea*fVea + tvma*fVma $ FRML _G Sipxe = tvee*fVee + tvme*fVme $ FRML _G Sipxng = tveng*fVeng + tvmng*fVmng $ FRML _G Sipxne = tvene*fVene + tvmne*fVmne $ FRML _G Sipxnf = tvenf*fVenf + tvmnf*fVmnf $ FRML _G Sipxnn = tvenn*fVenn + tvmnn*fVmnn $ FRML _G Sipxnb = tvenb*fVenb + tvmnb*fVmnb $ FRML _G Sipxnm = tvenm*fVenm + tvmnm*fVmnm $ FRML _G Sipxnt = tvent*fVent + tvmnt*fVmnt $ FRML _G Sipxnk = tvenk*fVenk + tvmnk*fVmnk $ FRML _G Sipxnq = tvenq*fVenq + tvmnq*fVmnq $ FRML _G Sipxb = tveb*fVeb + tvmb*fVmb $ FRML _G Sipxqh = tveqh*fVeqh + tvmqh*fVmqh $ FRML _G Sipxqs = tveqs*fVeqs + tvmqs*fVmqs $ FRML _G Sipxqt = tveqt*fVeqt + tvmqt*fVmqt $ FRML _G Sipxqf = tveqf*fVeqf + tvmqf*fVmqf $ FRML _G Sipxqq = tveqq*fVeqq + tvmqq*fVmqq $ FRML _G Sipxh = tveh*fVeh + tvmh*fVmh $ FRML _G Sipxo = tveo*fVeo + tvmo*fVmo $ FRML _I Sipx = Sipxa + Sipxe + Sipxng + Sipxne + Sipxnf + Sipxnn + Sipxnb + Sipxnm + Sipxnt +Sipxnk + Sipxnq + Sipxb + Sipxqh + Sipxqs +Sipxqt + Sipxqf + Sipxqq + Sipxh + Sipxo $ FRML _G tpk = tpkr + Sipkto/fCk $ FRML _G Sipc = tpf*fCf + tpn*fCn + tpi*fCi + tpe*fCe + tpg*fCg + tpb*fCb + tpv*fCv + tph*fCh + tpk*fCk + tps*fCs + tpibp*fIbp1 + tpimp*fImp1 + tpimo*fImo1 + tpibo*fIbo1 + tpibh*fIbh + tpil*fIl + Sipe0 + Sipe7y $ FRML _I Sip = Sipx + Sipc $ FRML _G Sigxa = btgxa*tg*Va/(1+btgxa*tg) $ FRML _G Sigxe = btgxe*tg*Ve/(1+btgxe*tg) $ FRML _G Sigxng = btgxng*tg*Vng/(1+btgxng*tg) $ FRML _G Sigxne = btgxne*tg*Vne/(1+btgxne*tg) $ FRML _G Sigxnf = btgxnf*tg*Vnf/(1+btgxnf*tg) $ FRML _G Sigxnn = btgxnn*tg*Vnn/(1+btgxnn*tg) $ FRML _G Sigxnb = btgxnb*tg*Vnb/(1+btgxnb*tg) $ FRML _G Sigxnm = btgxnm*tg*Vnm/(1+btgxnm*tg) $ FRML _G Sigxnt = btgxnt*tg*Vnt/(1+btgxnt*tg) $ FRML _G Sigxnk = btgxnk*tg*Vnk/(1+btgxnk*tg) $ FRML _G Sigxnq = btgxnq*tg*Vnq/(1+btgxnq*tg) $ FRML _G Sigxb = btgxb*tg*Vb/(1+btgxb*tg) $ FRML _G Sigxqh = btgxqh*tg*Vqh/(1+btgxqh*tg) $ FRML _G Sigxqs = btgxqs*tg*Vqs/(1+btgxqs*tg) $ FRML _G Sigxqt = btgxqt*tg*Vqt/(1+btgxqt*tg) $ FRML _G Sigxqf = btgxqf*tg*Vqf/(1+btgxqf*tg) $ FRML _G Sigxqq = btgxqq*tg*Vqq/(1+btgxqq*tg) $ FRML _G Sigxh = btgxh*tg*Vh/(1+btgxh*tg) $ FRML _G Sigxo = btgxo*tg*pvo*fVo/(1+btgxo*tg) $ FRML _I Sigx = Sigxa + Sigxe + Sigxng + Sigxne + Sigxnf + Sigxnn + Sigxnb + Sigxnm + Sigxnt + Sigxnk + Sigxnq + Sigxb + Sigxqh + Sigxqs + Sigxqt + Sigxqf + Sigxqq + Sigxh + Sigxo $ FRML _G Sigc = btgf*tg*pcf*fCf/(1+btgf*tg) + btgn*tg*pcn*fCn/(1+btgn*tg) + btgi*tg*pci*fCi/(1+btgi*tg) + btge*tg*pce*fCe/(1+btge*tg) + btgg*tg*pcg*fCg/(1+btgg*tg) + btgv*tg*pcv*fCv/(1+btgv*tg) + btgh*tg*pch*fCh/(1+btgh*tg) + btgk*tg*pck*fCk/(1+btgk*tg) + btgs*tg*pcs*fCs/(1+btgs*tg) + btgo*tg*pco*fCo/(1+btgo*tg) + btgb*tg*pcb*fCb/((1+trb)*(1+btgb*tg)) $ FRML _G Sigi1 = btgibh*tg*pibh*fIbh/(1+btgibh*tg) + btgimp*tg*pimp1*fImp1/((1+trimp)*(1+btgimp*tg)) + btgimo*tg*pimo1*fImo1/(1+btgimo*tg) + btgibo*tg*pibo1*fIbo1/(1+btgibo*tg) + btgibp*tg*pibp1*fIbp1/(1+btgibp*tg) + btgil*tg*pil*fIl/(1+btgil*tg) $ FRML _I Sig = Sigx + Sigc + Sigi1 $ FRML _G Sir = trb*fCb*pcb/(1+trb) + trimp*fImp1*pimp1/(1+trimp) $ FRML _G Siqu = tqu*Qw*(1-bq/2)*0.001 $ FRML _G tqab = tqabe + ((Tarn(-2)-Tarne(-2))/((Yw(-2)-Typri(-2))*3)) *(1-Dtsda) $ FRML _GJ_D Siqab = tqab*(Yw-Typri)*ksiqab $ FRML _GJRD Siqej = 0.21044*(fKnbp(-2)+fKnbh(-2)) *(phgk(-1)+phgk(-2))/2*tqej $ FRML _GJ_ Siqejh = 0.8*Siqej*fKnbh(-2)/(fKnbp(-2)+fKnbh(-2)) $ FRML _GJ_D Siqam = 1.9*(tsiqamf*Ywqf+tsiqam*(0.07*Ywqq+Ywh))*(1+JRsiqam) $ FRML _I Siqeu = Siqaa + Siqeur $ FRML _G Siqsq = Siqsqr + Siqeur $ FRML _G Siqs = Siqsq + Siqaa + Siqsh $ FRML _I Siq = Siqu + Siqab + Siqej + Siqv + Siqam + Siqr + Siqs $ FRML _I Si = Sim + Sip + Sig + Sir + Siq $ FRML _GJ_D Sipur1 = -ksipur1*( 0.006007*fCs + 0.031287*(fVeqq+fVmqq) + 0.00445*(fVea+fVma) + 0.002297*(fVeqq+fVmqq) ) $ FRML _GJ_D Sipee = Sipeem + tpe0*fE0*pne0 $ FRML _I Sipsue = Sipee + Sipaa + Sipsuer $ FRML _G Sipsu = Sipur1 + Sipkto + Sipsue + Sipe7y + Sipeq $ FRML _I Sipaf = Sip - Sipsu $ FRML _I Sisu = Siqs + Sipsu $ FRML _I Sisue = Sipsue + Siqeu $ FRML _I Sisuo = Sisu - Sisue $ FRML _I Siaf = Si - Sisu $ FRML _I Siafe = deusim*Sim + Sipeu $ FRML _I Siafo = Siaf - Siafe $ () () () EKSPORT I RETS PRISER () () FRML _I Ev = fE0*pe0 + fE1*pe1 + fE2*pe2 + fE3*pe3 + fE5*pe5 +fE6*pe6 + fE7y*pe7y + fE7q*pe7q + fE8*pe8 $ FRML _I Es = fEs*pes $ FRML _I Et = fEt*pet $ FRML _I E = Ev + Es + Et $ () () () IMPORT I RETS PRISER () () FRML _I Mv = fM0*pm0 + fM1*pm1 + fM2*pm2 + fM3k*pm3k + fM3r*pm3r + fM3q*pm3q + fM5*pm5 + fM6m*pm6m + fM6q*pm6q + fM7b*pm7b + fM7y*pm7y + fM7q*pm7q + fM8*pm8 $ FRML _I Ms = fMs*pms $ FRML _I Mt = fMt*pmt $ FRML _I M = Mv + Ms + Mt $ () () () BETALINGSBALANCE () () FRML _I Envt = E - M $ FRML _GJ_D Teuby = tteuby*(Yi) $ FRML _GJ_D Teubg = tteubg*(Sig/tg) $ FRML _GJ_D Teub = Teuby + Teubg + Teubr + deusim*Sim + Sipeu $ FRML _I Teun = (-Sipsue - Siqeu) + Teur - Teub $ FRML _GJ_D iwbu = kwfgud*iwbud + kwfgdm*iwbdm $ FRML _GJDD Dif(Tien) = Dif(Tisiu-Tisuu) + Dif( 0.5 *( Ken +Wflkg -Wglkf +Wfbz +Ken(-1)+Wflkg(-1)-Wglkf(-1)+Wfbz(-1) ) *iwbu ) - 0.5*(Dif(Wfbz)*iwbz+Dif(Wfbz(-1))*iwbz(-1)) + 0.20*( 0.5 *( Ken(-1)+Wflkg(-1)-Wglkf(-1)+Wfbz(-1) +Ken(-2)+Wflkg(-2)-Wglkf(-2)+Wfbz(-2) ) *iwbu(-1) -0.5*(Wfbz(-1)+Wfbz(-2))*iwbz -Tien(-1)+Tisiu(-1)-Tisuu(-1) ) $ FRML _GJ_D Taoer = ktaoer*0.5 *(Y(-1)+Tien(-1)+Twen(-1)+Y(-2)+Tien(-2)+Twen(-2)) $ FRML _I Taoe = Taoer + Taoefo + Taoegr $ FRML _I Tfen = E - M + Twen - Siafe - Sisue + Tien + Sden + Saen + Tyen + Teur + Taeo + Taep - Tape - (Teuby + Teubr + Teubg + Taoe) + Tkeo + Tkepsn - Tkphe - Tkoe $ FRML _I Tken = Tkeo-Tkoe+Tkepsn-Tkphe $ FRML _I Enl = Tfen - Tken + Enlres $ FRML _GJDD Dif(Ken) = Enl $ () () () OFFENTLIGE OG PRIVATE SEKTORBALANCER () () FRML _GJDD Dif(Tifoi) = 0.5*(Dif(Wobz)*iwbz+Dif(Wobz(-1))*iwbz(-1)) + 0.06*(0.5*(Wobz(-1)+Wobz(-2))*iwbz(-1)-Tifoi(-1)) $ FRML _GJ_D Tasir = (1-Dsdr)*(ktasir*tsdr*(1-(33685/Wobz))*Tifoi) + Dsdr*820 $ FRML _GJDD Dif(Tiki) = Dif(0.5*(Wldb+Wldb(-1))*iwde) +0.5*(Dif(Wlbz)*iwbz+Dif(Wlbz(-1))*iwbz(-1)) +0.06*( 0.5*(Wlbz(-1)+Wlbz(-2))*iwbz +0.5*(Wldb(-1)+Wldb(-2))*iwde(-1) -Tiki(-1) ) $ FRML _GJDD Dif(Tiku) = Dif(0.5*(Wgll+Wgll(-1))*iwbz) + Dif(0.5*(Wbll+Wbll(-1))*iwlo) + Dif(0.5*(Wfll+Wfll(-1))*iwbu) + Dif(0.5*(Whll+Whll(-1))*iwlo) + 0.5*(Dif(Wall)*iwbz+Dif(Wall(-1))*iwbz(-1)) + 0.5*(Dif(Wzbl)*iwbz+Dif(Wzbl(-1))*iwbz(-1)) + 0.06*( 0.5*(Wall(-1)+Wall(-2))*iwbz +0.5*(Wgll(-1)+Wgll(-2))*iwbz(-1) +0.5*(Wbll(-1)+Wbll(-2))*iwlo(-1) +0.5*(Wfll(-1)+Wfll(-2))*iwbu(-1) +0.5*(Whll(-1)+Whll(-2))*iwlo(-1) +0.5*(Wzbl(-1)+Wzbl(-2))*iwbz -Tiku(-1) ) $ FRML _GJDD Dif(Tisii) = Dif(0.5*(Wgll+Wgll(-1))*iwbz) + Dif(0.5*(Wglp+Wglp(-1))*iwbz) + Dif(0.5*(Wgln+Wgln(-1))*(iwdi-.02)) + 0.5*(Dif(Wgbz)*iwbz+Dif(Wgbz(-1))*iwbz(-1)) + 0.06*( 0.5*(Wgbz(-1)+Wgbz(-2))*iwbz +0.5*(Wgln(-1)+Wgln(-2))*(iwdi(-1)-.02) +0.5*(Wglp(-1)+Wglp(-2))*iwbz(-1) +0.5*(Wgll(-1)+Wgll(-2))*iwbz(-1)-Tisii(-1) ) $ FRML _GJDD Dif(Tisiu) = 0.5*(Dif(Wglkf)*iwbu*0.25+Dif(Wglkf(-1))*iwbu(-1)*0.25) + 0.06*((Wglkf(-1)+Wglkf(-2))*0.5*iwbu*0.25-Tisiu(-1)) $ FRML _GJDD Dif(Tisui) = Dif(0.5*(Wilg+Wilg(-1))*iwlo) + 0.5*(Dif(Wzbg)*iwbz+Dif(Wzbg(-1))*iwbz(-1)) + 0.20*( (Wzbg(-1)+Wzbg(-2))*0.5*iwbz +(Wilg(-1)+Wilg(-2))*0.5*iwlo(-1) -Tisui(-1) ) $ FRML _GJDD Dif(Tisuu) = Dif(0.5*(Wfgv+Wfgv(-1))*iwbu) + 0.5*( Dif(Wflkg-Wfgv)*iwbu +Dif(Wflkg(-1)-Wfgv(-1))*iwbu(-1) ) + kwfga*( 0.5*(Wflkg(-1)-Wfgv(-1)+Wflkg(-2)-Wfgv(-2))*iwbu +0.5*(Wfgv(-1)+Wfgv(-2))*iwbu(-1)-Tisuu(-1) ) $ FRML _GJDD_Z Tibn = Tibn(-1) + 0.5*( (Wblp+Wblp(-1))*iwlo -(Wblp(-1)+Wblp(-2))*iwlo(-1) ) + 0.5*( (Wbll+Wbll(-1))*iwlo -(Wbll(-1)+Wbll(-2))*iwlo(-1) ) - 0.5*( (Wpdb+Wpdb(-1))*iwde -(Wpdb(-1)+Wpdb(-2))*iwde(-1) ) - 0.5*( (Wldb+Wldb(-1))*iwde -(Wldb(-1)+Wldb(-2))*iwde(-1) ) - 0.5*( (Wnlb+Wnlb(-1))*iwnz -(Wnlb(-1)+Wnlb(-2))*iwnz(-1) ) + 0.5*( (Wilg+Wilg(-1))*iwlo -(Wilg(-1)+Wilg(-2))*iwlo(-1) ) + 0.5*( (Wbdn+Wbdn(-1))*iwnz -(Wbdn(-1)+Wbdn(-2))*iwnz(-1) ) + 0.5*( (Wbvf+Wbvf(-1))*iwbu -(Wbvf(-1)+Wbvf(-2))*iwbu(-1) ) + 0.5*( (Wbqf+Wbqf(-1))*iwbu -(Wbqf(-1)+Wbqf(-2))*iwbu(-1) ) - 0.5*( (Wflb+Wflb(-1))*iwbu -(Wflb(-1)+Wflb(-2))*iwbu(-1) ) - 0.5*( (Wplb+Wplb(-1))*iwde -(Wplb(-1)+Wplb(-2))*iwde(-1) ) + 0.5*( (Wbdsn+Wbdsn(-1))*iwnz -(Wbdsn(-1)+Wbdsn(-2))*iwnz(-1) ) + 0.5*( (Wbbz-Wbbz(-1))*iwbz +(Wbbz(-1)-Wbbz(-2))*iwbz(-1) ) + 0.5*( (Wibz-Wibz(-1))*iwbz +(Wibz(-1)-Wibz(-2))*iwbz(-1) ) + 0.20*( 0.5*(Wbbz(-1)+Wbbz(-2))*iwbz +0.5*(Wibz(-1)+Wibz(-2))*iwbz +0.5*(Wblp(-1)+Wblp(-2))*iwlo(-1) +0.5*(Wbll(-1)+Wbll(-2))*iwlo(-1) +0.5*(Wbvf(-1)+Wbvf(-2))*iwbu(-1) +0.5*(Wbqf(-1)+Wbqf(-2))*iwbu(-1) -0.5*(Wflb(-1)+Wflb(-2))*iwbu(-1) -0.5*(Wplb(-1)+Wplb(-2))*iwde(-1) -0.5*(Wpdb(-1)+Wpdb(-2))*iwde(-1) -0.5*(Wldb(-1)+Wldb(-2))*iwde(-1) -0.5*(Wnlb(-1)+Wnlb(-2))*iwnz(-1) +0.5*(Wilg(-1)+Wilg(-2))*iwlo(-1) +0.5*(Wbdn(-1)+Wbdn(-2))*iwnz(-1) +0.5*(Wbdsn(-1)+Wbdsn(-2))*iwnz(-1) -Tibn(-1) ) $ FRML _GJDD Dif(Tinn) = Dif(0.5*(Wnvf+Wnvf(-1))*iwbu) + Dif(0.5*(Wnlb+Wnlb(-1))*iwnz) - Dif(0.5*(Wbdn+Wbdn(-1))*iwnz) - Dif(0.5*(Wbdsn+Wbdsn(-1))*iwnz) - Dif(0.5*(Wgln+Wgln(-1))*(iwdi-.02)) + 0.5*(Dif(Wnbz)*iwbz+Dif(Wnbz(-1))*iwbz(-1)) + 0.06*( 0.5*(Wnbz(-1)+Wnbz(-2))*iwbz +0.5*(Wnvf(-1)+Wnvf(-2))*iwbu(-1) +0.5*(Wnlb(-1)+Wnlb(-2))*iwnz(-1) -0.5*(Wbdn(-1)+Wbdn(-2))*iwnz(-1) -0.5*(Wbdsn(-1)+Wbdsn(-2))*iwnz(-1) -0.5*(Wgln(-1)+Wgln(-2))*(iwdi(-1)-0.02) -Tinn(-1) ) $ FRML _I Tioii = Tisii + Tisiu + Tiki + Tifoi $ FRML _I Tioi = Tiov + Tioii + Tior $ FRML _I Tiou = Tisui + Tisuu + Tiku + Tifou $ FRML _I Tion = Tiov + Tioii + Tior - Tiou $ FRML _I Tipn = Tien - Tion $ FRML _GJ_D Tifpn = Tii/ktii $ FRML _D Tipp2 = Tipn - (Tinn-Tono(-1)) - Tii - Tibn $ FRML _G Tippp = ktippp * Tipp2 $ FRML _D Tipps = Tipp2 - Tippp $ FRML _G Timp = ktimp * Tipphpp $ FRML _D Tipph = Timp + Tippp $ FRML _GJD Dif(Taphn) = Dif(Taop - Tapo +.5*(Taep-Tape)) $ FRML _G Taphu = (1-d4787)*(Tapo + 0.5*Tape + Taphr) $ FRML _GJDD Dif(Tii) = 0.5*(Dif(Wall)*iwbz+Dif(Wall(-1))*iwbz(-1)) + 0.5*(Dif(Walp)*iwbz+Dif(Walp(-1))*iwbz(-1)) + 0.5*(Dif(Wsbz)*iwbz+Dif(Wsbz(-1))*iwbz(-1)) + 0.5*(Dif(Wabz)*iwbz+Dif(Wabz(-1))*iwbz(-1)) + btii*( 0.5*(Wall(-1)+Wall(-2))*iwbz +0.5*(Walp(-1)+Walp(-2))*iwbz +0.5*(Wsbz(-1)+Wsbz(-2))*iwbz +0.5*(Wabz(-1)+Wabz(-2))*iwbz -Tii(-1) ) $ FRML _G Tffpi = Tbhsp + ktphi*(Tphhli + Tphhki) $ FRML _G Tffpu = Typshp + ktphu*(Tphhlu + Tphhku) $ FRML _G Tffpn = Tffpi - Tffpu + Tipphpp - Sdrpp + Tffpnr $ FRML _I Tfoi = Ivo1 + Tioi + Siafo + Sd + Saso + Typri + Tbpho + Teur + Taeo + Tapo + Sak + Tkeo + Tkpo $ FRML _I Tfou = Co + Io1 + Tkoubi + Ilo1 + Tkojr - Sisuo + Ty + Tiou + Teuby + Teubr + Teubg + Taoe + Taop + Tkoe + Tkops + Tkoph $ FRML _I Ydo = Ivo1 + Siafo + Sisuo + Tion + Sd + Saso + Typri + Tbpho - Ty + Teur + Taeo + Tapo - (Teuby + Teubr + Teubg + Taoe + Taop) $ FRML _I Tfon = Ydo - Co + Sak + Tkeo + Tkpo - (Tkoe + Tkops + Tkoph) - (Io1 + Tkoubi) - Ilo1 - Tkojr $ FRML _I Ydp = Yr - Ivo1 + Yw + Twen + Tipn -(Sd-Sden) - Saso- Typri- Tbpho + Saen + Ty + Tyen + Taop + Taep - Tapo - Tape $ FRML _I Ydph = Yrp + Yw + Twen + Tipph - (Sd - Sds - Sden) - (Typri + Saso + Tbpho + Tbhsp - Saen) + (Ty + Typshp + Tyen) + Taphn $ FRML _I Tfphn = Ydph-Cp-(Typshp-Tbhsp)+(Tkoph-Sak-Tkphe) -(Iph+Ilph+Tkphjr) $ FRML _I Ydps = Ydp - Ydph $ () SEKTORBALANCE FOR STAT,KOMMUNER OG OFFENTLIGE FONDE FRML _I Ydoo = (1-d4787)*(Ivoo1+Sisuoo+Tifoi-Tifou+Tioov+(Saso-Sasr) -Tyo+Tapoo+Tasoon) $ FRML _I Tffon = (1-d4787)*(Ydoo-Coo+Tkpoon-Ioo1-Tkooubi) +d4787*(Saqw+Saqo+Tifoi-Tasir+Tffonr1-Tifou-Typw) $ FRML _I Ydk = (1-d4787)*(Ivok1+Siafok+Sisuokk+Tiki-Tiku+Tikov +Tiokr+Sdkk+Typrik-Tykk+Taeok+Tapok -Taokp+Taosk-Takos) $ () EN SWITCH DUMMY KONSTRUKTION DER KAN EKSOGENISERE TFKN FRML _G Tfkn = (1-Dtfkn)*(Ydk-Cok+Tkpok-Tkopsk-Tkophk -Tkkosn-Iok1-Tkokubi-Tkokjr) +Dtfkn*Tfknx $ FRML _G Taosk = (1-d4787)* ( Dtfkn*(Tfkn-(Ivok1+Siafok+Sisuokk+Tiki-Tiku +Tikov+Tiokr+Sdkk+Typrik-Tykk+Taeok +Tapok-Taokp-Takos -Cok+Tkpok-Tkopsk-Tkophk-Tkoek-Tkkosn -Iok1-Tkokubi-Tkokjr)) +(1-Dtfkn)*Taoskx ) $ FRML _I Tyo = (1-d4787)*(Tyd+Typw+Tysae+Typlg) $ FRML _I Tasoon = (1-d4787)*((Tyd+Tysae+Typlg)*ktasoo -0.8*(Tasir+Safma+Safme)*ktaoos) $ FRML _GJ_D Siafok = ksiafok*Siqej $ FRML _GJ_D Sisuokk = ksisuokk*(0.17*(Siqs-Siqaa-Siqeur) + 0.18*(Sipsu-Sipsue)) $ FRML _GJ_D Sdkk = ksdkk*(0.69*Sdk1+0.33*(Sdp1-Sdpr)+0.25*Sdpr+0.11*Sds) $ FRML _GJ_D Tykk = ktykk*(Typs+0.24*Typr1+Tysas+0.04*Tysao+0.33*Tysar +0.55*Tysb+0.99*Tyk+0.55*Tyrr) $ FRML _GJ_D Ivok1 = kivok1*Ivo1 $ FRML _GJ_D Cok = kcok*Co $ FRML _GJ_D Iok1 = kiok1*Io1 $ FRML _I Ydss = (1-d4787)*(Ydo-Ydoo-Ydk) $ FRML _I Tfsn = Tfon-Tffon-Tfkn $ () ØMU-GÆLD FRML _GJDD Wzzomu = (1-d4794)*(Wzzomu(-1) - Tfsn - Tfkn - Dif(kwobz*Wobz) + Dif((1-kwosfp)*Wspbz) + kwomu) $ () OFFENTLIG NETTOGÆLD FRML _GJDD Dif(Won) = (1-d4794)*( (d4794(-1)-d4794)*246882 - Tfon) $ () () () BRUTTONATIONALPRODUKT, BRUTTOV’RDITILV’KST OG BRUTTONATIONALINDKOMST () () FRML _I fY = fCp + fCo + fIm + fIb + fIt + fIl - fM + fE $ FRML _I Y = Cp + Co + I + E - M $ FRML _I Yf = Y - Si + Siq $ FRML _DJ_ Yi = Y + (Twen+Tien) + (-Sisue-Siafe) $ () () () SAMLET INDENLANDSK EFTERSPRGSEL () () FRML _I fYtr = fY + fM - fE $ FRML _I Ytr = Y + M - E $ FRML _I pytr = Ytr/fYtr $ () () () IKKE-VAREFORDELTE INDIREKTE SKATTER () () FRML _GJ_ Siqal = .017*Siqu+.014*Siqab+.000*Siqam $ FRML _GJ_ Siqel = .000*Siqu+.001*Siqab+.000*Siqam $ FRML _GJ_ Siqngl = .000*Siqu+.001*Siqab+.000*Siqam $ FRML _GJ_ Siqnel = .006*Siqu+.008*Siqab+.000*Siqam $ FRML _GJ_ Siqnfl = .030*Siqu+.031*Siqab+.000*Siqam $ FRML _GJ_ Siqnnl = .003*Siqu+.004*Siqab+.000*Siqam $ FRML _GJ_ Siqnbl = .008*Siqu+.013*Siqab+.000*Siqam $ FRML _GJ_ Siqnml = .069*Siqu+.072*Siqab+.000*Siqam $ FRML _GJ_ Siqntl = .010*Siqu+.010*Siqab+.000*Siqam $ FRML _GJ_ Siqnkl = .022*Siqu+.027*Siqab+.000*Siqam $ FRML _GJ_ Siqnql = .041*Siqu+.043*Siqab+.000*Siqam $ FRML _GJ_ Siqbl = .053*Siqu+.061*Siqab+.000*Siqam $ FRML _GJ_ Siqqhl = .090*Siqu+.132*Siqab+.000*Siqam $ FRML _GJ_ Siqqsl = .006*Siqu+.009*Siqab+.000*Siqam $ FRML _GJ_ Siqqtl = .056*Siqu+.067*Siqab+.000*Siqam $ FRML _GJ_ Siqqfl = .040*Siqu+.047*Siqab+.823*Siqam $ FRML _GJ_ Siqhl = .004*Siqu+.006*Siqab+.034*Siqam $ FRML _GJ_ Siqol = .433*Siqu+.300*Siqab+.000*Siqam $ FRML _G Siqqql = .112*Siqu+.155*Siqab+.143*Siqam -Jsiqal-Jsiqel-Jsiqngl-Jsiqnel-Jsiqnfl -Jsiqnnl-Jsiqnbl-Jsiqnml-Jsiqntl-Jsiqnkl -Jsiqnql-Jsiqbl-Jsiqqhl-Jsiqqsl-Jsiqqtl -Jsiqqfl-Jsiqhl-Jsiqol $ FRML _GJ_ Siqa = Siqal +(.094/(1-.565))*(Siqej-Siqejh) +.070*Siqv+.020*Siqr+(.113/(1-.262))*Siqsq+Siqaa $ FRML _GJ_ Siqe = Siqel +(.000/(1-.565))*(Siqej-Siqejh) +.000*Siqv+.006*Siqr+(.000/(1-.262))*Siqsq $ FRML _GJ_ Siqng = Siqngl+(.000/(1-.565))*(Siqej-Siqejh) +.000*Siqv+.015*Siqr+(.003/(1-.262))*Siqsq $ FRML _GJ_ Siqne = Siqnel+(.006/(1-.565))*(Siqej-Siqejh) +.003*Siqv+.018*Siqr+(.004/(1-.262))*Siqsq $ FRML _GJ_ Siqnf = Siqnfl+(.008/(1-.565))*(Siqej-Siqejh) +.032*Siqv+.058*Siqr+(.042/(1-.262))*Siqsq $ FRML _GJ_ Siqnn = Siqnnl+(.003/(1-.565))*(Siqej-Siqejh) +.005*Siqv+.008*Siqr+(.004/(1-.262))*Siqsq $ FRML _GJ_ Siqnb = Siqnbl+(.006/(1-.565))*(Siqej-Siqejh) +.004*Siqv+.009*Siqr+(.009/(1-.262))*Siqsq $ FRML _GJ_ Siqnm = Siqnml+(.018/(1-.565))*(Siqej-Siqejh) +.020*Siqv+.058*Siqr+(.050/(1-.262))*Siqsq $ FRML _GJ_ Siqnt = Siqntl+(.003/(1-.565))*(Siqej-Siqejh) +.001*Siqv+.011*Siqr+(.008/(1-.262))*Siqsq $ FRML _GJ_ Siqnk = Siqnkl+(.009/(1-.565))*(Siqej-Siqejh) +.007*Siqv+.046*Siqr+(.017/(1-.262))*Siqsq $ FRML _GJ_ Siqnq = Siqnql+(.011/(1-.565))*(Siqej-Siqejh) +.013*Siqv+.041*Siqr+(.034/(1-.262))*Siqsq $ FRML _GJ_ Siqb = Siqbl +(.006/(1-.565))*(Siqej-Siqejh) +.149*Siqv+.022*Siqr+(.041/(1-.262))*Siqsq $ FRML _GJ_ Siqqh = Siqqhl+(.056/(1-.565))*(Siqej-Siqejh) +.208*Siqv+.508*Siqr+(.112/(1-.262))*Siqsq $ FRML _GJ_ Siqqs = Siqqsl+(.006/(1-.565))*(Siqej-Siqejh) +.002*Siqv+.023*Siqr+(.009/(1-.262))*Siqsq $ FRML _GJ_ Siqqt = Siqqtl+(.017/(1-.565))*(Siqej-Siqejh) +.392*Siqv+.027*Siqr+(.124/(1-.262))*Siqsq $ FRML _GJ_ Siqqf = Siqqfl+(.016/(1-.565))*(Siqej-Siqejh) +.002*Siqv+.006*Siqr+(.018/(1-.262))*Siqsq $ FRML _GJ_ Siqh = Siqhl + Siqejh +.001*Siqv+.007*Siqr+Siqsh $ FRML _GJ_ Siqo = Siqol +(.040/(1-.565))*(Siqej-Siqejh) +.018*Siqv+.000*Siqr+(.002/(1-.262))*Siqsq $ FRML _G Siqqq = Siqqql+(.136/(1-.565))*(Siqej-Siqejh) +.073*Siqv+.117*Siqr+(.148/(1-.262))*Siqsq -JSiqa-JSiqe-JSiqng-JSiqne-JSiqnf-JSiqnn-JSiqnb -JSiqnm-JSiqnt-JSiqnk-JSiqnq-JSiqb-JSiqqh-JSiqqs -JSiqqt-JSiqqf-JSiqh-JSiqo $ () () () BRUTTOV’RDITILV’KST I RETS PRISER () () FRML _I Yfa = fXa*pxa - Va $ FRML _I Yfe = fXe*pxe - Ve $ FRML _I Yfng = fXng*pxng - Vng $ FRML _I Yfne = fXne*pxne - Vne $ FRML _I Yfnf = fXnf*pxnf - Vnf $ FRML _I Yfnn = fXnn*pxnn - Vnn $ FRML _I Yfnb = fXnb*pxnb - Vnb $ FRML _I Yfnm = fXnm*pxnm - Vnm $ FRML _I Yfnt = fXnt*pxnt - Vnt $ FRML _I Yfnk = fXnk*pxnk - Vnk $ FRML _I Yfnq = fXnq*pxnq - Vnq $ FRML _I Yfb = fXb*pxb - Vb $ FRML _I Yfqh = fXqh*pxqh - Vqh $ FRML _I Yfqs = fXqs*pxqs - Vqs $ FRML _I Yfqt = fXqt*pxqt - Vqt $ FRML _I Yfqf = fXqf*pxqf - Vqf $ FRML _I Yfqq = fXqq*pxqq - Vqq $ FRML _I Yfh = fXh*pxh - Vh $ FRML _GJ_ Yfqi = - kyfqi*Tibn $ () () () PRISER P BRUTTOV’RDITILV’KST () () FRML _I pyfa = Yfa/fYfa $ FRML _I pyfe = Yfe/fYfe $ FRML _I pyfng = Yfng/fYfng $ FRML _I pyfne = Yfne/fYfne $ FRML _I pyfnf = Yfnf/fYfnf $ FRML _I pyfnn = Yfnn/fYfnn $ FRML _I pyfnb = Yfnb/fYfnb $ FRML _I pyfnm = Yfnm/fYfnm $ FRML _I pyfnt = Yfnt/fYfnt $ FRML _I pyfnk = Yfnk/fYfnk $ FRML _I pyfnq = Yfnq/fYfnq $ FRML _I pyfb = Yfb/fYfb $ FRML _I pyfqh = Yfqh/fYfqh $ FRML _I pyfqs = Yfqs/fYfqs $ FRML _I pyfqt = Yfqt/fYfqt $ FRML _I pyfqf = Yfqf/fYfqf $ FRML _I pyfqq = Yfqq/fYfqq $ FRML _I pyfo = Yfo/fYfo $ () () () BRUTTORESTINDKOMST () () FRML _I Yr = Yf - Siq - Yw $ FRML _I Yra = Yfa - Siqa - Ywa $ FRML _I Yre = Yfe - Siqe - Ywe $ FRML _I Yrng = Yfng - Siqng - Ywng $ FRML _I Yrne = Yfne - Siqne - Ywne $ FRML _I Yrnf = Yfnf - Siqnf - Ywnf $ FRML _I Yrnn = Yfnn - Siqnn - Ywnn $ FRML _I Yrnb = Yfnb - Siqnb - Ywnb $ FRML _I Yrnm = Yfnm - Siqnm - Ywnm $ FRML _I Yrnt = Yfnt - Siqnt - Ywnt $ FRML _I Yrnk = Yfnk - Siqnk - Ywnk $ FRML _I Yrnq = Yfnq - Siqnq - Ywnq $ FRML _I Yrb = Yfb - Siqb - Ywb $ FRML _I Yrqh = Yfqh - Siqqh - Ywqh $ FRML _I Yrqs = Yfqs - Siqqs - Ywqs $ FRML _I Yrqt = Yfqt - Siqqt - Ywqt $ FRML _I Yrqf = Yfqf - Siqqf - Ywqf $ FRML _I Yrqq = Yfqq - Siqqq - Ywqq $ FRML _I Yrh = Yfh - Siqh - Ywh $ FRML _I Yro = Yfo - Siqo - Ywo $ FRML _G Yrp = kyrp1 *( bqsa*Yfa+bqse*Yfe+bqsng*Yfng+bqsnf*Yfnf +bqsnn*Yfnn+bqsnb*Yfnb+bqsnm*Yfnm+bqsnt*Yfnt +bqsnk*Yfnk+bqsnq*Yfnq+bqsb*Yfb+bqsqh*Yfqh +bqsqs*Yfqs+bqsqt*Yfqt+bqsqq*Yfqq+0.82*Yfh ) $ FRML _D Yrs = Yr - Yrqf - Yfqi - Ivo1 - Yrp $ () () () KORREKTIONSFAKTOR TIL PRISSAMMENBINDINGSRELATIONER () () FRML _D____Z kkp = kkp + 1 - Yf /( Yfa+Yfe+Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk +Yfnq+Yfb+Yfqh+Yfqs+Yfqt+Yfqf+Yfqq+Yfh+Yfqi+Yfo ) $ () () () ---------------------------- () FINANSIEL DELMODEL () ---------------------------- () () () PRIVAT IKKE-FINANSIEL SEKTOR () () FRML _GJ_D Ytr1 = 0.9681*Ytr $ FRML _GJ_D pytr1 = (1/0.5076)*pytr $ FRML _GJ_DF Wpm = ( 104.377+(505.1278+255.31*dw84)*iwde -494.498*iwlo-10.6298*iwdme -255.31*dw84*iwdme) *pytr1*1000+.355285*Wwe +0.0296153*Ytr1-1*Vkihw-(1-kwpmwpb)*Wpbnz $ FRML _GJ_DF Wpcz = 3879.62*pytr1+.037039*Ytr1-69.0964*pytr1*(tid-1974) $ FRML _GJ_DF Wpbnz = (-18.4369+121.206*(iwbz-iwde))*pytr1*1000*3.23546 +0.444346*Wpqe +0.546906*(Wpbnz(-1)-0.444346*Wpqe(-1)) $ FRML _I Wpbz = Wpbnz + Wzbr $ FRML _GJ_DF Wzbr = -( (-4.96506+140.781*(iwbz-iwde))*pytr1*1000*3.18663 +0.271615*Wpqe-0.023947*Ytr1*3.18663-0.963523*Vkihw -0.522006*(Wzbr(-1)-0.963523*Vkihw(-1) +0.271615*Wpqe(-1)) ) $ FRML _GJ_DF Wblp = ( 101.262+494.498*iwde-497.54062*iwlo +3.04262*iwdme ) *pytr1*1000 -0.210929*Wwe+0.0296153*Ytr1+0.398668*Vkipw +kwblpwpb*Wpbnz $ FRML _G___F Wflp = -(Wwe-Vkihw-Vkipw) + Wpm + Wpbnz - Wblp $ FRML _G Tffonw = Tffon + JTffonw $ FRML _G Tffpnw = Tffpn + JTffpnw $ FRML _G Tfenw = Tfen + JTfenw $ FRML _G Tfsnw = Tfsn + JTfsnw $ FRML _G Tfknw = Tfkn + JTfknw $ FRML _G Tfpinw = Tfenw - Tfsnw - Tfknw $ FRML _G Dif(Wpqp) = Tfpinw - Dif(Wnqn) $ FRML _G Dif(Wpqnp) = Tfpinw - Dif(Wnqn) - Tffonw - Tffpnw - Dif(Wbqb) $ FRML _D Wpqx = Wplb + Whll + Wsbz + Whbz + Wrbz + Wtlf + Wzbf + Wpdsb - (Wglp+Welp+Wflt+Wflh+Wfqp+Walp) $ FRML _D Wpqe = Wpqnp - Wpqx $ FRML _D Wwe = Wpqe + Vkipw + Vkihw $ FRML _D Dif(Vkipw) = (I - Io1) - fIbh*pibh + Vkipwres $ FRML _D Dif(Vkihw) = fIbh*pibh + Vkihwres $ () () () PENGEINSTITUTTER () () FRML _GJ_DF Wbcz = 1755.93*pytr1+0.006053*(Wpdb+Wldb) -108.621*pytr1*(tid-1974) $ FRML _GJ_DF Wbbz = (-16.1411+574.670*(iwbz-iwnz+4*(iwbz-iwbze))) *pytr1*1000 +0.879402*Wlik-0.718608*(Wblp+Wbll) $ FRML _G Wbdsn = krea0 *( Wpdb+Wldb-Wpdsb -(1+krea1)*(Wpdb(-1)+Wldb(-1)-Wpdsb(-1)) ) + JWbdsn $ FRML _D Wpdb = Wpm - Wpcz + Wpdsb $ FRML _D Wlik = Wflb + Wplb + Wldb + Wpdb + Wbqb - Wbcz - Wbdsn - Wbqf - Wbvf $ () () () NATIONALBANK () () FRML _G Wnlb = Wbbz - (Wlik-Wbll-Wblp) + Wbdn $ FRML _G Wnbz = (1-Diwbz) *( krea2*(Wfqf-Wfqfx) -krea3 *( Wflp+Wfll+Wflt+Wflb+Wflh+Wfle+Wfbz+Wfqp -Wflpx-Wfllx-Wfltx-Wflbx-Wflhx-Wflex-Zwfbz -Wfqpx-Wzbf-Wbqf-Welf-Wtlf+Wzbfx+Wbqfx +Welfx+Wtlfx ) +Wnbzx ) + Diwbz *( Wzbl+Wzbg-Wobz-Wabz-Wlbz-Wibz -Wfbz-Wgbz-Wrbz-Wsbz-Whbz-Wbbz-Wpbnz ) $ FRML _G Wnvf = Wnvf(-1) + Tfenw + Wflg + Wflp + Wfqg + Wfll + Wflt + Wflb + Wflh + Wfle +Wfbz + Wfqp - (Wzbf+Wbqf+Welf+Wglf+Wtlf+Wbvf) - ( Wflg(-1)+Wflp(-1)+Wfqg(-1)+Wfll(-1) +Wflt(-1)+Wflb(-1)+Wflh(-1)+Wfle(-1) +Wfbz(-1)+Wfqp(-1)-Wzbf(-1)-Wbqf(-1)-Wbvf(-1) -Welf(-1)-Wglf(-1)-Wtlf(-1) ) $ FRML _G Wgln = Wgln(-1) + Tfsnw - Wgll - Wglp - Wgbz - Wglf + Wfqg + Wzbg + Wflg + Wilg + ( Wgll(-1)+Wglp(-1)+Wgbz(-1)+Wglf(-1) -Wfqg(-1)-Wzbg(-1)-Wflg(-1)-Wilg(-1) ) $ FRML _G iwnz = iwnzx + krea4*(iwbz-iwbzx) $ FRML _G iwmm = iwmmx + krea4*(iwbz-iwbzx) $ () () () STAT, KOMMUNER OG FONDE () () FRML _G Wzbg = Wzbgx - krea5*(Tfsnw-Tfsnxw) + (Wzbg(-1)-Wzbgx(-1)) $ FRML _G Wflg = Wflgx - krea6*(Wnvf-Wnvfx) $ FRML _G Wldb = Wldb(-1) + Wgll + Wfll + Whll + Wall + Wbll + Wzbl - Wlbz - ( Wgll(-1)+Wfll(-1)+Whll(-1) +Wall(-1)+Wbll(-1)+Wzbl(-1)-Wlbz(-1) ) + Tfknw $ FRML _G Wlql = Wlql(-1) + Tfknw $ FRML _D Wzzl = Wgll + Wfll + Whll + Wall + Wbll + Wzbl + Wlql $ FRML _G Wobz = Tffonw + Wobz(-1) $ FRML _G Wabz = Tffpnw*kwabz + Wabz(-1) $ FRML _G Wazz = Wazz(-1) + Tffpnw $ FRML _D Walp = Wazz - Wabz - Wall $ () () () UDLAND () () FRML _G Wfqf = Wfqf(-1) - Tfenw $ FRML _GJ_DFZ Wfbz = pytr1 *( (Wfbz(-1)/pytr1(-1)) +21.9636*dtwfbz*(iwbz-iwbzv) ) $ FRML _G Wflkg = Wflkg(-1) + (Wflg-Wflg(-1)) + (ewdm/ewdm(-1)-1)*kwflkg*Wflkg(-1) $ FRML _G Wglkf = Wglf + JWglkf $ () () () RENTER OG KURSER () () FRML _G___F iwbz = (1-Diwbz) *( ( Wzbl+Wzbg-Wobz-Wabz-Wlbz-Wnbz-Wibz -Wgbz-Wrbz-Wsbz-Whbz-Wfbz +(16.1411+574.670*(4*iwbze+iwnz)) *pytr1*1000-0.879402*Wlik+0.718608*(Wblp+Wbll) -JWbbz +(18.4369+121.206*iwde)*3.23546*pytr1*1000 -0.444346*Wpqe -0.546906*(Wpbnz(-1)-0.444346*Wpqe(-1)) -JWpbnz ) /(pytr1*1000*(574.670*5+121.206*3.23546)) ) + Diwbz*ziwbz $ FRML _DJ_DF iwbzv = iwbdm - (1/3)*(iwbz(-1)-iwbdm(-1)) + 0.20464 *( ( 10*Dlog(lna/lnat)+16*Dlog(lna(-1)/lnat(-1)) +6*Dlog(lna(-2)/lnat(-2)) ) /8 ) -0.20934*((Enl/Y)+Enl(-1)/Y(-1))+0.02204 $ FRML _GJ_DF iwde = 1.16169 *( 0.257815*Dwrad*iwbz+.686266*Dwrad*iwdi +0.408538*(1-Dwrad)*iwlo+0.0895399*(1-Dwrad)*iwmm -0.0338057*Dwrad+0.0003984 ) $ FRML _GJ_DF iwlo = 1.237028 *( 0.152856*(1-Dwral)*iwbz +0.854339*dwral*iwdi+0.521494*(1-Dwral-dw86)*iwdi +0.0733236*(1-Dwral)*iwmm+0.328907*dw86*iwmm -0.00637343*drml+0.057674 ) $ FRML _G iwdme = iwdm + ((ewdme/ewdm)-1) $ FRML _G iwbze = kiw*(iwbz-iwbzx) + iwbzex $ FRML _G iku = kiku*iwlo $ FRML _G iwbdm = kiwbdm*iwdm $ () () PENSIONSMODEL () FRML _GJRD iwpp = kiwpp*Tii/((Wazz(-1)+Wsbz(-1))*1.5) $ FRML _G Tipphp = iwpp*Wpp(-1) $ FRML _G Tipphpp = ktipphpp*Tipphp $ FRML _D Tipphpb = Tipphp-Tipphpp $ FRML _D iwppd = (Tipphp-Sdrp)/Wpp(-1) $ FRML _DJ_D bsdr = 1-(108024/(Wall+Walp+Wabz))$ () Arbejdsgiveradministrerede l›bende ordnInger FRML _GJ_D Tbhsl = ktbhsl1*(1+JRktbhsl)*Ysda2*(1-tsda) $ FRML _GJ_D Typshl = kbw*Wpspl(-1)*(iwppd/(1-(1+iwppd)**(-nhl))) $ FRML _GJ_D Tishl = iwppd* Wpspl(-1)*(1+JRtishl) $ FRML _D Wpspl = Wpspl(-1)+ Tbhsl-Typshl + Tishl $ () Arbejdsgiveradministrerede engangsydelser FRML _GJ_D Tbhsk = ktbhsk1*(1+JRktbhsk)*Ysda2*(1-tsda) $ FRML _GJ_D Typshk = kbyk*Wpspk(-1) $ FRML _GJ_D Tishk = iwppd*Wpspk(-1)*(1+JRtishk) $ FRML _D Wpspk = Wpspk(-1)+Tbhsk-Typshk+Tishk $ () Privattegnede l›bende ordninger FRML _GJ_D Tphhli = kbhl1*(1+JRtphhli)*Ydph $ FRML _GJ_D Tphhlu = kbwp*Wphpl(-1)*(iwppd/(1-(1+iwppd)**(-nhl))) $ FRML _GJ_D Tihhl = iwppd*Wphpl(-1)*(1+JRtihhl) $ FRML _D Wphpl = Wphpl(-1)+Tphhli-Tphhlu+Tihhl $ () PrIvattegnede ordninger med engangsudbetalinger FRML _GJ_D Tphhki = kbhk1*(1+JRtphhki)*Ydph $ FRML _GJ_D Tphhku = kbpk*Wphpk(-1) $ FRML _GJ_D Tihsk = iwppd*Wphpk(-1)*(1+JRtihsk) $ FRML _D Wphpk = Wphpk(-1)+Tphhki-Tphhku+Tihsk $ () Den midlertidige pensionordning (DMP) - midlertidig ATP FRML _GJ_D Tpdmpu = kbdmpu*Wdmp(-1)*(1+JRtpdmpu) $ FRML _GJ_D Tidmp = (Wdmp(-1)*iwpp-Sdrdmp)*(1+JRtidmp) $ FRML _D Wdmp = Wdmp(-1)+Tpdmpi-Tpdmpu+Tidmp $ () Den s‘rlige pensionsordning (SP)- s‘rlig ATP - evt fra 2002 FRML _GJ_D Tpspi = kbspi*(ksda2*Ysda2-(Saqw1+Tbhsk+Tbhsp) +kbspty*(Tyd+Tysas+Tyks))*(1+JRtpspi) $ FRML _GJ_D Tpspu = kbspu*Wsp(-1)*(1+JRtpspu) $ FRML _GJ_D Tisp = (Wsp(-1)*iwpp-Sdrsp)*(1+JRtisp) $ FRML _D Wsp = Wsp(-1)+Tpspi-Tpspu+Tisp $ () L›nmodtagernes dyrtidsfond (LD) FRML _GJ_D Tpldu = kbld*Wld(-1)*(1+JRtpldu) $ FRML _GJ_D Tidpld = (Wld(-1)*iwpp-Sdrld)*(1+JRtidpld) $ FRML _D Wld = Wld(-1)+Tpldi-Tpldu+Tidpld $ () FRML _D Wpp = Wphpk+Wphpl+Wpspl+Wpspk $ FRML _GJ_D Tbhsp = ktbhsp*(Tbhsl+Tbhsk) $ FRML _GJ_D Typshp = ktypshp*(Typshl+Typshk) $ AFTER $ () -------------------------------------------------------------------------- () --------------------- EFTERMODEL-VARIABLER ------------------------------- () -------------------------------------------------------------------------- () () PRIVAT FORBRUG () () FRML IYDWT Ydwt = Yw+Twen-Typri-Saso+Ty+Tyen-(Sd-Sden) $ FRML ISDKOR Sdkor = Sd - Sden $ FRML IYRPS Yrps = Yr - Ivo1 $ FRML IYDD Ydd = Ydpl1/pcp4v1 $ FRML IYDDxH Yddxh = (Ydpl1/pcp4v1) - fCh $ FRML IWCPLD Wcpld = Wcp2(-1)/pcp4v1 $ FRML IFCPDK fCpdk = fCf+fCn+fCi+fCe+fCg+fCb+fCv+fCh+fCk+fCs $ FRML IFCP4XH fCp4xh = fCp4 - fCh $ FRML ICh1 Ch1 = fChl*pchl+fChe*pche $ FRML IFCh1 fCh1 = Ch1/pch1 $ FRML IFCP41 fCp41 = fCp4xh + fCh1 $ FRML ICB2 Cb2 = pcb*fCb2 $ FRML ICB Cb = pcb*fCb $ FRML ICp4 Cp4 = Cp - Cb + Cb2 $ FRML ICp41 Cp41 = Cp4xh+Ch1 $ FRML ICPDK Cpdk = fCf*pcf+fCn*pcn+fCi*pci+fCe*pce+fCg*pcg+fCb*pcb +fCv*pcv+fCh*pch+fCk*pck+fCs*pcs $ FRML ICPXH Cpxh = Cp-(pch*fCh) $ FRML ICF Cf = pcf*fCf $ FRML ICN Cn = pcn*fCn $ FRML ICI Ci = pci*fCi $ FRML ICE Ce = pce*fCe $ FRML ICG Cg = pcg*fCg $ FRML ICV Cv = pcv*fCv $ FRML ICH Ch = pch*fCh $ FRML ICK Ck = pck*fCk $ FRML ICS Cs = pcs*fCs $ FRML ICT Ct = pct*fCt $ FRML ICGBK Cgbk = pcgbk*fCgbk $ FRML IfCgk fCgk = Cgk/pcgk $ FRML IYDY Ydy = 100*Ydp/Y $ FRML IBCP4XH bcp4xh = (Cp4-(pch*fCh))/(Ydpl1) $ FRML IBCPXH bcpxh = (Cp-(pch*fCh))/(Ydpl1-(pch*fCh)) $ FRML IBCP4 bcp4 = Cp4/Ydpl1 $ FRML IBCP4 bcp41 = Cp41/Ydpl1 $ FRML IBCP bcp = Cp/Ydp $ FRML IBCPSM bcpysm = Cp/(Yf + Ty) $ FRML IBCPY bcpy = Cp/Y $ FRML IBCPYF bcpyf = Cp/Yf $ FRML IBWCP bwcp2 = Wcp2(-1) / Ydp $ FRML IBfCgk bfcgk = fCg/fCk $ FRML IECP4XH ecp4xh = Cp4xh - exp( .429371*(Ydphk1-Ydphk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.190365*(Ydpsk1-Ydpsk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.227223*Dlog(Wcp2(-1)) -.710411*Dlog(pcp4xhv)+.090433*Dlog(pch1) -.243822*(log(Cp4xh(-1)/pcp4xhv(-1)) -.856399*log(Ydpl1(-1)/pcp4v1(-1)) -(1-.856399)*log(Wcp2(-2)/pcp4v1(-1)) +.601023*log(pcp4xhv(-1)/pcp4v1(-1)) +0.297143) +log(Cp4xh(-1)/pcp4xhv(-1))+log(pcp4xhv) ) $ FRML IEFCP4XH efcp4xh = ecp4xh*fCp4xh/Cp4xh $ () () INVESTERINGER () FRML IFIF fIf = fIm + fIb + fIt $ FRML IIF If = I - fIl*pil $ FRML IFI fI = fIf + fIl $ FRML IFIP fIp = fImp + fImk + fIbp + fIbh + fIt + fIl $ FRML IFIP1 fIp1 = fIbp1 + fImp1 + fIt + fIbh + fIl $ FRML IIP1 Ip1 = I - Io1 $ FRML IFIFP fIfp = fImp + fImk + fIbp + fIbh + fIt $ FRML IFIFPXH fIfpxh = fImp + fImk + fIbp + fIt $ FRML IFIFP1Xh fIfp1xh = fIbp1 + fImp1 + fIt $ FRML IFIFO fIfo = fImo + fIbo $ FRML IFIO fIo = fImo + fIbo $ FRML IIT It = pit*fIt $ FRML IIBB Ib = pibp1*fIbp1 + pibo1*fIbo1 + pibh*fIbh $ FRML IIBM Im = pimp1*fImp1 + pimo1*fImo1 $ FRML IIPB1 Ibp1 = pibp1*fIbp1 $ FRML IIPM1 Imp1 = pimp1*fImp1 $ FRML IfIbhe fIbhe = fIbh-fIbhl $ FRML IInbvh Invbh = fInvbh*pibh $ FRML IIWBZH iwbzh = iwbz*(1-tsuih) $ FRML IPIBHG pibhg = .8*pibh+.2*phgk $ FRML IPHKHG phkhg = phk/pibhg $ FRML IBUIBH1 buibh1 = Che/(fChe*phk) $ FRML IUIBH uibh = buibh1*phk/fKbhe(-1) $ () Dekomponering af boligusercost () U (egtl usercost) () S (skatter) l (lejeværdi) () Q (ejendomsskat) () Y (ej.Værdiskat) () n (brutto/nettokapital) FRML IUIBHu uibheu = (1-tsuih)*iwbz + bfinvbh - 0.50*rpibhe $ FRML IUIBHs uibhs = (tsuih*Yrphs + fKnbhe(-2)/( fKnbp(-2)+fKnbh(-2)) *Siqej + Ssyej )/fChe $ FRML IUIBHsl uibhsl = tsuih*Yrphs/fChe $ FRML IUIBHsq uibhsq = (fKnbhe(-2)/(fKnbp(-2)+fKnbh(-2))*Siqej)/fChe $ FRML IUIBHsy uibhsy = Ssyej/fChe $ FRML IUIBHn uibhn = fKnbhe(-1)/fKbhe(-1) $ () () LAGERINVESTERINGER () FRML IIL Il = pil*fIl $ () () () EKSPORT I FASTE PRISER () () FRML IFE59 fE59 = fE5+fE6+fE7y+fE7q+fE8 $ FRML IFEST fEst = fEs+fEt $ () () () EKSPORT I RETS PRISER () () FRML IE0 E0 = fE0*pe0 $ FRML IEN0 En0 = fE0*pne0 $ FRML IE1 E1 = fE1*pe1 $ FRML IE2 E2 = fE2*pe2 $ FRML IE3 E3 = fE3*pe3 $ FRML IE5 E5 = fE5*pe5 $ FRML IE6 E6 = fE6*pe6 $ FRML IE7Y E7y = fE7y*pe7y $ FRML IEN7Y En7y = fE7y*pne7y $ FRML IE7Q E7q = fE7q*pe7q $ FRML IE8 E8 = fE8*pe8 $ FRML IE59 E59 = E5+E6+E7y+E7q+E8 $ FRML IESS Ess = fEss*pess $ FRML IESQ Esq = fEsq*pesq $ FRML IEST Est = Es+Et $ () () () UDENLANDSK EFTERSPRGSEL OG KONKURRENTPRIS INDUSTRIVARER () Eksklusiv skibe, fly mm (FE7Y/PE7Y) () FRML IFEE59 fEe59 = fEe59(-1)*( (fE5(-1)/(fE59(-1)-fE7y(-1)))*fEe5/fEe5(-1) + (fE6(-1)/(fE59(-1)-fE7y(-1)))*fEe6/fEe6(-1) + (fE7q(-1)/(fE59(-1)-fE7y(-1)))*fEe7q/fEe7q(-1) + (fE8(-1)/(fE59(-1)-fE7y(-1)))*fEe8/fEe8(-1) ) $ FRML IPEE59 pee59 = pee59(-1)*( (fE5(-1)/(fE59(-1)-fE7y(-1)))*pee5/pee5(-1) + (fE6(-1)/(fE59(-1)-fE7y(-1)))*pee6/pee6(-1) + (fE7q(-1)/(fE59(-1)-fE7y(-1)))*pee7q/pee7q(-1) + (fE8(-1)/(fE59(-1)-fE7y(-1)))*pee8/pee8(-1) ) $ () () () IMPORT I FASTE PRISER (INDEHOLDER OGS NOGET RES-IMPORT) () () FRML IFM7 fM7 = fM7b + fM7y + fM7q $ FRML IFM6 fM6 = fM6m + fM6q $ FRML IFM3 fM3 = fM3k + fM3r + fM3q $ FRML IFMST fMst = fMs+fMt $ () () () IMPORT I RETS PRISER () () FRML IM0 M0 = pm0*fM0 $ FRML IM1 M1 = pm1*fM1 $ FRML IM2 M2 = pm2*fM2 $ FRML IM3R M3r = pm3r*fM3r $ FRML IM3Q M3q = pm3q*fM3q $ FRML IM3K M3k = pm3k*fM3k $ FRML IM3 M3 = M3k + M3r + M3q $ FRML IPM3 pm3 = M3/fM3 $ FRML IM5 M5 = pm5*fM5 $ FRML IM6M M6m = pm6m*fM6m $ FRML IM6Q M6q = pm6q*fM6q $ FRML IM6 M6 = M6m + M6q $ FRML IM7B M7b = pm7b*fM7b $ FRML IM7Y M7y = pm7y*fM7y $ FRML IM7Q M7q = pm7q*fM7q $ FRML IM7 M7 = M7b + M7y + M7q $ FRML IM8 M8 = pm8*fM8 $ FRML IMST Mst = Ms+Mt $ () () () IMPORTKVOTER () () FRML IBFM bfm = fM/(fM+fY) $ FRML IBM bm = (M)/(M+Y) $ () () () Problematisk, da formelnavnet er l‘ngere end 8 karakterer FRML YZfM7bim Zfm7bim = am7bim*fIm $ FRML YZfMsqs Zfmsqs = amsqs*fXqs $ () () () KOEFFICIENTER FOR INDENLANDSKE LEVERANCER () () FRML IAYFA ayfa = fYfa/fXa $ FRML IAYFNG ayfng = fYfng/fXng $ FRML IAYFNE ayfne = fYfne/fXne $ FRML IAYFNF ayfnf = fYfnf/fXnf $ FRML IAYFNN ayfnn = fYfnn/fXnn $ FRML IAYFNB ayfnb = fYfnb/fXnb $ FRML IAYFNM ayfnm = fYfnm/fXnm $ FRML IAYFNT ayfnt = fYfnt/fXnt $ FRML IAYFNK ayfnk = fYfnk/fXnk $ FRML IAYFNQ ayfnq = fYfnq/fXnq $ FRML IAYFB ayfb = fYfb/fXb $ FRML IAYFQH ayfqh = fYfqh/fXqh $ FRML IAYFQS ayfqs = fYfqs/fXqs $ FRML IAYFQT ayfqt = fYfqt/fXqt $ FRML IAYFQF ayfqf = fYfqf/fXqf $ FRML IAYFQQ ayfqq = fYfqq/fXqq $ FRML IAYFH ayfh = fYfh/fXh $ FRML IAYFO ayfo = fYfo/fXo $ () () () PRODUKTION () () FRML IFX fX = fXa+fXe+fXn+fXb+fXqh+fXqs+fXqt+fXqf+fXqq+fXh+fXo $ FRML IFXQ fXq = fXqh+fXqs+fXqt+fXqf+fXqq $ FRML IXA Xa = fXa*pxa $ FRML IXE Xe = fXe*pxe $ FRML IXNG Xng = fXng*pxng $ FRML IXNE Xne = fXne*pxne $ FRML IXNF Xnf = fXnf*pxnf $ FRML IXNN Xnn = fXnn*pxnn $ FRML IXNB Xnb = fXnb*pxnb $ FRML IXNM Xnm = fXnm*pxnm $ FRML IXNT Xnt = fXnt*pxnt $ FRML IXNK Xnk = fXnk*pxnk $ FRML IXNQ Xnq = fXnq*pxnq $ FRML IXB Xb = fXb*pxb $ FRML IXQH Xqh = fXqh*pxqh $ FRML IXQS Xqs = fXqs*pxqs $ FRML IXQT Xqt = fXqt*pxqt $ FRML IXQF Xqf = fXqf*pxqf $ FRML IXQQ Xqq = fXqq*pxqq $ FRML IXH Xh = fXh*pxh $ FRML IX X = Xa+Xe+Xng+Xne+Xnf+Xnn+Xnb+Xnm+Xnt+Xnk+Xnq+Xb+Xqh +Xqs+Xqt+Xqf+Xqq+Xh+Xo $ () () () OFFENTLIGE SEKTOR () () FRML IfXoxc fXoxc = aob*fXb + aoqh*fXqh + aoqt*fXqt + aoqf*fXqf +aoqq*fXqq + aoo*fXo + aocs*fCs + aoesq*fEsq $ FRML IXoxc Xoxc = Xo - foco*pxo*kpnco $ FRML ICOI Coi = Coii+Coim $ () () () PRODUKTIVITET () () FRML Ikhn khn = 1000*fXn/(HQng+HQne+HQnf+HQnn+HQnb+HQnm+HQnt +HQnk+HQnq) $ FRML IQXa Qxa = fXa/Qa $ FRML IQXe Qxe = fXe/Qe $ FRML IQXng Qxng = fXng/Qng $ FRML IQXne Qxne = fXne/Qne $ FRML IQXnf Qxnf = fXnf/Qnf $ FRML IQXnn Qxnn = fXnn/Qnn $ FRML IQXnb Qxnb = fXnb/Qnb $ FRML IQXnm Qxnm = fXnm/Qnm $ FRML IQXnt Qxnt = fXnt/Qnt $ FRML IQXnk Qxnk = fXnk/Qnk $ FRML IQXnq Qxnq = fXnq/Qnq $ FRML IQXb Qxb = fXb/Qb $ FRML IQXqh Qxqh = fXqh/Qqh $ FRML IQXqs Qxqs = fXqs/QQS $ FRML IQXqt Qxqt = fXqt/Qqt $ FRML IQXqf Qxqf = fXqf/Qqf $ FRML IQXqq Qxqq = fXqq/Qqq $ FRML IQXh Qxh = fXh/Qh $ FRML IQXo QXo = fXo/Qo $ FRML IQxn Qxn = (fXng+fXne+fXnf+fXnn+fXnb+fXnm+fXnt+fXnk+fXnq)/ (Qng+Qne+Qnf+Qnn+Qnb+Qnm+Qnt+Qnk+Qnq) $ FRML IQxq Qxq = (fXqh+fXqs+fXqt+fXqf+fXqq)/ (Qqh+QQS+Qqt+Qqf+Qqq) $ FRML IkQYfa kqyfa = fYfa/HQa $ FRML IkQYfe kqyfe = fYfe/HQe $ FRML IkQYfng kqyfng = fYfng/HQng $ FRML IkQYfne kqyfne = fYfne/HQne $ FRML IkQYfnf kqyfnf = fYfnf/HQnf $ FRML IkQYfnn kqyfnn = fYfnn/HQnn $ FRML IkQYfnb kqyfnb = fYfnb/HQnb $ FRML IkQYfnm kqyfnm = fYfnm/HQnm $ FRML IkQYfnt kqyfnt = fYfnt/HQnt $ FRML IkQYfnk kqyfnk = fYfnk/HQnk $ FRML IkQYfnq kqyfnq = fYfnq/HQnq $ FRML IkQYfb kqyfb = fYfb/HQb $ FRML IkQYfqh kqyfqh = fYfqh/HQqh $ FRML IkQYfqs kqyfqs = fYfqs/HQQS $ FRML IkQYfqt kqyfqt = fYfqt/HQqt $ FRML IkQYfqf kqyfqf = fYfqf/HQqf $ FRML IkQYfqq kqyfqq = fYfqq/HQqq $ FRML IkQYfh kqyfh = fYfh/HQh $ FRML IkQYfo kqyfo = fYfo/HQo $ FRML IkQYfq kqyfq = (fYfqh+fYfqs+fYfqt+fYfqf+fYfqq)/ (HQqh +HQQS +HQqt +HQqf +HQqq) $ FRML IqfY qfy = fY/Q $ FRML IqfYf qfyf = fYf/Q $ () () BESK’FTIGELSE () FRML IQU Qu = Q-Qe-Qa $ FRML IQn Qn = Qng+Qne+Qnf+Qnn+Qnb+Qnm+Qnt+Qnk+Qnq $ FRML IQn Qwn = Qwng+Qwne+Qwnf+Qwnn+Qwnb+Qwnm+Qwnt +Qwnk+Qwnq$ FRML IQn Qsn = Qsng+Qsne+Qsnf+Qsnn+Qsnb+Qsnm+Qsnt +Qsnk+Qsnq$ FRML IQq Qq = Qqh+Qqs+Qqt+Qqf+Qqq$ FRML IQwq Qwq = Qwqs+Qwqh+Qwqq+Qwqt+Qwqf$ FRML IQSq Qsq = Qq-Qwq$ FRML IQSU Qsu = Q-Qw-Qsa$ () () () ARBEJDSLSHED () () FRML IUlfh Ulfh = Ulf - Ulfd $ FRML IUlfm Ulfm = Ulf - Ulfu $ FRML IUli Uli = Ul - Ulf $ FRML Ibula bula = 100*(Ul/Ua) $ FRML Ibulw bulw = 100*(Ul/Uw) $ () () () LNSUMMER OG LNKVOTER () () FRML IYwn Ywn = Ywng+Ywne+Ywnf+Ywnn+Ywnb+Ywnm+Ywnt+Ywnk+Ywnq $ FRML IYwq Ywq = Ywqh+Ywqs+Ywqt+Ywqf+Ywqq $ FRML Ibyw byw = Yw/Yf $ FRML Ibywn bywn = (Ywng+Ywne+Ywnf+Ywnn+Ywnb+Ywnm+Ywnt+Ywnk+Ywnq) /(Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq) $ FRML Ibywq bywq = (Ywqh+Ywqs+Ywqt+Ywqf+Ywqq) /(Yfqh+Yfqs+Yfqt+Yfqf+Yfqq) $ FRML Ibywa bywa = Ywa/Yfa $ FRML Ibywe bywe = Ywe/Yfe $ FRML Ibywng bywng = Ywng/Yfng $ FRML Ibywne bywne = Ywne/Yfne $ FRML Ibywnf bywnf = Ywnf/Yfnf $ FRML Ibywnn bywnn = Ywnn/Yfnn $ FRML Ibywnb bywnb = Ywnb/Yfnb $ FRML Ibywnm bywnm = Ywnm/Yfnm $ FRML Ibywnt bywnt = Ywnt/Yfnt $ FRML Ibywnk bywnk = Ywnk/Yfnk $ FRML Ibywnq bywnq = Ywnq/Yfnq $ FRML Ibywb bywb = Ywb/Yfb $ FRML Ibywqh bywqh = Ywqh/Yfqh $ FRML Ibywqs bywqs = Ywqs/Yfqs $ FRML Ibywqt bywqt = Ywqt/Yfqt $ FRML Ibywqf bywqf = Ywqf/Yfqf $ FRML Ibywqq bywqq = Ywqq/Yfqq $ FRML Ibywh bywh = Ywh/Yfh $ FRML Ibywo bywo = Ywo/Yfo $ FRML Ipyfn pyfn = (Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq)/fYfn $ FRML Ikqyfn kqyfn = fYfn/(HQng+HQne+HQnf+HQnn+HQnb+HQnm+HQnt+HQnk+HQnq) $ () () () TRANSFERERINGER () FRML ITYr Tyr = Tyrr + Tyk $ FRML ITono1 Tono1 = Tono(-1) $ FRML ItTYpl ttypl = 1000*Typ/(Ufp+Ufo) $ FRML ItTYdl ttydl = Tyd/(Ulfhk*.001) $ FRML ItYdY tydy = 100*Tyd/Y $ FRML ItYpsY typsy = 100*Typs/Y $ () () () SKATTER () () FRML ISigcp Sigcp = Sigc - btgo*tg*pco*fCo/(1+btgo*tg) $ FRML ISigf Sigf = btgf*tg*pcf*fCf/(1+btgf*tg) $ FRML ISign Sign = btgn*tg*pcn*fCn/(1+btgn*tg) $ FRML ISigi Sigi = btgi*tg*pci*fCi/(1+btgi*tg) $ FRML ISige Sige = btge*tg*pce*fCe/(1+btge*tg) $ FRML ISigg Sigg = btgg*tg*pcg*fCg/(1+btgg*tg) $ FRML ISigv Sigv = btgv*tg*pcv*fCv/(1+btgv*tg) $ FRML ISigh Sigh = btgh*tg*pch*fCh/(1+btgh*tg) $ FRML ISigk Sigk = btgk*tg*pck*fCk/(1+btgk*tg) $ FRML ISigs Sigs = btgs*tg*pcs*fCs/(1+btgs*tg) $ FRML ISigO Sigo = btgo*tg*pco*fCo/(1+btgo*tg) $ FRML ISigb Sigb = btgb*tg*pcb*fCb/((1+trb)*(1+btgb*tg)) $ FRML ISix Six = Sigx + Sipx + Siq $ FRML ISigip Sigip = btgimp*tg*pimp1*fImp1/((1+trimp)*(1+btgimp*tg)) +btgibp*tg*pibp1*fIbp1/(1+btgibp*tg) $ FRML ISigPB Sigibp = btgibp*tg*pibp1*fIbp1/(1+btgibp*tg) $ FRML ISigpm Sigimp = btgimp*tg*pimp1*fImp1/((1+trimp)*(1+btgimp*tg)) $ FRML ISigOB Sigibo = btgibo*tg*pibo1*fIbo1/(1+btgibo*tg) $ FRML ISigOM Sigimo = btgimo*tg*pimo1*fImo1/(1+btgimo*tg) $ FRML ISigibh Sigibh = btgibh*tg*pibh*fIbh/(1+btgibh*tg) $ FRML ISigL Sigil = btgil*tg*pil*fIl/(1+btgil*tg) $ FRML ISicp Sicp = tpf*fCf + tpn*fCn + tpi*fCi +tpe*fCe + tpg*fCg + tpb*fCb +tpv*fCv + tph*fCh +tpk*fCk + tps*fCs + trb*fCb*pcb/(1+trb) +Sigcp $ FRML ISipf Sipf = tpf*fCf $ FRML ISipn Sipn = tpn*fCn $ FRML ISipi Sipi = tpi*fCi $ FRML ISipe Sipe = tpe*fCe $ FRML ISipg Sipg = tpg*fCg $ FRML ISipb Sipb = tpb*fCb $ FRML ISipv Sipv = tpv*fCv $ FRML ISiph Siph = tph*fCh $ FRML ISipk Sipk = tpk*fCk $ FRML ISips Sips = tps*fCs $ FRML ISirb Sirb = trb*fCb*pcb/(1+trb) $ FRML ISipip Sipip = tpibp*fIbp1 + tpimp*fImp1 $ FRML ISipibp Sipibp = tpibp*fIbp1 $ FRML ISipimp Sipimp = tpimp*fImp1 $ FRML ISipio Sipio = tpibo*fIbo1 + tpimo*fImo1 $ FRML ISipOB Sipibo = tpibo*fIbo1 $ FRML ISipOM Sipimo = tpimo*fImo1 $ FRML ISipibh Sipibh = tpibh*fIbh $ FRML ISipL Sipil = tpil*fIl $ FRML ISirpm Sirimp = trimp*fImp1*pimp1/(1+trimp) $ FRML ISixie Sixie = Sipx+tpibo*fIbo1+tpimo*fImo1+tpibh*fIbh+tpibp*fIbp1 +tpimp*fImp1+tpil*fIl+trimp*fImp1*pimp1/(1+trimp) +Sigx+Sigi1+Siq+Sipe0+Sipe7y $ FRML ISipVea Sipvea = tvea*fVea $ FRML ISipVee Sipvee = tvee*fVee $ FRML ISipVeng Sipveng = tveng*fVeng $ FRML ISipVene Sipvene = tvene*fVene $ FRML ISipVenf Sipvenf = tvenf*fVenf $ FRML ISipVenn Sipvenn = tvenn*fVenn $ FRML ISipVenb Sipvenb = tvenb*fVenb $ FRML ISipVenm Sipvenm = tvenm*fVenm $ FRML ISipVent Sipvent = tvent*fVent $ FRML ISipVenk Sipvenk = tvenk*fVenk $ FRML ISipVenq Sipvenq = tvenq*fVenq $ FRML ISipVeb Sipveb = tveb*fVeb $ FRML ISipVeqh Sipveqh = tveqh*fVeqh $ FRML ISipVeqs Sipveqs = tveqs*fVeqs $ FRML ISipVeqt Sipveqt = tveqt*fVeqt $ FRML ISipVeqf Sipveqf = tveqf*fVeqf $ FRML ISipVeqq Sipveqq = tveqq*fVeqq $ FRML ISipVeh Sipveh = tveh*fVeh $ FRML ISipVeo Sipveo = tveo*fVeo $ FRML ISipVma Sipvma = tvma*fVma $ FRML ISipVme Sipvme = tvme*fVme $ FRML ISipVmng Sipvmng = tvmng*fVmng $ FRML ISipVmne Sipvmne = tvmne*fVmne $ FRML ISipVmnf Sipvmnf = tvmnf*fVmnf $ FRML ISipVmnn Sipvmnn = tvmnn*fVmnn $ FRML ISipVmnb Sipvmnb = tvmnb*fVmnb $ FRML ISipVmnm Sipvmnm = tvmnm*fVmnm $ FRML ISipVmnt Sipvmnt = tvmnt*fVmnt $ FRML ISipVmnk Sipvmnk = tvmnk*fVmnk $ FRML ISipVmnq Sipvmnq = tvmnq*fVmnq $ FRML ISipVmb Sipvmb = tvmb*fVmb $ FRML ISipVmqh Sipvmqh = tvmqh*fVmqh $ FRML ISipVmqs Sipvmqs = tvmqs*fVmqs $ FRML ISipVmqt Sipvmqt = tvmqt*fVmqt $ FRML ISipVmqf Sipvmqf = tvmqf*fVmqf $ FRML ISipVmqq Sipvmqq = tvmqq*fVmqq $ FRML ISipVmh Sipvmh = tvmh*fVmh $ FRML ISipVmo Sipvmo = tvmo*fVmo $ FRML IbSia bsia = Si/(Yf+Ty) $ FRML IbSd bsd = Sd/(Yf+Ty) $ FRML IbSdI bsdi = (Sd+Si)/(Yf+Ty) $ FRML IbS bs = (S)/(Yf+Ty) $ FRML IbSdY bsdy = Sd/Y $ FRML IbSiY bsiy = Si/Y $ FRML IbSdIY bsdiy = (Sd+Si)/Y $ FRML IbSY bsy = (S)/Y $ FRML IbSdf bsdf = Sd/Yf $ FRML IbSif bsif = Si/Yf $ FRML IbSdIf bsdif = (Sd+Si)/Yf $ FRML IbSf bsf = (S)/Yf $ FRML IbSitr bsitr = (Si-Sipe0-Sipe7y)/(Y+M-E) $ FRML IbSicp bsicp = (tpf*fCf + tpn*fCn + tpi*fCi +tpe*fCe + tpg*fCg + tpb*fCb +tpv*fCv + tph*fCh +tpk*fCk + tps*fCs + trb*fCb*pcb/(1+trb) +Sigcp)/Cp $ FRML ISksi1 Sksi1 = Sksi(-1) $ FRML IkbSd kbsd = Sd/(S) $ FRML ISisUY Sisuy = 100*Sisu/Y $ FRML ISiafY Siafy = 100*Siaf/Y $ FRML ISdY Sdy = 100*Sd/Y $ FRML IYsy Ysy = 100*Ys/Y $ FRML IYspYd Yspy = 100*Ysp/Y $ FRML ItOPS1 Tops1 = ktops1*(Tphhli+Tphhki) $ FRML ISdaS Sdas = ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) $ FRML IYspRS Ysprs = kysprs1*(Yw+Yrr1) $ FRML IYLWS Ylws = (Safm + kylws*Yw) $ FRML IYLWS Yl3s = kyl3s1*(Yw+Yrr1) $ FRML IYLWS Ysrs1 = kysrs2*(Yw+Yrr1) $ FRML IWSDSBK Wsdsbk = Wbbzk(-1)*((kwpbu-kwpbu(-1) )/kwpbu(-1))*0.6 $ () () BRUTTONATIONALPRODUKT, BRUTTOV’RDITILV’KST () OG ANDRE INDKOMSTBEGREBER M.V. () FRML IFYST fYst = fY + fM $ FRML IYST Yst = (Y) + (M) $ FRML IYRT Yrt = Yf-Yw+Tipn $ FRML IYAB Yab = Yw+Ty $ FRML IYSAM Ysam = Yf + Ty $ FRML IYSAM1 Ysam1 = Yf+Ty+Tipn $ FRML IYSMPC Ysmpc = (Yf+Ty+Tipn)/pcp $ FRML IPY py = (Y)/fY $ FRML IPYST pyst = Yst/fYst $ FRML IENV Env = Ev - Mv $ FRML IENST Enst = Es + Et - Ms - Mt $ FRML IENVY Envy = 100*Env/Y $ FRML IENSTY Ensty = 100*Enst/Y $ FRML IENLY Enly = 100*Enl/Y $ FRML IYWY Ywy = 100*Yw/Y $ FRML IYRY Yry = 100*Yr/Y $ () () BIDRAG TIL BNP-V’KST () FRML IRFY RfY = (fY - fY(-1))/fY(-1) $ FRML IAFM afm = (fM(-1) - fM)/fY(-1) $ FRML IAFE afe = (fE - fE(-1))/fY(-1) $ FRML IAFCP afcp = (fCp - fCp(-1))/fY(-1) $ FRML IAFCO afco = (fCo - fCo(-1))/fY(-1) $ FRML IAFIP1 afip1 = (fIp1 - fIp1(-1))/fY(-1) $ FRML IAfIp1xh afifp1xh = (fIfp1xh - fIfp1xh(-1))/fY(-1) $ FRML IAFIO1 afio1 = (fIo1 - fIo1(-1))/fY(-1) $ FRML IAFIBH afibh = (fIbh - fIbh(-1))/fY(-1) $ FRML IAFIL afil = (fIl - fIl(-1))/fY(-1) $ () () ERHVERVSFORDELT BRUTTOV’RDITILV’KST I FASTE PRISER () FRML IFYFQ fYfq = fYfqh+fYfqs+fYfqt+fYfqf+fYfqq+fYfqi $ () () ERHVERVSFORDELT BRUTTOV’RDITILV’KST I RETS PRISER () FRML IYFN Yfn = Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq $ FRML IYFQ Yfq = Yfqh+Yfqs+Yfqt+Yfqf+Yfqq+Yfqi $ () () Sektorbalancer, samleposter () FRML ITaoi Taoi = Teur+Taeo+Tapo $ FRML ITaou Taou = Teuby+Teubr+Teubg+Taoe+Taop $ FRML ITkoi Tkoi = Sak+Tkeo+Tkpo $ FRML ITkou Tkou = Tkoe+Tkops+Tkoph $ FRML ITfkud Tfkud = Cok+Tiku-Sisuokk+Tykk+Takos+Taokp $ FRML ITfkid Tfkid = Ivok1+Tiki+Tikov+Tiokr+Siafok+Sdkk+Typrik +Taeok+Tapok+Taosk $ FRML ITfoud Taoos = 0.8*(Tasir+Safma+safme)*ktaoos $ FRML ITfoid Tasoo = (Tyd+Tysae+Typlg)*ktasoo $ FRML ITfoud Tfoud = Coo+Tifou-Sisuoo+Tyo+Taoos $ FRML ITfoid Tfoid = Ivoo1+Tifoi+Tioov+Saso-Sasr+Tasoo+Tapoo $ FRML ITaous Taous = Tasoo+Taosk+(Ty-Tykk-Tyo) +(Taop-Taokp)+(Taou-Taop) $ FRML ITfsud Tfsud = (Co-Cok-Coo)+Tisui+Tisuu+Sisuokk+Sisuoo-Sisuo+Taous $ FRML ITfsuk1 Tfsuk1 = Io1-Iok1-Ioo1+Tkoubi-Tkokubi-Tkooubi+Ilo1+Tkojr -Tkokjr $ FRML ITksu Tksu = Tkops-Tkopsk-Tkkosn+Tkoph-Tkophk+Tkpoon+Tkoe-Tkoek $ FRML ITfsuk Tfsuk = Tfsuk1+Tksu $ FRML ITaois Taois = Taoos+Takos+Tapo-Tapoo- Tapok+Teur+Taeo-Taeok $ FRML ITfsid Tfsid = Ivo1-Ivok1-Ivoo1+Tiov-Tikov-Tioov+Tisii+Tisiu+Tior -Tiokr+Siafo-Siafok+Sd-Sdkk+Sasr+Tbpho+Typri-Typrik +Taois $ FRML ITFPN Tfpn = Tfen-Tfon $ FRML ITPPSN Tfpsn = Tfpn-Tfphn $ FRML ITFFN Tffn = Tffpn+Tffon $ FRML ITFP1 Tfp1n = Tfpn-Tffpn $ FRML ICOY Coy = 100*Co/Y $ FRML IFOUY Tfouy = 100*Tfou/Y $ FRML IFOIY Tfoiy = 100*Tfoi/Y $ FRML ITIONY Tiony = 100*Tion/Y $ FRML ITIENY Tieny = 100*Tien/Y $ FRML ITFONY Tfony = 100*Tfon/Y $ FRML ITFSNY Tfsny = 100*Tfsn/Y $ FRML ITFKNY Tfkny = 100*Tfkn/Y $ FRML ITFFONY Tffony = 100*Tffon/Y $ FRML ITFENY Tfeny = 100*Tfen/Y $ FRML ITFPNY Tfpny = 100*Tfpn/Y $ FRML ITFPHNY Tfphny = 100*Tfphn/Y $ FRML ITFPSNY Tfpsny = 100*Tfpsn/Y $ () () () FINANSIELLE VARIABLER () () FRML IWNLNB Wnlnb = Wnlb-Wbdn-Wbdsn $ FRML IWFLPY Wflpy = 100*Wflp/Y $ FRML IWFBZY Wfbzy = 100*Wfbz/Y $ FRML IWNVFY Wnvfy = 100*Wnvf/Y $ FRML IWPMY Wpmy = 100*Wpm/Y $ FRML IWPNBZY Wpbnzy = 100*Wpbnz/Y $ FRML IBBZY Wbbzy = 100*Wbbz/Y $ FRML IWNLNBY Wnlnby = 100*Wnlnb/Y $ FRML IWZBGY Wzbgy = 100*Wzbg/Y $ FRML IIWNBZY Wnbzy = 100*Wnbz/Y $ () --------------------------------------------------------------------------------- () () AFLEDTE VARIABLER FRA FAKTORBLOKKEN () () K-UNDERSTREG I DE 12 TREDJE-GENERATIONSERHVERV FRML IFKMaM fKmam = 0.34046**(0.51387/(1-0.51387))*(1/dtfkma) *((fXa-hostkor)/65741.89638/1.18142)*111924.00000 $ FRML IFKMnfM fKmnfm = 0.34173**(0.30062/(1-0.30062))*(1/dtfkmnf) *(fXnf/104743.64063/1.03529)*46551.39453 $ FRML IFKMnnM fKmnnm = 0.42423**(0.30040/(1-0.30040))*(1/dtfkmnn) *(fXnn/12090.46973/1.03891)*5373.60547 $ FRML IFKMnbM fKmnbm = 0.23548**(0.43174/(1-0.43174))*(1/dtfkmnb) *(fXnb/27016.24805/0.94871)*23086.37500 $ FRML IFKMnmM fKmnmm = 0.28420**(0.42444/(1-0.42444))*(1/dtfkmnm) *(fXnm/131459.39063/1.00569)*70994.00000 $ FRML IFKMntM fKmntm = 0.39050**(0.46355/(1-0.46355))*(1/dtfkmnt) *(fXnt/17040.36719/0.95843)*4849.00000 $ FRML IFKMnkM fKmnkm = 0.36555**(0.35734/(1-0.35734))*(1/dtfkmnk) *(fXnk/55882.23828/1.08005)*51414.18750 $ FRML IFKMnqM fKmnqm = 0.48006**(0.18608/(1-0.18608))*(1/dtfkmnq) *(fXnq/75197.39844/1.00318)*52691.21094 $ FRML IFKMbM fKmbm = 0.28351**(0.20010/(1-0.20010))*(1/dtfkmb) *(fXb/114577.46094/1.02587)*39866.00000 $ FRML IFKMqhM fKmqhm = 0.20742**(0.15918/(1-0.15918))*(1/dtfkmqh) *(fXqh/185435.45313/1.01199)*140579.34375 $ FRML IFKMqtM fKmqtm = 0.58488**(0.21492/(1-0.21492))*(1/dtfkmqt) *(fXqt/106955.57031/1.00781)*114613.00000 $ FRML IFKMqqM fKmqqm = 0.35744**(0.40000/(1-0.40000))*(1/dtfkmqq) *(fXqq/254401.78125/0.95070)*158691.59375 $ () () INVESTERINGER MASKINER, lØBENDE PRISER () FRML IIma Ima = fIma*pima $ FRML IIme Ime = fIme*pime $ FRML IImng Imng = fImng*pimng $ FRML IImne Imne = fImne*pimne $ FRML IImnf Imnf = fImnf*pimnf $ FRML IImnn Imnn = fImnn*pimnn $ FRML IImnb Imnb = fImnb*pimnb $ FRML IImnm Imnm = fImnm*pimnm $ FRML IImnt Imnt = fImnt*pimnt $ FRML IImnk Imnk = fImnk*pimnk $ FRML IImnq Imnq = fImnq*pimnq $ FRML IImb Imb = fImb*pimb $ FRML IImqh Imqh = fImqh*pimqh $ FRML IImqs Imqs = fImqs*pimqs $ FRML IImqt Imqt = fImqt*pimqt $ FRML IImqf Imqf = fImqf*pimqf $ FRML IImqq Imqq = fImqq*pimqq $ FRML IImh Imh = fImh*pimh $ FRML IImo Imo = fImo*pimo $ () () INVESTERINGER BYGNINGER, lØBENDE PRISER () FRML IIba Iba = fIba*piba $ FRML IIbe Ibe = fIbe*pibe $ FRML IIbng Ibng = fIbng*pibng $ FRML IIbne Ibne = fIbne*pibne $ FRML IIbnf Ibnf = fIbnf*pibnf $ FRML IIbnn Ibnn = fIbnn*pibnn $ FRML IIbnb Ibnb = fIbnb*pibnb $ FRML IIbnm Ibnm = fIbnm*pibnm $ FRML IIbnt Ibnt = fIbnt*pibnt $ FRML IIbnk Ibnk = fIbnk*pibnk $ FRML IIbnq Ibnq = fIbnq*pibnq $ FRML IIbb Ibb = fIbb*pibb $ FRML IIbqh Ibqh = fIbqh*pibqh $ FRML IIbqs Ibqs = fIbqs*pibqs $ FRML IIbqt Ibqt = fIbqt*pibqt $ FRML IIbqf Ibqf = fIbqf*pibqf $ FRML IIbqq Ibqq = fIbqq*pibqq $ FRML IIbh Ibh = fIbh*pibh $ FRML IIbo Ibo = fIbo*pibo $ () () MATERIALEFORBRUG, lØBENDE PRISER () FRML IVma Vma = fVma*pvma $ FRML IVme Vme = fVme*pvme $ FRML IVmng Vmng = fVmng*pvmng $ FRML IVmne Vmne = fVmne*pvmne $ FRML IVmnf Vmnf = fVmnf*pvmnf $ FRML IVmnn Vmnn = fVmnn*pvmnn $ FRML IVmnb Vmnb = fVmnb*pvmnb $ FRML IVmnm Vmnm = fVmnm*pvmnm $ FRML IVmnt Vmnt = fVmnt*pvmnt $ FRML IVmnk Vmnk = fVmnk*pvmnk $ FRML IVmnq Vmnq = fVmnq*pvmnq $ FRML IVmb Vmb = fVmb*pvmb $ FRML IVmqh Vmqh = fVmqh*pvmqh $ FRML IVmqs Vmqs = fVmqs*pvmqs $ FRML IVmqt Vmqt = fVmqt*pvmqt $ FRML IVmqf Vmqf = fVmqf*pvmqf $ FRML IVmqq Vmqq = fVmqq*pvmqq $ FRML IVmh Vmh = fVmh*pvmh $ FRML IVmo Vmo = fVmo*pvmo $ () () ENERGIFORBRUG, lØBENDE PRISER () FRML IVea Vea = fVea*pvea $ FRML IVee Vee = fVee*pvee $ FRML IVeng Veng = fVeng*pveng $ FRML IVene Vene = fVene*pvene $ FRML IVenf Venf = fVenf*pvenf $ FRML IVenn Venn = fVenn*pvenn $ FRML IVenb Venb = fVenb*pvenb $ FRML IVenm Venm = fVenm*pvenm $ FRML IVent Vent = fVent*pvent $ FRML IVenk Venk = fVenk*pvenk $ FRML IVenq Venq = fVenq*pvenq $ FRML IVeb Veb = fVeb*pveb $ FRML IVeqh Veqh = fVeqh*pveqh $ FRML IVeqs Veqs = fVeqs*pveqs $ FRML IVeqt Veqt = fVeqt*pveqt $ FRML IVeqf Veqf = fVeqf*pveqf $ FRML IVeqq Veqq = fVeqq*pveqq $ FRML IVeh Veh = fVeh*pveh $ FRML IVeo Veo = fVeo*pveo $ () () SÆRLIGE ENERGIFORBRUG-AGGREGATER () () Endelig energianvendelse, erhverv FRML IfVex fVex = fVea+fVenf+fVenn+fVenb+fVenm+fVent+fVenk+fVenq +fVeb+fVeqh+fVeqs+fVeqt+fVeqf+fVeqq+fVeh+fVeo $ FRML Idtfvex dtfvex = (dtfvea*fVea+dtfvenf*fVenf+dtfvenn*fVenn+dtfvenb*fVenb +dtfvenm*fVenm+dtfvent*fVent+dtfvenk*fVenk+dtfvenq*fVenq +dtfveb*fVeb+dtfveqh*fVeqh+dtfveqs*fVeqs+dtfveqt*fVeqt +dtfveqf*fVeqf+dtfveqq*fVeqq+dtfveh*fVeh+dtfveo*fVeo) /fVex $ FRML IfVec fVec = (aece+angce+anece+am3kce+am3qce)*fCe + (angcg+am3qcg)*fCg $ () Endelig energianvendelse, erhverv + husholdninger FRML IfVedk fVedk = fVex + fVec $ () Egentligt estimerede erhverv FRML IfVex1 fVex1 = fVea+fVenf+fVenn+fVenb+fVenm+fVent+fVenk+fVenq +fVeb+fVeqh+fVeqt+fVeqf+fVeqq+fVeo $ FRML IfVexw1 fVexw1 = fVeaw+fVenfw+fVennw+fVenbw+fVenmw+fVentw+fVenkw+fVenqw +fVebw+fVeqhw+fVeqtw+fVeqfw+fVeqqw+fVeow $ FRML Idtfvex1 dtfvex1 = (dtfvea*fVea+dtfvenf*fVenf+dtfvenn*fVenn+dtfvenb*fVenb +dtfvenm*fVenm+dtfvent*fVent+dtfvenk*fVenk+dtfvenq*fVenq +dtfveb*fVeb+dtfveqh*fVeqh+dtfveqt*fVeqt +dtfveqf*fVeqf+dtfveqq*fVeqq+dtfveo*fVeo) /fVex1 $ FRML Ipklex1 pklex1 = (pklea*fVea+pklenf*fVenf+pklenn*fVenn+pklenb*fVenb +pklenm*fVenm+pklent*fVent+pklenk*fVenk+pklenq*fVenq +pkleb*fVeb+pkleqh*fVeqh+pkleqt*fVeqt +pkleqf*fVeqf+pkleqq*fVeqq+pkleo*fVeo) /fVex1 $ () Omkostningsudtryk i relativpris, pwkle FRML Ipwklea pwklea = uima *fKma +la *HQa +pvea *fVea $ FRML Ipwklenf pwklenf = uimnf*fKmnf+lnf*HQnf+pvenf*fVenf $ FRML Ipwklenn pwklenn = uimnn*fKmnn+lnn*HQnn+pvenn*fVenn $ FRML Ipwklenb pwklenb = uimnb*fKmnb+lnb*HQnb+pvenb*fVenb $ FRML Ipwklenm pwklenm = uimnm*fKmnm+lnm*HQnm+pvenm*fVenm $ FRML Ipwklent pwklent = uimnt*fKmnt+lnt*HQnt+pvent*fVent $ FRML Ipwklenk pwklenk = uimnk*fKmnk+lnk*HQnk+pvenk*fVenk $ FRML Ipwklenq pwklenq = uimnq*fKmnq+lnq*HQnq+pvenq*fVenq $ FRML Ipwkleb pwkleb = uimb *fKmb +lb *HQb +pveb *fVeb $ FRML Ipwkleqh pwkleqh = uimqh*fKmqh+lqh*HQqh+pveqh*fVeqh $ FRML Ipwkleqt pwkleqt = uimqt*fKmqt+lqt*HQqt+pveqt*fVeqt $ FRML Ipwkleqf pwkleqf = uimqf*fKmqf+lqf*HQqf+pveqf*fVeqf $ FRML Ipwkleqq pwkleqq = uimqq*fKmqq+lqq*HQqq+pveqq*fVeqq $ FRML Ipwkleo pwkleo = uimo *fKmo +lo *HQo +pveo *fVeo $ () --------------------------------------------------------------------------------- () () FAKTORBLOK-AGGREGATER () () N = 9 FREMSTILLINGSERHVERV () Q = 5 SERVICEERHVERV () P = 18 PRIVATE ERHVERV (BYGNINGER DOG UDEN H-ERHVERV) () 3 = 12 TREDJE-GENERATIONSERHVERV () 2 = 4 ANDEN-GENERATIONSERHVERV () 23 = 16 ANDEN- OG TREDJE-GENERATIONSERHVERV () () MASKINER () fKm hjælpevariabler FRML IFKM3M fKm3m = fKmam + fKmqqm + fKmqhm + fKmnmm + fKmqtm + fKmbm + fKmnqm + fKmnfm + fKmnbm + fKmnkm + fKmntm + fKmnnm $ FRML IFKM3K fKm3k = fKmak + fKmqqk + fKmqhk + fKmnmk + fKmqtk + fKmbk + fKmnqk + fKmnfk + fKmnbk + fKmnkk + fKmntk + fKmnnk $ () fKm (kapitalmængde) FRML IfKmn fKmn = fKmng+fKmne+fKmnf+fKmnn+fKmnb+fKmnm+fKmnt+fKmnk+fKmnq $ FRML IfKmq fKmq = fKmqh+fKmqs+fKmqt+fKmqf+fKmqq $ FRML IfKmp fKmp = fKma+fKme+fKmng+fKmne+fKmnf+fKmnn+fKmnb+fKmnm+fKmnt +fKmnk+fKmnq+fKmb+fKmqh+fKmqs+fKmqt+fKmqf+fKmqq+fKmh $ FRML IfKm2 fKm2 = fKmng+fKmne+fKmqs+fKmqf $ FRML IfKm3 fKm3 = fKma+fKmnf+fKmnn+fKmnb+fKmnm+fKmnt+fKmnk+fKmnq+fKmb +fKmqh+fKmqt+fKmqq $ FRML IfKm23 fKm23 = fKm2 + fKm3 $ FRML IfKm fKm = fKmp + fKmo $ () fKnm (kapitalværdi) FRML IfKnmn fKnmn = fKnmng+fKnmne+fKnmnf+fKnmnn+fKnmnb+fKnmnm+fKnmnt +fKnmnk+fKnmnq $ FRML IfKnmq fKnmq = fKnmqh+fKnmqs+fKnmqt+fKnmqf+fKnmqq $ FRML IfKnm2 fKnm2 = fKnmng+fKnmne+fKnmqs+fKnmqf $ FRML IfKnm3 fKnm3 = fKnma+fKnmnf+fKnmnn+fKnmnb+fKnmnm+fKnmnt+fKnmnk+fKnmnq+fKnmb +fKnmqh+fKnmqt+fKnmqq $ FRML IfKnm23 fKnm23 = fKnm2 + fKnm3 $ FRML IfKnm fKnm = fKnmp + fKnmo $ () fIm (bruttoinvesteringer) FRML IfImn fImn = fImng+fImne+fImnf+fImnn+fImnb+fImnm+fImnt+fImnk+fImnq $ FRML IfImq fImq = fImqh+fImqs+fImqt+fImqf+fImqq $ FRML IfIm2 fIm2 = fImng+fImne+fImqs+fImqf $ FRML IfIm3 fIm3 = fIma+fImnf+fImnn+fImnb+fImnm+fImnt+fImnk+fImnq+fImb +fImqh+fImqt+fImqq $ FRML IfIm23 fIm23 = fIm2 + fIm3 $ () Im FRML IImn Imn = Imng+Imne+Imnf+Imnn+Imnb+Imnm+Imnt+Imnk+Imnq $ FRML IImq Imq = Imqh+Imqs+Imqt+Imqf+Imqq $ FRML IImp Imp = Ima+Ime+Imng+Imne+Imnf+Imnn+Imnb+Imnm+Imnt+Imnk+Imnq+Imb +Imqh+Imqs+Imqt+Imqf+Imqq+Imh $ FRML IIm2 Im2 = Imng+Imne+Imqs+Imqf $ FRML IIm3 Im3 = Ima+Imnf+Imnn+Imnb+Imnm+Imnt+Imnk+Imnq+Imb+Imqh+Imqt+Imqq $ FRML IIm23 Im23 = Im2 + Im3 $ () pim FRML IPIM pim = (pimp1*fImp1 + pimo1*fImo1)/fIm $ FRML Ipimn pimn = Imn/fImn $ FRML Ipimq pimq = Imq/fImq $ FRML Ipim2 pim2 = Im2/fIm2 $ FRML Ipim3 pim3 = Im3/fIm3 $ FRML Ipim2 pim23 = Im23/fIm23 $ () fIvm (afgange) FRML IfIvmn fIvmn = bfivmng*fKmng(-1) + bfivmne*fKmne(-1) + bfivmnf*fKmnf(-1) + bfivmnn*fKmnn(-1) + bfivmnb*fKmnb(-1) + bfivmnm*fKmnm(-1) + bfivmnt*fKmnt(-1) + bfivmnk*fKmnk(-1) + bfivmnq*fKmnq(-1) $ FRML IfIvmq fIvmq = bfivmqh*fKmqh(-1) + bfivmqs*fKmqs(-1) + bfivmqt*fKmqt(-1) + bfivmqf*fKmqf(-1) + bfivmqq*fKmqq(-1) $ FRML IfIvm2 fIvm2 = bfivmng*fKmng(-1) + bfivmne*fKmne(-1) + bfivmqs*fKmqs(-1) + bfivmqf*fKmqf(-1) $ FRML IfIvm3 fIvm3 = bfivma*fKma(-1) + bfivmb*fKmb(-1) + bfivmnf*fKmnf(-1) + bfivmnn*fKmnn(-1) + bfivmnb*fKmnb(-1) + bfivmnm*fKmnm(-1) + bfivmnt*fKmnt(-1) + bfivmnk*fKmnk(-1) + bfivmnq*fKmnq(-1) + bfivmqh*fKmqh(-1) + bfivmqt*fKmqt(-1) + bfivmqq*fKmqq(-1) $ FRML IfIvm23 fIvm23 = fIvm2 + fIvm3 $ () fIn (nettoinvesteringer) FRML IfInmn fInmn = fKnmn - fKnmn(-1) $ FRML IfInmq fInmq = fKnmq - fKnmq(-1) $ FRML IfInmp fInmp = fKnmp - fKnmp(-1) $ FRML IfInm2 fInm2 = fKnm2 - fKnm2(-1) $ FRML IfInm3 fInm3 = fKnm3 - fKnm3(-1) $ FRML IfInm23 fInm23 = fKnm23 - fKnm23(-1) $ FRML IFINM fInm = fKnm - fKnm(-1) $ () uim (usercost) FRML Iuimn uimn = (uimng*fKmng+uimne*fKmne+uimnf*fKmnf+uimnn*fKmnn +uimnb*fKmnb+uimnm*fKmnm+uimnt*fKmnt+uimnk*fKmnk +uimnq*fKmnq)/fKmn $ FRML Iuimq uimq = (uimqh*fKmqh+uimqs*fKmqs+uimqt*fKmqt+uimqf*fKmqf +uimqq*fKmqq)/fKmq $ FRML Iuimp uimp = (uima*fKma+uime*fKme+uimng*fKmng+uimne*fKmne +uimnf*fKmnf+uimnn*fKmnn+uimnb*fKmnb+uimnm*fKmnm +uimnt*fKmnt+uimnk*fKmnk+uimnq*fKmnq+uimb*fKmb +uimqh*fKmqh+uimqs*fKmqs+uimqt*fKmqt+uimqf*fKmqf +uimqq*fKmqq+uimh*fKmh)/fKmp $ FRML Iuim2 uim2 = (uimng*fKmng+uimne*fKmne+uimqs*fKmqs+uimqf*fKmqf) /fKm2 $ FRML Iuim3 uim3 = (uima*fKma+uimnf*fKmnf+uimnn*fKmnn+uimnb*fKmnb +uimnm*fKmnm+uimnt*fKmnt+uimnk*fKmnk+uimnq*fKmnq +uimb*fKmb+uimqh*fKmqh+uimqt*fKmqt+uimqq*fKmqq)/fKm3 $ FRML Iuim23 uim23 = (uima*fKma+uimng*fKmng+uimne*fKmne+uimnf*fKmnf +uimnn*fKmnn+uimnb*fKmnb+uimnm*fKmnm+uimnt*fKmnt +uimnk*fKmnk+uimnq*fKmnq+uimb*fKmb+uimqh*fKmqh +uimqs*fKmqs+uimqt*fKmqt+uimqf*fKmqf+uimqq*fKmqq) /fKm23 $ FRML Iuim uim = (uima*fKma+uime*fKme+uimng*fKmng+uimne*fKmne +uimnf*fKmnf+uimnn*fKmnn+uimnb*fKmnb+uimnm*fKmnm +uimnt*fKmnt+uimnk*fKmnk+uimnq*fKmnq+uimb*fKmb +uimqh*fKmqh+uimqs*fKmqs+uimqt*fKmqt+uimqf*fKmqf +uimqq*fKmqq+uimh*fKmh+uimo*fKmo)/fKm $ () dtfkm (effektivitet) FRML Idtfkmn dtfkmn = (dtfkmng*fKmng+dtfkmne*fKmne+dtfkmnf*fKmnf +dtfkmnn*fKmnn+dtfkmnb*fKmnb+dtfkmnm*fKmnm +dtfkmnt*fKmnt+dtfkmnk*fKmnk+dtfkmnq*fKmnq)/fKmn $ FRML Idtfkmq dtfkmq = (dtfkmqh*fKmqh+dtfkmqs*fKmqs+dtfkmqt*fKmqt +dtfkmqf*fKmqf+dtfkmqq*fKmqq)/fKmq $ FRML Idtfkmp dtfkmp = (dtfkma*fKma+dtfkme*fKme+dtfkmng*fKmng +dtfkmne*fKmne+dtfkmnf*fKmnf+dtfkmnn*fKmnn +dtfkmnb*fKmnb+dtfkmnm*fKmnm+dtfkmnt*fKmnt +dtfkmnk*fKmnk+dtfkmnq*fKmnq+dtfkmb*fKmb +dtfkmqh*fKmqh+dtfkmqs*fKmqs+dtfkmqt*fKmqt +dtfkmqf*fKmqf+dtfkmqq*fKmqq+dtfkmh*fKmh)/fKmp $ FRML Idtfkm2 dtfkm2 = (dtfkmng*fKmng+dtfkmne*fKmne+dtfkmqs*fKmqs +dtfkmqf*fKmqf)/fKm2 $ FRML Idtfkm3 dtfkm3 = (dtfkma*fKma+dtfkmnf*fKmnf+dtfkmnn*fKmnn +dtfkmnb*fKmnb+dtfkmnm*fKmnm+dtfkmnt*fKmnt +dtfkmnk*fKmnk+dtfkmnq*fKmnq+dtfkmb*fKmb +dtfkmqh*fKmqh+dtfkmqt*fKmqt+dtfkmqq*fKmqq)/fKm3 $ FRML Idtfkm23 dtfkm23 = (dtfkma*fKma+dtfkmng*fKmng+dtfkmne*fKmne +dtfkmnf*fKmnf+dtfkmnn*fKmnn+dtfkmnb*fKmnb +dtfkmnm*fKmnm+dtfkmnt*fKmnt+dtfkmnk*fKmnk +dtfkmnq*fKmnq+dtfkmb*fKmb+dtfkmqh*fKmqh +dtfkmqs*fKmqs+dtfkmqt*fKmqt+dtfkmqf*fKmqf +dtfkmqq*fKmqq)/fKm23 $ () fKmw (ønsket kapital) FRML IfKmnw fKmnw = fKmngw+fKmnew+fKmnfw+fKmnnw+fKmnbw+fKmnmw+fKmntw +fKmnkw+fKmnqw $ FRML IfKmqw fKmqw = fKmqhw+fKmqsw+fKmqtw+fKmqfw+fKmqqw $ FRML IfKm2w fKm2w = fKmngw+fKmnew+fKmqsw+fKmqfw $ FRML IfKm3w fKm3w = fKmaw+fKmnfw+fKmnnw+fKmnbw+fKmnmw+fKmntw+fKmnkw +fKmnqw+fKmbw+fKmqhw+fKmqtw+fKmqqw $ FRML IfKm23w fKm23w = fKm2w + fKm3w $ () rho_Km (autokorrelationsparameter) FRML Irofkm3 rofkm3 = (rofkma*fKma+rofkmnf*fKmnf+rofkmnn*fKmnn+rofkmnb*fKmnb+rofkmnm*fKmnm +rofkmnt*fKmnt+rofkmnk*fKmnk+rofkmnq*fKmnq+rofkmb*fKmb+rofkmqh*fKmqh +rofkmqt*fKmqt+rofkmqq*fKmqq)/fKm3 $ () BYGNINGER () fKb (kapitalmængde) FRML IfKbn fKbn = fKbng+fKbne+fKbnf+fKbnn+fKbnb+fKbnm+fKbnt+fKbnk+fKbnq $ FRML IfKbq fKbq = fKbqh+fKbqs+fKbqt+fKbqf+fKbqq $ FRML IfKbp fKbp = fKba+fKbe+fKbng+fKbne+fKbnf+fKbnn+fKbnb+fKbnm+fKbnt +fKbnk+fKbnq+fKbb+fKbqh+fKbqs+fKbqt+fKbqf+fKbqq $ FRML IfKb2 fKb2 = fKbng+fKbne+fKbqs+fKbqf $ FRML IfKb3 fKb3 = fKba+fKbnf+fKbnn+fKbnb+fKbnm+fKbnt+fKbnk+fKbnq+fKbb +fKbqh+fKbqt+fKbqq $ FRML IfKb23 fKb23 = fKb2 + fKb3 $ FRML IfKb fKb = fKbp + fKbh + fKbo $ () fKnb (kapitalværdi) FRML IfKnb fKnb = fKnba+fKnbe+fKnbng+fKnbne+fKnbnf+fKnbnn+fKnbnb+fKnbnm+fKnbnt +fKnbnk+fKnbnq+fKnbb+fKnbqh+fKnbqs+fKnbqt+fKnbqf+fKnbqq +fKnbh+fKnbo $ () fIb (bruttoinvestering) FRML IfIbn fIbn = fIbng+fIbne+fIbnf+fIbnn+fIbnb+fIbnm+fIbnt+fIbnk+fIbnq $ FRML IfIbq fIbq = fIbqh+fIbqs+fIbqt+fIbqf+fIbqq $ FRML IfIb3 fIb3 = fIba+fIbnf+fIbnn+fIbnb+fIbnm+fIbnt+fIbnk+fIbnq+fIbb +fIbqh+fIbqt+fIbqq $ FRML IfIb2 fIb2 = fIbng+fIbne+fIbqs+fIbqf $ FRML IfIb23 fIb23 = fIb2 + fIb3 $ () Ib FRML IIbn Ibn = Ibng+Ibne+Ibnf+Ibnn+Ibnb+Ibnm+Ibnt+Ibnk+Ibnq $ FRML IIbq Ibq = Ibqh+Ibqs+Ibqt+Ibqf+Ibqq $ FRML IIbp Ibp = Iba+Ibe+Ibng+Ibne+Ibnf+Ibnn+Ibnb+Ibnm+Ibnt+Ibnk+Ibnq+Ibb+Ibqh +Ibqs+Ibqt+Ibqf+Ibqq $ FRML IIb2 Ib2 = Ibng+Ibne+Ibqs+Ibqf $ FRML IIb3 Ib3 = Iba+Ibnf+Ibnn+Ibnb+Ibnm+Ibnt+Ibnk+Ibnq+Ibb+Ibqh+Ibqt+Ibqq $ FRML IIb23 Ib23 = Iba+Ibng+Ibne+Ibnf+Ibnn+Ibnb+Ibnm+Ibnt+Ibnk+Ibnq+Ibb+Ibqh+Ibqs +Ibqt+Ibqf+Ibqq $ () pib FRML IPIB pib = (pibp1*fIbp1 + pibh*fIbh + pibo1*fIbo1)/fIb $ FRML Ipibn pibn = Ibn/fIbn $ FRML Ipibq pibq = Ibq/fIbq $ FRML Ipib2 pib2 = Ib2/fIb2 $ FRML Ipib3 pib3 = Ib3/fIb3 $ FRML Ipib23 pib23 = Ib23/fIb23 $ () fIvb (afgange) FRML IfIvbn fIvbn = bfivbng*fKbng(-1) + bfivbne*fKbne(-1) + bfivbnf*fKbnf(-1) + bfivbnn*fKbnn(-1) + bfivbnb*fKbnb(-1) + bfivbnm*fKbnm(-1) + bfivbnt*fKbnt(-1) + bfivbnk*fKbnk(-1) + bfivbnq*fKbnq(-1) $ FRML IfIvbq fIvbq = bfivbqh*fKbqh(-1) + bfivbqs*fKbqs(-1) + bfivbqt*fKbqt(-1) + bfivbqf*fKbqf(-1) + bfivbqq*fKbqq(-1) $ FRML IfIvb2 fIvb2 = bfivbng*fKbng(-1) + bfivbne*fKbne(-1) + bfivbqs*fKbqs(-1) + bfivbqf*fKbqf(-1) $ FRML IfIvb3 fIvb3 = bfivba*fKba(-1) + bfivbb*fKbb(-1) + bfivbnf*fKbnf(-1) + bfivbnn*fKbnn(-1) + bfivbnb*fKbnb(-1) + bfivbnm*fKbnm(-1) + bfivbnt*fKbnt(-1) + bfivbnk*fKbnk(-1) + bfivbnq*fKbnq(-1) + bfivbqh*fKbqh(-1) + bfivbqt*fKbqt(-1) + bfivbqq*fKbqq(-1) $ FRML IfIvb23 fIvb23 = fIvb2 + fIvb3 $ () fIn (nettoinvesteringer) FRML IFINBH fInbh = fKnbh - fKnbh(-1) $ FRML IFINBP fInbp = fKnbp - fKnbp(-1) $ FRML IFINB fInb = fKnb - fKnb(-1) $ () uib (usercost) FRML Iuibn uibn = (uibng*fKbng+uibne*fKbne+uibnf*fKbnf+uibnn*fKbnn +uibnb*fKbnb+uibnm*fKbnm+uibnt*fKbnt+uibnk*fKbnk +uibnq*fKbnq)/fKbn $ FRML Iuibq uibq = (uibqh*fKbqh+uibqs*fKbqs+uibqt*fKbqt+uibqf*fKbqf +uibqq*fKbqq)/fKbq $ FRML Iuibp uibp = (uiba*fKba+uibe*fKbe+uibng*fKbng+uibne*fKbne +uibnf*fKbnf+uibnn*fKbnn+uibnb*fKbnb+uibnm*fKbnm +uibnt*fKbnt+uibnk*fKbnk+uibnq*fKbnq+uibb*fKbb +uibqh*fKbqh+uibqs*fKbqs+uibqt*fKbqt+uibqf*fKbqf +uibqq*fKbqq)/fKbp $ FRML Iuib2 uib2 = (uibng*fKbng+uibne*fKbne+uibqs*fKbqs+uibqf*fKbqf)/fKb2 $ FRML Iuib3 uib3 = (uiba*fKba+uibnf*fKbnf+uibnn*fKbnn+uibnb*fKbnb +uibnm*fKbnm+uibnt*fKbnt+uibnk*fKbnk+uibnq*fKbnq +uibb*fKbb+uibqh*fKbqh+uibqt*fKbqt+uibqq*fKbqq)/fKb3 $ FRML Iuib23 uib23 = (uiba*fKba+uibng*fKbng+uibne*fKbne+uibnf*fKbnf +uibnn*fKbnn+uibnb*fKbnb+uibnm*fKbnm+uibnt*fKbnt +uibnk*fKbnk+uibnq*fKbnq+uibb*fKbb+uibqh*fKbqh +uibqs*fKbqs+uibqt*fKbqt+uibqf*fKbqf+uibqq*fKbqq)/fKb23 $ FRML Iuib uib = (uiba*fKba+uibe*fKbe+uibng*fKbng+uibne*fKbne +uibnf*fKbnf+uibnn*fKbnn+uibnb*fKbnb+uibnm*fKbnm +uibnt*fKbnt+uibnk*fKbnk+uibnq*fKbnq+uibb*fKbb +uibqh*fKbqh+uibqs*fKbqs+uibqt*fKbqt+uibqf*fKbqf +uibqq*fKbqq+uibh*fKbh+uibo*fKbo)/fKb $ () dtfkb (effektivitet) FRML Idtfkbn dtfkbn = (dtfkbng*fKbng+dtfkbne*fKbne+dtfkbnf*fKbnf +dtfkbnn*fKbnn+dtfkbnb*fKbnb+dtfkbnm*fKbnm +dtfkbnt*fKbnt+dtfkbnk*fKbnk+dtfkbnq*fKbnq)/fKbn $ FRML Idtfkbq dtfkbq = (dtfkbqh*fKbqh+dtfkbqs*fKbqs+dtfkbqt*fKbqt +dtfkbqf*fKbqf+dtfkbqq*fKbqq)/fKbq $ FRML Idtfkb2 dtfkb2 = (dtfkbng*fKbng+dtfkbne*fKbne+dtfkbqs*fKbqs +dtfkbqf*fKbqf)/fKb2 $ FRML Idtfkb3 dtfkb3 = (dtfkba*fKba+dtfkbnf*fKbnf+dtfkbnn*fKbnn +dtfkbnb*fKbnb+dtfkbnm*fKbnm+dtfkbnt*fKbnt +dtfkbnk*fKbnk+dtfkbnq*fKbnq+dtfkbb*fKbb +dtfkbqh*fKbqh+dtfkbqt*fKbqt+dtfkbqq*fKbqq)/fKb3 $ FRML Idtfkb23 dtfkb23 = (dtfkba*fKba+dtfkbng*fKbng+dtfkbne*fKbne +dtfkbnf*fKbnf+dtfkbnn*fKbnn+dtfkbnb*fKbnb +dtfkbnm*fKbnm+dtfkbnt*fKbnt+dtfkbnk*fKbnk +dtfkbnq*fKbnq+dtfkbb*fKbb+dtfkbqh*fKbqh +dtfkbqs*fKbqs+dtfkbqt*fKbqt+dtfkbqf*fKbqf +dtfkbqq*fKbqq)/fKb23 $ () fKbw (ønsket kapital) FRML IfKbnw fKbnw = fKbngw+fKbnew+fKbnfw+fKbnnw+fKbnbw+fKbnmw+fKbntw +fKbnkw+fKbnqw $ FRML IfKbqw fKbqw = fKbqhw+fKbqsw+fKbqtw+fKbqfw+fKbqqw $ FRML IfKb2w fKb2w = fKbngw+fKbnew+fKbqsw+fKbqfw $ FRML IfKb3w fKb3w = fKbaw+fKbnfw+fKbnnw+fKbnbw+fKbnmw+fKbntw+fKbnkw +fKbnqw+fKbbw+fKbqhw+fKbqtw+fKbqqw $ FRML IfKb23w fKb23w = fKb2w + fKb3w $ () rho_Kb (autokorrelationsparameter) FRML Irofkb3 rofkb3 = (rofkba*fKba+rofkbnf*fKbnf+rofkbnn*fKbnn+rofkbnb*fKbnb +rofkbnm*fKbnm+rofkbnt*fKbnt+rofkbnk*fKbnk+rofkbnq*fKbnq +rofkbb*fKbb+rofkbqh*fKbqh+rofkbqt*fKbqt+rofkbqq*fKbqq) /fKb3 $ () MASKINER+BYGNINGER () Kapital FRML IfK fK = fKmp+fKbp+fKbh+fKmo+fKbo $ FRML IfKn fKn = fKnmp+fKnbp+fKnbh+fKnmo+fKnbo $ FRML IfKp fKp = fKmp+fKbp+fKbh $ FRML IfKpxh fKpxh = fKmp+fKbp $ FRML IfKnp fKnp = fKnmp+fKnbp+fKnbh $ FRML IfKo fKo = fKmo+fKbo $ FRML IfKno fKno = fKnmo+fKnbo $ () Nettoinvesteringer FRML IFIN fIn = fInm + fInb $ FRML IIN In = pim*fKnm+pib*fKnb - (pim(-1)*fKnm(-1)+pib(-1)*fKnb(-1)) $ FRML IFINNO fIno = (fKnbo-fKnbo(-1)) + (fKnmo-fKnmo(-1)) $ () BESKÆFTIGELSE () HQ FRML IHQn HQn = HQng+HQne+HQnf+HQnn+HQnb+HQnm+HQnt+HQnk+HQnq $ FRML IHQq HQq = HQqh+HQqs+HQqt+HQqf+HQqq $ FRML IHQp HQp = HQa+HQe+HQng+HQne+HQnf+HQnn+HQnb+HQnm+HQnt+HQnk+HQnq+HQb+HQqh +HQqs+HQqt+HQqf+HQqq+HQh $ FRML IHQ2 HQ2 = HQng+HQne+HQqs+HQqf $ FRML IHQ3 HQ3 = HQa+HQnf+HQnn+HQnb+HQnm+HQnt+HQnk+HQnq+HQb+HQqh+HQqt+HQqq $ FRML IHQ23 HQ23 = HQ2 + HQ3 $ FRML IHQ HQ = HQ23 + HQe + HQh + HQo $ () Q FRML IQp Qp = Qa+Qe+Qng+Qne+Qnf+Qnn+Qnb+Qnm+Qnt+Qnk+Qnq+Qb +Qqh+Qqs+Qqt+Qqf+Qqq+Qh $ FRML IQ2 Q2 = Qng+Qne+Qqs+Qqf $ FRML IQ3 Q3 = Qa+Qnf+Qnn+Qnb+Qnm+Qnt+Qnk+Qnq+Qb+Qqh+Qqt+Qqq $ FRML IQ23 Q23 = Q2 + Q3 $ () Qs FRML IQs2 Qs2 = Qsng+Qsne+Qsqs+Qsqf $ FRML IQs3 Qs3 = Qsa+Qsnf+Qsnn+Qsnb+Qsnm+Qsnt+Qsnk+Qsnq+Qsb+Qsqh+Qsqt+Qsqq $ FRML IQs23 Qs23 = Qs2 + Qs3 $ () Selvstændigkvoter FRML Ibqsq bqsQ = Qsq/Qq $ FRML Ibqsn bqsN = Qsn/Qn $ FRML Ibqsp bqsP = QsP/Qp $ FRML Ibqs2 bqs2 = Qs2/Q2 $ FRML Ibqs3 bqs3 = Qs3/Q3 $ FRML Ibqs23 bqs23 = Qs23/Q23 $ () Qw FRML IQw2 Qw2 = Qwng+Qwne+Qwqs+Qwqf $ FRML IQw3 Qw3 = Qwa+Qwnf+Qwnn+Qwnb+Qwnm+Qwnt+Qwnk+Qwnq+Qwb+Qwqh+Qwqt+Qwqq $ FRML IQw23 Qw23 = Qw2 + Qw3 $ () Yw FRML IYwp Ywp = Ywa+Ywe+Ywng+Ywne+Ywnf+Ywnn+Ywnb+Ywnm+Ywnt+Ywnk+Ywnq +Ywb+Ywqh+Ywqs+Ywqt+Ywqf+Ywqq+Ywh $ FRML IYw2 Yw2 = Ywng+Ywne+Ywqs+Ywqf $ FRML IYw3 Yw3 = Ywa+Ywnf+Ywnn+Ywnb+Ywnm+Ywnt+Ywnk+Ywnq+Ywb+Ywqh+Ywqt +Ywqq $ FRML IYw23 Yw23 = Yw2 + Yw3 $ () l FRML Iln ln = (lng*HQng+lne*HQne+lnf*HQnf+lnn*HQnn+lnb*HQnb+lnm*HQnm +lnt*HQnt+lnk*HQnk+lnq*HQnq)/HQn $ FRML Ilq lq = (lqh*HQqh+lqs*HQqs+lqt*HQqt+lqf*HQqf+lqq*HQqq)/HQq $ FRML Ilp lp = (la*HQa+le*HQe+lng*HQng+lne*HQne+lnf*HQnf+lnn*HQnn +lnb*HQnb+lnm*HQnm+lnt*HQnt+lnk*HQnk+lnq*HQnq+lb*HQb +lqh*HQqh+lqs*HQqs+lqt*HQqt+lqf*HQqf+lqq*HQqq+lh*HQh)/HQp $ FRML Il2 l2 = (lng*HQng+lne*HQne+lqs*HQqs+lqf*HQqf)/HQ2 $ FRML Il3 l3 = (la*HQa+lnf*HQnf+lnn*HQnn+lnb*HQnb+lnm*HQnm+lnt*HQnt +lnk*HQnk+lnq*HQnq+lb*HQb+lqh*HQqh+lqt*HQqt+lqq*HQqq)/HQ3 $ FRML Il23 l23 = (la*HQa+lng*HQng+lne*HQne+lnf*HQnf+lnn*HQnn+lnb*HQnb +lnm*HQnm+lnt*HQnt+lnk*HQnk+lnq*HQnq+lb*HQb+lqh*HQqh +lqs*HQqs+lqt*HQqt+lqf*HQqf+lqq*HQqq)/HQ23 $ FRML Il l = (la*HQa+le*HQe+lng*HQng+lne*HQne+lnf*HQnf+lnn*HQnn +lnb*HQnb+lnm*HQnm+lnt*HQnt+lnk*HQnk+lnq*HQnq+lb*HQb +lqh*HQqh+lqs*HQqs+lqt*HQqt+lqf*HQqf+lqq*HQqq+lh*HQh +lo*HQo)/HQ $ () dthq FRML Idthqn dthqn = (dthqng*HQng+dthqne*HQne+dthqnf*HQnf+dthqnn*HQnn +dthqnb*HQnb+dthqnm*HQnm+dthqnt*HQnt+dthqnk*HQnk +dthqnq*HQnq)/HQn $ FRML Idthqq dthqq = (dthqqh*HQqh+dthqqs*HQqs+dthqqt*HQqt+dthqqf*HQqf +dthqqq*HQqq)/HQq $ FRML Idthqp dthqp = (dthqa*HQa+dthqe*HQe+dthqng*HQng+dthqne*HQne+dthqnf*HQnf +dthqnn*HQnn+dthqnb*HQnb+dthqnm*HQnm+dthqnt*HQnt +dthqnk*HQnk+dthqnq*HQnq+dthqb*HQb+dthqqh*HQqh +dthqqs*HQqs+dthqqt*HQqt+dthqqf*HQqf+dthqqq*HQqq +dthqh*HQh)/HQp $ FRML Idthq2 dthq2 = (dthqng*HQng+dthqne*HQne+dthqqs*HQqs+dthqqf*HQqf)/HQ2 $ FRML Idthq3 dthq3 = (dthqa*HQa+dthqnf*HQnf+dthqnn*HQnn+dthqnb*HQnb +dthqnm*HQnm+dthqnt*HQnt+dthqnk*HQnk+dthqnq*HQnq +dthqb*HQb+dthqqh*HQqh+dthqqt*HQqt+dthqqq*HQqq)/HQ3 $ FRML Idthq23 dthq23 = (dthqa*HQa+dthqng*HQng+dthqne*HQne+dthqnf*HQnf +dthqnn*HQnn+dthqnb*HQnb+dthqnm*HQnm+dthqnt*HQnt +dthqnk*HQnk+dthqnq*HQnq+dthqb*HQb+dthqqh*HQqh +dthqqs*HQqs+dthqqt*HQqt+dthqqf*HQqf+dthqqq*HQqq)/HQ23 $ () HQw og HQn FRML IHQnw HQnw = HQngw+HQnew+HQnfw+HQnnw+HQnbw+HQnmw+HQntw+HQnkw+HQnqw $ FRML IHQqw HQqw = HQqhw+HQqsw+HQqtw+HQqfw+HQqqw $ FRML IHQ2w HQ2w = HQngw+HQnew+HQqsw+HQqfw $ FRML IHQ3w HQ3w = HQaw+HQnfw+HQnnw+HQnbw+HQnmw+HQntw+HQnkw+HQnqw+HQbw +HQqhw+HQqtw+HQqqw $ FRML IHQ23w HQ23w = HQ2w + HQ3w $ FRML IHQ3n HQ3n = HQan+HQnfn+HQnnn+HQnbn+HQnmn+HQntn+HQnkn+HQnqn+HQbn +HQqhn+HQqtn+HQqqn $ () rho_L FRML Irohq3 rohq3 = (rohqa*HQa+rohqnf*HQnf+rohqnn*HQnn+rohqnb*HQnb+rohqnm*HQnm +rohqnt*HQnt+rohqnk*HQnk+rohqnq*HQnq+rohqb*HQb+rohqqh*HQqh +rohqqt*HQqt+rohqqq*HQqq)/HQ3 $ () ENERGI () fVe FRML IfVen fVen = fVeng+fVene+fVenf+fVenn+fVenb+fVenm+fVent+fVenk+fVenq $ FRML IfVeq fVeq = fVeqh+fVeqs+fVeqt+fVeqf+fVeqq $ FRML IfVep fVep = fVea+fVee+fVeng+fVene+fVenf+fVenn+fVenb+fVenm+fVent+fVenk +fVenq+fVeb+fVeqh+fVeqs+fVeqt+fVeqf+fVeqq+fVeh $ FRML IfVe2 fVe2 = fVeng+fVene+fVeqs+fVeqf $ FRML IfVe3 fVe3 = fVea+fVenf+fVenn+fVenb+fVenm+fVent+fVenk+fVenq+fVeb+fVeqh +fVeqt+fVeqq $ FRML IfVe23 fVe23 = fVe2 + fVe3 $ FRML IfVe fVe = fVep + fVeo $ () Ve FRML IVen Ven = Veng+Vene+Venf+Venn+Venb+Venm+Vent+Venk+Venq $ FRML IVeq Veq = Veqh+Veqs+Veqt+Veqf+Veqq $ FRML IVep Vep = Vea+Vee+Veng+Vene+Venf+Venn+Venb+Venm+Vent+Venk+Venq +Veb+Veqh+Veqs+Veqt+Veqf+Veqq+Veh $ FRML IVe2 Ve2 = Veng+Vene+Veqs+Veqf $ FRML IVe3 Ve3 = Vea+Venf+Venn+Venb+Venm+Vent+Venk+Venq+Veb+Veqh+Veqt+Veqq $ FRML IVe23 Ve23 = Ve2 + Ve3 $ FRML Ipven pven = Ven/fVen $ FRML Ipveq pveq = Veq/fVeq $ FRML Ipvep pvep = Vep/fVep $ FRML Ipve2 pve2 = Ve2/fVe2 $ FRML Ipve3 pve3 = Ve3/fVe3 $ FRML Ipve23 pve23 = Ve23/fVe23 $ () dtfve FRML Idtfven dtfven = (dtfveng*fVeng+dtfvene*fVene+dtfvenf*fVenf+dtfvenn*fVenn +dtfvenb*fVenb+dtfvenm*fVenm+dtfvent*fVent+dtfvenk*fVenk +dtfvenq*fVenq)/fVen $ FRML Idtfveq dtfveq = (dtfveqh*fVeqh+dtfveqs*fVeqs+dtfveqt*fVeqt+dtfveqf*fVeqf +dtfveqq*fVeqq)/fVeq $ FRML Idtfvep dtfvep = (dtfvea*fVea+ 1*fVee+dtfveng*fVeng+dtfvene*fVene +dtfvenf*fVenf+dtfvenn*fVenn+dtfvenb*fVenb+dtfvenm*fVenm +dtfvent*fVent+dtfvenk*fVenk+dtfvenq*fVenq+dtfveb*fVeb +dtfveqh*fVeqh+dtfveqs*fVeqs+dtfveqt*fVeqt+dtfveqf*fVeqf +dtfveqq*fVeqq+dtfveh*fVeh)/fVep $ FRML Idtfve2 dtfve2 = (dtfveng*fVeng+dtfvene*fVene+dtfveqs*fVeqs+dtfveqf*fVeqf) /fVe2 $ FRML Idtfve3 dtfve3 = (dtfvea*fVea+dtfvenf*fVenf+dtfvenn*fVenn+dtfvenb*fVenb +dtfvenm*fVenm+dtfvent*fVent+dtfvenk*fVenk+dtfvenq*fVenq +dtfveb*fVeb+dtfveqh*fVeqh+dtfveqt*fVeqt+dtfveqq*fVeqq) /fVe3 $ FRML Idtfve23 dtfve23 = (dtfvea*fVea+dtfveng*fVeng+dtfvene*fVene+dtfvenf*fVenf +dtfvenn*fVenn+dtfvenb*fVenb+dtfvenm*fVenm+dtfvent*fVent +dtfvenk*fVenk+dtfvenq*fVenq+dtfveb*fVeb+dtfveqh*fVeqh +dtfveqs*fVeqs+dtfveqt*fVeqt+dtfveqf*fVeqf+dtfveqq*fVeqq) /fVe23 $ () fVew FRML IfVe3w fVe3w = fVeaw+fVenfw+fVennw+fVenbw+fVenmw+fVentw+fVenkw+fVenqw +fVebw+fVeqhw+fVeqtw+fVeqqw $ () Sipve FRML ISipven Sipven = Sipveng+Sipvene+Sipvenf+Sipvenn+Sipvenb+Sipvenm +Sipvent+Sipvenk+Sipvenq $ FRML ISipveq Sipveq = Sipveqh+Sipveqs+Sipveqt+Sipveqf+Sipveqq $ FRML ISipvep Sipvep = Sipvea+Sipvee+Sipveng+Sipvene+Sipvenf+Sipvenn+Sipvenb +Sipvenm+Sipvent+Sipvenk+Sipvenq+Sipveb+Sipveqh+Sipveqs +Sipveqt+Sipveqf+Sipveqq+Sipveh $ FRML ISipve2 Sipve2 = Sipveng+Sipvene+Sipveqs+Sipveqf $ FRML ISipve3 Sipve3 = Sipvea+Sipvenf+Sipvenn+Sipvenb+Sipvenm+Sipvent+Sipvenk +Sipvenq+Sipveb+Sipveqh+Sipveqt+Sipveqq $ FRML ISipve23 Sipve23 = Sipve2 + Sipve3 $ () tve FRML Itven tven = Sipven/fVen $ FRML Itveq tveq = Sipveq/fVeq $ FRML Itvep tvep = Sipvep/fVep $ FRML Itve2 tve2 = Sipve2/fVe2 $ FRML Itve3 tve3 = Sipve3/fVe3 $ FRML Itve23 tve23 = Sipve23/fVe23 $ () MATERIALER () fVm FRML IfVmn fVmn = fVmng+fVmne+fVmnf+fVmnn+fVmnb+fVmnm+fVmnt+fVmnk+fVmnq $ FRML IfVmq fVmq = fVmqh+fVmqs+fVmqt+fVmqf+fVmqq $ FRML IfVmp fVmp = fVma+fVme+fVmng+fVmne+fVmnf+fVmnn+fVmnb+fVmnm+fVmnt+fVmnk +fVmnq+fVmb+fVmqh+fVmqs+fVmqt+fVmqf+fVmqq+fVmh $ FRML IfVm2 fVm2 = fVmng+fVmne+fVmqs+fVmqf $ FRML IfVm3 fVm3 = fVma+fVmnf+fVmnn+fVmnb+fVmnm+fVmnt+fVmnk+fVmnq+fVmb+fVmqh +fVmqt+fVmqq $ FRML IfVm23 fVm23 = fVm2 + fVm3 $ FRML IfVm fVm = fVmp + fVmo $ () Vm FRML IVmn Vmn = Vmng+Vmne+Vmnf+Vmnn+Vmnb+Vmnm+Vmnt+Vmnk+Vmnq $ FRML IVmq Vmq = Vmqh+Vmqs+Vmqt+Vmqf+Vmqq $ FRML IVmp Vmp = Vma+Vme+Vmng+Vmne+Vmnf+Vmnn+Vmnb+Vmnm+Vmnt+Vmnk+Vmnq +Vmb+Vmqh+Vmqs+Vmqt+Vmqf+Vmqq+Vmh $ FRML IVm2 Vm2 = Vmng+Vmne+Vmqs+Vmqf $ FRML IVm3 Vm3 = Vma+Vmnf+Vmnn+Vmnb+Vmnm+Vmnt+Vmnk+Vmnq+Vmb+Vmqh+Vmqt+Vmqq $ FRML IVm23 Vm23 = Vm2 + Vm3 $ FRML IVm Vm = Vmp + Vmo $ () pvm FRML Ipvmn pvmn = Vmn/fVmn $ FRML Ipvmq pvmq = Vmq/fVmq $ FRML Ipvmp pvmp = Vmp/fVmp $ FRML Ipvm2 pvm2 = Vm2/fVm2 $ FRML Ipvm3 pvm3 = Vm3/fVm3 $ FRML Ipvm23 pvm23 = Vm23/fVm23 $ FRML Ipvm pvm = Vm/fVm $ () Sipvm FRML ISipvmn Sipvmn = Sipvmng+Sipvmne+Sipvmnf+Sipvmnn+Sipvmnb+Sipvmnm +Sipvmnt+Sipvmnk+Sipvmnq $ FRML ISipvmq Sipvmq = Sipvmqh+Sipvmqs+Sipvmqt+Sipvmqf+Sipvmqq $ FRML ISipvmp Sipvmp = Sipvma+Sipvme+Sipvmng+Sipvmne+Sipvmnf+Sipvmnn+Sipvmnb +Sipvmnm+Sipvmnt+Sipvmnk+Sipvmnq+Sipvmb+Sipvmqh+Sipvmqs +Sipvmqt+Sipvmqf+Sipvmqq+Sipvmh $ FRML ISipvm2 Sipvm2 = Sipvmng+Sipvmne+Sipvmqs+Sipvmqf $ FRML ISipvm3 Sipvm3 = Sipvma+Sipvmnf+Sipvmnn+Sipvmnb+Sipvmnm+Sipvmnt+Sipvmnk +Sipvmnq+Sipvmb+Sipvmqh+Sipvmqt+Sipvmqq $ FRML ISipvm23 Sipvm23 = Sipvm2 + Sipvm3 $ () tvm FRML Itvmn tvmn = Sipvmn/fVmn $ FRML Itvmq tvmq = Sipvmq/fVmq $ FRML Itvmp tvmp = Sipvmp/fVmp $ FRML Itvm2 tvm2 = Sipvm2/fVm2 $ FRML Itvm3 tvm3 = Sipvm3/fVm3 $ FRML Itvm23 tvm23 = Sipvm23/fVm23 $ () VAREKØB FRML Iv V = Va+Ve+Vng+Vne+Vnf+Vnn+Vnb+Vnm+Vnt+Vnk+Vnq+Vb+Vqh+Vqs +Vqt+Vqf+Vqq+Vh+Vo-Yfqi $ () Sipx FRML ISipxn Sipxn = Sipxng+Sipxne+Sipxnf+Sipxnn+Sipxnb+Sipxnm +Sipxnt+Sipxnk+Sipxnq $ FRML ISipxq Sipxq = Sipxqh+Sipxqs+Sipxqt+Sipxqf+Sipxqq $ FRML ISipxp Sipxp = Sipxa+Sipxe+Sipxng+Sipxne+Sipxnf+Sipxnn+Sipxnb +Sipxnm+Sipxnt+Sipxnk+Sipxnq+Sipxb+Sipxqh+Sipxqs +Sipxqt+Sipxqf+Sipxqq+Sipxh $ FRML ISipx2 Sipx2 = Sipxng+Sipxne+Sipxqs+Sipxqf $ FRML ISipx3 Sipx3 = Sipxa+Sipxnf+Sipxnn+Sipxnb+Sipxnm+Sipxnt+Sipxnk +Sipxnq+Sipxb+Sipxqh+Sipxqt+Sipxqq $ FRML ISipx23 Sipx23 = Sipx2 + Sipx3 $ () PRODUKTION () fYf FRML IfYfp fYfp = fYfa+fYfe+fYfng+fYfne+fYfnf+fYfnn+fYfnb+fYfnm+fYfnt+fYfnk +fYfnq+fYfb+fYfqh+fYfqs+fYfqt+fYfqf+fYfqq+fYfh+fYfqi $ FRML IfYf2 fYf2 = fYfng+fYfne+fYfqs+fYfqf $ FRML IfYf3 fYf3 = fYfa+fYfnf+fYfnn+fYfnb+fYfnm+fYfnt+fYfnk+fYfnq+fYfb+fYfqh +fYfqt+fYfqq $ FRML IfYf23 fYf23 = fYfa+fYfng+fYfne+fYfnf+fYfnn+fYfnb+fYfnm+fYfnt+fYfnk+fYfnq +fYfb+fYfqh+fYfqs+fYfqt+fYfqf+fYfqq $ () pyf FRML Ipyfq pyfq = (Yfqh+Yfqs+Yfqt+Yfqf+Yfqq+Yfqi)/fYfq $ FRML Ipyfp pyfp = (Yfa+Yfe+Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq+Yfb +Yfqh+Yfqs+Yfqt+Yfqf+Yfqq+Yfh+Yfqi)/fYfp $ FRML Ipyf2 pyf2 = (Yfng+Yfne+Yfqs+Yfqf)/fYf2 $ FRML Ipyf3 pyf3 = (Yfa+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq+Yfb+Yfqh+Yfqt+Yfqq) /fYf3 $ FRML Ipyf23 pyf23 = (Yfa+Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq+Yfb+Yfqh +Yfqs+Yfqt+Yfqf+Yfqq)/fYf23 $ FRML Ipyf pyf = (Yfa+Yfe+Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq+Yfb +Yfqh+Yfqs+Yfqt+Yfqf+Yfqq+Yfh+Yfo+Yfqi)/fYf $ () fX FRML IfXp fXp = fXa+fXe+fXng+fXne+fXnf+fXnn+fXnb+fXnm+fXnt+fXnk+fXnq+fXb +fXqh+fXqs+fXqt+fXqf+fXqq+fXh $ FRML IfX2 fX2 = fXng+fXne+fXqs+fXqf $ FRML IfX3 fX3 = fXa+fXnf+fXnn+fXnb+fXnm+fXnt+fXnk+fXnq+fXb+fXqh+fXqt+fXqq $ FRML IfX23 fX23 = fX2 + fX3 $ () px FRML Ipxp pxp = (pxa*fXa+pxe*fXe+pxng*fXng+pxne*fXne+pxnf*fXnf+pxnn*fXnn +pxnb*fXnb+pxnm*fXnm+pxnt*fXnt+pxnk*fXnk+pxnq*fXnq+pxb*fXb +pxqh*fXqh+pxqs*fXqs+pxqt*fXqt+pxqf*fXqf+pxqq*fXqq+pxh*fXh) /fXp $ FRML Ipx3 px3 = (pxa*fXa+pxnf*fXnf+pxnn*fXnn+pxnb*fXnb+pxnm*fXnm+pxnt*fXnt +pxnk*fXnk+pxnq*fXnq+pxb*fXb+pxqh*fXqh+pxqt*fXqt+pxqq*fXqq) /fX3 $ FRML Ipx23 px23 = (pxa*fXa+pxng*fXng+pxne*fXne+pxnf*fXnf+pxnn*fXnn+pxnb*fXnb +pxnm*fXnm+pxnt*fXnt+pxnk*fXnk+pxnq*fXnq+pxb*fXb+pxqh*fXqh +pxqs*fXqs+pxqt*fXqt+pxqf*fXqf+pxqq*fXqq)/fX23 $ FRML Ipx px = (pxa*fXa+pxe*fXe+pxng*fXng+pxne*fXne+pxnf*fXnf+pxnn*fXnn +pxnb*fXnb+pxnm*fXnm+pxnt*fXnt+pxnk*fXnk+pxnq*fXnq+pxb*fXb +pxqh*fXqh+pxqs*fXqs+pxqt*fXqt+pxqf*fXqf+pxqq*fXqq+pxh*fXh +pxo*fXo)/fX $ () () SEKTOR- OG IMPORTPRISER () FRML IDPM pm = M/fM $ FRML IPMV pmv = Mv/fMv $ FRML IPMST pmst = (Ms+Mt)/(fMs+fMt) $ () () PRISER PÅ EFTERSPØRGSELSKOMPONENTER () FRML IPCPDK pcpdk = (fCf*pcf+fCn*pcn+fCi*pci+fCe*pce+fCg*pcg+fCb*pcb +fCv*pcv+fCh*pch+fCk*pck+fCs*pcs) /(fCf+fCn+fCi+fCe+fCg+fCb+fCv+fCh+fCk+fCs) $ FRML IPCPXH pcpxh = (Cp - pch*fCh)/(fCp - fCh) $ FRML IPCP4 pcp4 = Cp4/fCp4 $ FRML IPI pi = I/(fIbh+fIbo1+fImo1+fIbp1+fImp1+fIt+fIl) $ FRML IPIF pif = (I - fIl*pil) /(fIbh+fIbo1+fImo1+fIbp1+fImp1+fIt) $ FRML IPIFP1XH pifp1xh = (pimp1*fImp1 + pibp1*fIbp1 + pit*fIt) /(fImp1+fIbp1+fIt) $ FRML IPIO1 pio1 = (Imo1+Ibo1)/(fImo1+fIbo1) $ FRML IPIP1 pip1 = Ip1/fIp1 $ () FRML IPIV piv = Iv/fIv $ FRML IPE pe = E/fE $ FRML IPEV pev = Ev/fEv $ FRML IPE59 pe59 = (pe5*fE5+pe6*fE6+pe7y*fE7y+pe7q*fE7q+pe8*fE8) /(fE5+fE6+fE7y+fE7q+fE8) $ FRML IPEST pest = (Es+Et)/(fEs+fEt) $ () FRML IKP0E kp0e = pe0/pee0 $ FRML IKP2E kp2e = pe2/pee2 $ FRML IKP5E kp5e = pe5/pee5 $ FRML IKP6E kp6e = pe6/pee6 $ FRML IKP7QE kp7qe = pe7q/pee7q $ FRML IKP8E kp8e = pe8/pee8 $ FRML IKPTE kpte = pet/peet $ FRML IBPE bpe = (E/fE)/(M/fM) $ FRML IBPEV bpev = (Ev/fEv)/(Mv/fMv) $ FRML IBPE59 bpe59 = ( (pe5*fE5+pe6*fE6+pe7q*fE7q+pe8*fE8) /(fE5+fE6+fE7q+fE8) ) /( (pm5*fM5+pm6m*fM6m+pm6q*fM6q+pm7q*fM7q+ fM7b*pm7b+pm8*fM8) /(fM5+fM6m+fM6q+fM7b+fM7q+fM8) ) $ FRML IBPET bpet = pet/pmt $ FRML IBPES bpes = pes/pms $ FRML IBPEST bpest = ((Es+Et)/(fEs+fEt))/((Ms+Mt)/(fMs+fMt)) $ () () FORSKELLIGE OMKOSTNINGSUDTRYK OG AGGREGATER () FRML Ipwavv pwavv = Va/fXa $ FRML Ipwavl pwavl = (la*HQan)/fXa $ FRML Ipwanv pwanv = pwavv+pwavl $ FRML Ipwnfnv pwnfnv = pwnfvv+pwnfvl $ FRML Ipwnnnv pwnnnv = pwnnvv+pwnnvl $ FRML Ipwnbnv pwnbnv = pwnbvv+pwnbvl $ FRML Ipwnmnv pwnmnv = pwnmvv+pwnmvl $ FRML Ipwntnv pwntnv = pwntvv+pwntvl $ FRML Ipwnknv pwnknv = pwnkvv+pwnkvl $ FRML Ipwnqnv pwnqnv = pwnqvv+pwnqvl $ FRML Ipwbnv pwbnv = pwbvv+pwbvl $ FRML Ipwqhnv pwqhnv = pwqhvv+pwqhvl $ FRML Ipwqtnv pwqtnv = pwqtvv+pwqtvl $ FRML Ipwqqnv pwqqnv = pwqqvv+pwqqvl $ FRML Ipwngw pwngw = (uimng*fKmngw+uibng*fKbng+lng*HQngw+pveng*fVeng +pvmng*fVmng+Siqng-.000*Siqej-Siqngl)/fXng $ FRML Ipwqsw pwqsw = (uimqs*fKmqsw+uibqs*fKbqs+lqs*HQqsw+pveqs*fVeqs +pvmqs*fVmqs+Siqqs-.006*Siqej-Siqqsl)/fXqs $ FRML Ipw3nv pw3nv = (pwanv*fXa+pwnfnv*fXnf+pwnnnv*fXnn+pwnbnv*fXnb +pwnmnv*fXnm+pwntnv*fXnt+pwnknv*fXnk+pwnqnv*fXnq +pwbnv*fXb+pwqhnv*fXqh+pwqtnv*fXqt+pwqqnv*fXqq)/fX3 $ FRML Ipw3vv pw3vv = (pwavv*fXa+pwnfvv*fXnf+pwnnvv*fXnn+pwnbvv*fXnb+pwnmvv*fXnm +pwntvv*fXnt+pwnkvv*fXnk+pwnqvv*fXnq+pwbvv*fXb+pwqhvv*fXqh +pwqtvv*fXqt+pwqqvv*fXqq)/fX3 $ FRML Ipw3vl pw3vl = (pwavl*fXa+pwnfvl*fXnf+pwnnvl*fXnn+pwnbvl*fXnb+pwnmvl*fXnm +pwntvl*fXnt+pwnkvl*fXnk+pwnqvl*fXnq+pwbvl*fXb+pwqhvl*fXqh +pwqtvl*fXqt+pwqqvl*fXqq)/fX3 $ FRML Ipwnw pwnw = (pwngw*fXng+pwnew*fXne+pwnfw*fXnf+pwnnw*fXnn+pwnbw*fXnb +pwnmw*fXnm+pwntw*fXnt+pwnkw*fXnk+pwnqw*fXnq)/fXn $ FRML Ipwqw pwqw = (pwqhw*fXqh+pwqsw*fXqs+pwqtw*fXqt+pwqfw*fXqf+pwqqw*fXqq) /fXq $ FRML Ipw3w pw3w = (pwaw*fXa+pwnfw*fXnf+pwnnw*fXnn+pwnbw*fXnb+pwnmw*fXnm +pwntw*fXnt+pwnkw*fXnk+pwnqw*fXnq+pwbw*fXb+pwqhw*fXqh +pwqtw*fXqt+pwqqw*fXqq)/fX3 $ FRML Ipw23w pw23w = (pwaw*fXa+pwngw*fXng+pwnew*fXne+pwnfw*fXnf+pwnnw*fXnn +pwbw*fXb+pwqhw*fXqh+pwqsw*fXqs+pwqtw*fXqt+pwqfw*fXqf +pwqqw*fXqq)/fX23 $ () () FAKTISKE OMKOSTNINGER () FRML Ipwa pwa = (uima*fKma+uiba*fKba+la*HQa+pvea*fVea+pvma*fVma +Siqa-.094*Siqej-Siqal)/fXa $ FRML Ipwe pwe = (uime*fKme+uibe*fKbe+le*HQe+pvee*fVee+pvme*fVme +Siqe-.000*Siqej-Siqel)/fXe $ FRML Ipwng pwng = (uimng*fKmng+uibng*fKbng+lng*HQng+pveng*fVeng+pvmng*fVmng +Siqng-.000*Siqej-Siqngl)/fXng $ FRML Ipwne pwne = (uimne*fKmne+uibne*fKbne+lne*HQne+pvene*fVene+pvmne*fVmne +Siqne-.006*Siqej-Siqnel)/fXne $ FRML Ipwnf pwnf = (uimnf*fKmnf+uibnf*fKbnf+lnf*HQnf+pvenf*fVenf+pvmnf*fVmnf +Siqnf-.008*Siqej-Siqnfl)/fXnf $ FRML Ipwnn pwnn = (uimnn*fKmnn+uibnn*fKbnn+lnn*HQnn+pvenn*fVenn+pvmnn*fVmnn +Siqnn-.003*Siqej-Siqnnl)/fXnn $ FRML Ipwnb pwnb = (uimnb*fKmnb+uibnb*fKbnb+lnb*HQnb+pvenb*fVenb+pvmnb*fVmnb +Siqnb-.006*Siqej-Siqnbl)/fXnb $ FRML Ipwnm pwnm = (uimnm*fKmnm+uibnm*fKbnm+lnm*HQnm+pvenm*fVenm+pvmnm*fVmnm +Siqnm-.018*Siqej-Siqnml)/fXnm $ FRML Ipwnt pwnt = (uimnt*fKmnt+uibnt*fKbnt+lnt*HQnt+pvent*fVent+pvmnt*fVmnt +Siqnt-.003*Siqej-Siqntl)/fXnt $ FRML Ipwnk pwnk = (uimnk*fKmnk+uibnk*fKbnk+lnk*HQnk+pvenk*fVenk+pvmnk*fVmnk +Siqnk-.009*Siqej-Siqnkl)/fXnk $ FRML Ipwnq pwnq = (uimnq*fKmnq+uibnq*fKbnq+lnq*HQnq+pvenq*fVenq+pvmnq*fVmnq +Siqnq-.011*Siqej-Siqnql)/fXnq $ FRML Ipwb pwb = (uimb*fKmb+uibb*fKbb+lb*HQb+pveb*fVeb+pvmb*fVmb +Siqb-.006*Siqej-Siqbl)/fXb $ FRML Ipwqh pwqh = (uimqh*fKmqh+uibqh*fKbqh+lqh*HQqh+pveqh*fVeqh+pvmqh*fVmqh +Siqqh-.056*Siqej-Siqqhl)/fXqh $ FRML Ipwqs pwqs = (uimqs*fKmqs+uibqs*fKbqs+lqs*HQqs+pveqs*fVeqs+pvmqs*fVmqs +Siqqs-.006*Siqej-Siqqsl)/fXqs $ FRML Ipwqt pwqt = (uimqt*fKmqt+uibqt*fKbqt+lqt*HQqt+pveqt*fVeqt+pvmqt*fVmqt +Siqqt-.017*Siqej-Siqqtl)/fXqt $ FRML Ipwqf pwqf = (uimqf*fKmqf+uibqf*fKbqf+lqf*HQqf+pveqf*fVeqf+pvmqf*fVmqf +Siqqf-.016*Siqej-Siqqfl)/fXqf $ FRML Ipwqq pwqq = (uimqq*fKmqq+uibqq*fKbqq+lqq*HQqq+pveqq*fVeqq+pvmqq*fVmqq +Siqqq-.136*Siqej-Siqqql)/fXqq $ FRML Ipwh pwh = (uimh*fKmh+uibh*fKbh+lh*HQh+pveh*fVeh+pvmh*fVmh +Siqh-.565*Siqej-Siqhl)/fXh $ FRML Ipwo pwo = (uimo*fKmo+uibo*fKbo+lo*HQo+pveo*fVeo+pvmo*fVmo +Siqo-.040*Siqej-Siqol)/fXo $ FRML Ipwn pwn = (pwng*fXng+pwne*fXne+pwnf*fXnf+pwnn*fXnn+pwnb*fXnb +pwnm*fXnm+pwnt*fXnt+pwnk*fXnk+pwnq*fXnq)/fXn $ FRML Ipwq pwq = (pwqh*fXqh+pwqs*fXqs+pwqt*fXqt+pwqf*fXqf+pwqq*fXqq)/fXq $ FRML Ipw3 pw3 = (pwa*fXa+pwnf*fXnf+pwnn*fXnn+pwnb*fXnb+pwnm*fXnm +pwnt*fXnt+pwnk*fXnk+pwnq*fXnq+pwb*fXb+pwqh*fXqh +pwqt*fXqt+pwqq*fXqq)/fX3 $ FRML Ipw23 pw23 = (pwa*fXa+pwng*fXng+pwne*fXne+pwnf*fXnf+pwnn*fXnn +pwnb*fXnb+pwnm*fXnm+pwnt*fXnt+pwnk*fXnk+pwnq*fXnq +pwb*fXb+pwqh*fXqh+pwqs*fXqs+pwqt*fXqt+pwqf*fXqf +pwqq*fXqq)/fX23 $ FRML Ipwp pwp = (pwa*fXa+pwe*fXe+pwng*fXng+pwne*fXne+pwnf*fXnf+pwnn*fXnn +pwnb*fXnb+pwnm*fXnm+pwnt*fXnt+pwnk*fXnk+pwnq*fXnq +pwb*fXb+pwqh*fXqh+pwqs*fXqs+pwqt*fXqt+pwqf*fXqf +pwqq*fXqq+pwh*fXh)/fXp $ FRML Ipw pw = (pwa*fXa+pwe*fXe+pwng*fXng+pwne*fXne+pwnf*fXnf+pwnn*fXnn +pwnb*fXnb+pwnm*fXnm+pwnt*fXnt+pwnk*fXnk+pwnq*fXnq+pwb*fXb +pwqh*fXqh+pwqs*fXqs+pwqt*fXqt+pwqf*fXqf+pwqq*fXqq+pwh*fXh +pwo*fXo)/fX $ () () PROFITRATER () FRML Ibpra bpra = 1 - pwa/pxa $ FRML Ibpre bpre = 1 - pwe/pxe $ FRML Ibprng bprng = 1 - pwng/pxng $ FRML Ibprne bprne = 1 - pwne/pxne $ FRML Ibprnf bprnf = 1 - pwnf/pxnf $ FRML Ibprnn bprnn = 1 - pwnn/pxnn $ FRML Ibprnb bprnb = 1 - pwnb/pxnb $ FRML Ibprnm bprnm = 1 - pwnm/pxnm $ FRML Ibprnt bprnt = 1 - pwnt/pxnt $ FRML Ibprnk bprnk = 1 - pwnk/pxnk $ FRML Ibprnq bprnq = 1 - pwnq/pxnq $ FRML Ibprb bprb = 1 - pwb/pxb $ FRML Ibprqh bprqh = 1 - pwqh/pxqh $ FRML Ibprqs bprqs = 1 - pwqs/pxqs $ FRML Ibprqt bprqt = 1 - pwqt/pxqt $ FRML Ibprqf bprqf = 1 - pwqf/pxqf $ FRML Ibprqq bprqq = 1 - pwqq/pxqq $ FRML Ibprh bprh = 1 - pwh/pxh $ FRML Ibpro bpro = 1 - pwo/pxo $ FRML Ibprq bprq = 1 - pwq/pxq $ FRML Ibprn bprn = 1 - pwn/pxn $ FRML Ibpr3 bpr3 = 1 - pw3/px3 $ FRML Ibpr23 bpr23 = 1 - pw23/px23 $ FRML Ibprp bprp = 1 - pwp/pxp $ FRML Ibpr bpr = 1 - pw/px $ FRML ITFFLI Tffli = Tbhsl+Tphhli $ FRML ITFFLU Tfflu = Typshl+Tphhlu $ FRML ITFFKI Tffki = Tbhsk+Tphhki $ FRML ITFFKU Tffku = Typshk+Tphhku $ FRML ITFFI Tffi = Tffli+Tffki $ FRML ITFFU Tffu = Tfflu+Tffku $ FRML ITBHS Tbhs = Tbhsl+Tbhsk $ FRML ITPHHI Tphhi = Tphhli+Tphhki $ FRML ITYPSH Typsh = Typshl+Typshk $ FRML ITPHHU Tphhu = Tphhlu+Tphhku $ FRML ITIPPHPL Tipphpl = Tishl+Tihhl $ FRML ITIPPHPK Tipphpk = Tishk+Tihsk $ FRML ITIPPHPS Tipphps = Tishl+Tishk $ FRML ITIPPHPH Tipphph = Tihhl+Tihsk $ FRML IWPHP Wphp = Wphpk+Wphpl $ FRML IWPSP Wpsp = Wpspk+Wpspl $ FRML IWPPK Wppk = Wpspk+Wphpk $ FRML IWPPL Wppl = Wpp-Wppk $ FRML ITPHHPI Tphhpi = Tffpi-Tbhsp $ FRML ITPHHBI Tphhbi = Tphhi-Tphhpi $ FRML ITPHHPU Tphhpu = Tffpu-Typshp $ FRML ITPHHBU Tphhbu = Tphhu-Tphhpu $ () () GENERERING AF J-LED () FRML YJRCp4xh JRcp4xh = log(Cp4xh-Jcp4xh) - ( .409320*(Ydphk1-Ydphk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.198973*(Ydpsk1-Ydpsk1(-1)) /(Ydphk1(-1)+Ydpsk1(-1)) +.241808*Dlog(Wcp2(-1)) -.704659*Dlog(pcp4xhv)+.100471*Dlog(pch1) -.238311*log(Cp4xh(-1)/Cp4xhw(-1)) +log(Cp4xh(-1)/pcp4xhv(-1)) +log(pcp4xhv) ) $ FRML YJRPXQF JRpxqf = exp( (log(pxqf)-log(pxqf(-1))) -(log(pxqf(-1))-log(pxqf(-2))) -(0.33102*((log(pwqfwv)-log(pwqfwv(-1))) -(log(pwqfwv(-1))-log(pwqfwv(-2)))) -0.24049*((log(pxqf(-1))-log(pxqf(-2))) -(log(pwqfw(-1))-log(pwqfw(-2))))) +log(1.+JRpxqf(-1)) ) - 1 $ FRML YWNBZX Wnbzx = Wnbz -(krea2*(Wfqf-Wfqfx) - krea3*(Wflp+Wfll+Wflt+Wflb+Wflh +Wfle+Wfbz+Wfqp-Wflpx-Wfllx-Wfltx -Wflbx-Wflhx-Wflex-Zwfbz-Wfqpx -Wzbf-Wbqf-Welf-Wtlf+Wzbfx+Wbqfx +Welfx+Wtlfx)) $ () Jled i lagerinvesteringer FRML YJfIla JfIla = fIla - ( 0.07049*(Dif(fXa(-1))-Dif(fIla(-1))) +0.66667*(hostkor-0.5*hostkor(-1) -0.5*hostkor(-2)) ) $ FRML YJfIle JfIle = fIle - ( 0.07962*(0.50*(Dif(fXe)-Dif(fIle)) +(1-0.50)*(Dif(fXe(-1))-Dif(fIle(-1)))) ) $ FRML YJfIlng JfIlng = fIlng - ( bngil*(Dif(fXng)-Dif(fIlng)) ) $ FRML YJfIlne JfIlne = fIlne - ( 0.30909*0.01815*(0.00*(Dif(fXne)-Dif(fIlne)) +(1-0.00)*(Dif(fXne(-1))-Dif(fIlne(-1)))) +(1-0.30909)*fIlne(-1) ) $ FRML YJfIlnf JfIlnf = fIlnf - ( 0.01983*(Dif(fXnf)-Dif(fIlnf)) ) $ FRML YJfIlnn JfIlnn = fIlnn - ( 0.64838*0.30265*(Dif(fXnn)-Dif(fIlnn)) +(1-0.64838)*fIlnn(-1) ) $ FRML YJfIlnb JfIlnb = fIlnb - ( 0.19919*(0.75*(Dif(fXnb)-Dif(fIlnb)) +(1-0.75)*(Dif(fXnb(-1))-Dif(fIlnb(-1)))) ) $ FRML YJfIlnm JfIlnm = fIlnm - ( 0.19618*(0.50*(Dif(fXnm)-Dif(fIlnm)) +(1-0.50)*(Dif(fXnm(-1))-Dif(fIlnm(-1)))) ) $ FRML YJfIlnt JfIlnt = fIlnt - ( 0.01049*(0.00*(Dif(fXnt)-Dif(fIlnt)) +(1-0.00)*(Dif(fXnt(-1))-Dif(fIlnt(-1)))) ) $ FRML YJfIlnk JfIlnk = fIlnk - ( 0.11555*(0.75*(Dif(fXnk)-Dif(fIlnk)) +(1-0.75)*(Dif(fXnk(-1))-Dif(fIlnk(-1)))) ) $ FRML YJfIlnq JfIlnq = fIlnq - ( 0.17113*(0.75*(Dif(fXnq)-Dif(fIlnq)) +(1-0.75)*(Dif(fXnq(-1))-Dif(fIlnq(-1)))) ) $ FRML YJfIlqh JfIlqh = fIlqh - ( 0.01790*(Dif(fXqh)-Dif(fIlqh)) ) $ FRML YJfIlqq JfIlqq = fIlqq - ( bqqil*(Dif(fXqq)-Dif(fIlqq)) ) $ FRML YJfIlm0 JfIlm0 = fIlm0 - ( bm0il*(Dif(fM0)-Dif(fIlm0)) ) $ FRML YJfIlm1 JfIlm1 = fIlm1 - ( 0.02550*(0.00*(Dif(fM1)-Dif(fIlm1)) +(1-0.00)*(Dif(fM1(-1))-Dif(fIlm1(-1)))) ) $ FRML YJfIlm2 JfIlm2 = fIlm2 - ( 0.42477*0.28267*(0.00*(Dif(fM2)-Dif(fIlm2)) +(1-0.00)*(Dif(fM2(-1))-Dif(fIlm2(-1)))) +(1-0.42477)*fIlm2(-1) ) $ FRML YJfIlm3k JfIlm3k = fIlm3k - ( 0.41680*(0.00*(Dif(fM3k)-Dif(fIlm3k)) +(1-0.00)*(Dif(fM3k(-1))-Dif(fIlm3k(-1)))) ) $ FRML YJfIlm3r JfIlm3r = fIlm3r - ( 0.06153*(0.50*(Dif(fM3r)-Dif(fIlm3r)) +(1-0.50)*(Dif(fM3r(-1))-Dif(fIlm3r(-1)))) ) $ FRML YJfIlm3q JfIlm3q = fIlm3q - ( 0.53129*0.16938*(0.00*(Dif(fM3q)-Dif(fIlm3q)) +(1-0.00)*(Dif(fM3q(-1))-Dif(fIlm3q(-1)))) +(1-0.53129)*fIlm3q(-1) ) $ FRML YJfIlm5 JfIlm5 = fIlm5 - ( 0.19085*(0.50*(Dif(fM5)-Dif(fIlm5)) +(1-0.50)*(Dif(fM5(-1))-Dif(fIlm5(-1)))) ) $ FRML YJfIlm6m JfIlm6m = fIlm6m - ( 0.17929*(0.75*(Dif(fM6m)-Dif(fIlm6m)) +(1-0.75)*(Dif(fM6m(-1))-Dif(fIlm6m(-1)))) ) $ FRML YJfIlm6q JfIlm6q = fIlm6q - ( 0.18089*(0.75*(Dif(fM6q)-Dif(fIlm6q)) +(1-0.75)*(Dif(fM6q(-1))-Dif(fIlm6q(-1)))) ) $ FRML YJfIlm7b JfIlm7b = fIlm7b - ( 0.25703*(0.50*(Dif(fM7b)-Dif(fIlm7b)) +(1-0.50)*(Dif(fM7b(-1))-Dif(fIlm7b(-1)))) +4706.03*d86 ) $ FRML YJfIlm7y JfIlm7y = fIlm7y - ( bm7yil*(Dif(fM7y)-Dif(fIlm7y)) ) $ FRML YJfIlm7q JfIlm7q = fIlm7q - ( 0.71279*0.16172*(Dif(fM7q)-Dif(fIlm7q)) +(1-0.71279)*fIlm7q(-1) ) $ FRML YJfIlm8 JfIlm8 = fIlm8 - ( 0.10935*(0.75*(Dif(fM8)-Dif(fIlm8)) +(1-0.75)*(Dif(fM8(-1))-Dif(fIlm8(-1)))) ) $ () () EKSOGENISERING MV. () () F›lgende er problematisk fordi formelnavnet er 9 karakterer () Formlen virker, men udvalg kan ikke finde den FRML YJDam3rng JDam3rng = am3rng/kveng - am3rng(-1) $ FRML YJDam3kne JDam3kne = am3kne/kvene - am3kne(-1) $ FRML YZfM3rng Zfm3rng = am3rng*fXng $ FRML YZfM3kne Zfm3kne = am3kne*fXne $