() () () 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_ Ydpsk2 = Ydp - (Ydph1+Tbhsp-Typshp) - (Yfh-kyrp2*0.82*Yfh) $ FRML _DJ_ Ydphk2 = (Ydph1+Tbhsp-Typshp) - Tiphp + Sdr + Tppun - kyrp2*0.82*Yfh $ FRML _I pcp4xhv1 = ( pcb*fCbs(-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) ) /(fCp(-1)-fCb(-1)+fCbs(-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 pcp4v2 = ( pcp4xhv1*(fCp(-1)-fCb(-1)+fCbs(-1)-fCh(-1)) +pchl*fChl(-1)+pche*fChe(-1) ) /(fCp(-1)-fCb(-1)-fCh(-1)+fCbs(-1)+fChe(-1)+fChl(-1)) $ FRML _DJRDF log(Cp4xhw) = 0.791963*log(ydpl1/pcp4v2) + (1-0.791963)*log(Wcp3(-1)/pcp4v2) -0.900345*log(pcp4xhv1/pcp4v2) - 0.305863 -0.00273788*(tid-1958) - 0.052315*D72 + log(pcp4xhv1) $ FRML _S___F Cp4xh1 = (1-Dfcp) *( exp ( 0.357954*(Ydphk2-Ydphk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +0.175511*(Ydpsk2-Ydpsk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +0.077816*Dlog(Wcp3(-1)) -0.600497*Dlog(pcp4xhv1)+0.106991*Dlog(pch1) -0.052315*(D72-D72(-1)) -0.302352*log(Cp4xh1(-1)/Cp4xhw(-1)) +log(Cp4xh1(-1)/pcp4xhv1(-1))+log(pcp4xhv1) +JRcp4xh ) +Jcp4xh1) + Dfcp*(Zfcp*pcp-(fCb-fCbs)*pcb-fCh*pch) $ FRML _I pcgbk1 = (pcg*fCg(-1)+pcb*fCbs(-1)+pck*fCk(-1)) /(fCg(-1)+fCbs(-1)+fCk(-1)) $ FRML _D fCfm = 2.76647 + .71921*(fCf(-1)-.25*Et(-1)/pcf(-1))/U(-1) $ FRML _D fCnm = 0.52799 + .86094*(fCn(-1)-.14*Et(-1)/pcn(-1))/U(-1) $ FRML _D fCim = 0.78085 + .73222*(fCi(-1)-.05*Et(-1)/pci(-1))/U(-1) $ FRML _D fCem = 0.06774 + .77232*fCe(-1)/U(-1)+.00391*fros $ FRML _D fCgbk1m = - 0.08464 + .76545*(fCgbk1(-1)-.13*Et(-1)/pcgbk1(-1))/U(-1) $ FRML _D fCvm = 0.23056 + .78199*(fCv(-1)-.05*Et(-1)/pcv(-1))/U(-1) $ FRML _D fCsm = - 0.05026+.92213*(fCs(-1)-.38*Et(-1)/pcs(-1))/U(-1) + .30774*d82inf $ FRML _D fCtm = - 0.13302 + 0.82840*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 ) +pcgbk1*( (1-Dfcgbk1)*fCgbk1m+(1-Dfcgbk1)*JfCgbk1/U +Dfcgbk1*(Zfcgbk1/U-0.13*Et/(pcgbk1*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.04645 /( 1-Dfcn*0.03410 -Dfci*0.22188 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pcf ) *U + 0.25*Et/pcf $ FRML _SJ_D fCn = ( fCnm +( 0.03410 /( 1-Dfcf*0.04645 -Dfci*0.22188 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pcn ) *U + 0.14*Et/pcn $ FRML _SJ_D fCi = ( fCim +( 0.22188 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pci ) *U + 0.05*Et/pci $ FRML _SJ_D fCe = ( fCem +( 0.07243 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfci*0.22188 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pce ) *U $ FRML _SJ_D fCgbk1 = ( fCgbk1m +(0.25897 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfci*0.22188 -Dfce*0.07243 -Dfcv*0.14425 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pcgbk1 ) *U + 0.13*Et/pcgbk1 $ FRML _SJ_D fCv = ( fCvm +(0.14425 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfci*0.22188 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcs*0.14601 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pcv ) *U + 0.05*Et/pcv $ FRML _SJ_D fCs = ( fCsm +(0.14601 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfci*0.22188 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfct*0.07591 ) ) *(Cp4xh1/U-Czm)/pcs ) *U + 0.38*Et/pcs $ FRML _SJ_D fCt = ( fCtm +(0.07591 /( 1-Dfcf*0.04645 -Dfcn*0.03410 -Dfci*0.22188 -Dfce*0.07243 -Dfcgbk1*0.25897 -Dfcv*0.14425 -Dfcs*0.14601 ) ) *(Cp4xh1/U-Czm)/pct ) *U $ FRML _D Cgk = fCgbk1*pcgbk1 - pcb*fCbs $ 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 rpcbe = .4*(pcb/pcb(-1)-1)+(1-.4)*Rpcbe(-1) $ FRML _D ucb1 = pcb*(fkncb(-1)/fkcb(-1)) *((iku*(1-tsuih))+bfinvcb-rpcbe)+(sdv/fkcb(-1)) $ FRML _DJDD fKcbw = -76213+0.472428*(ydpl1/pcp4v2) + 0.099563*(wcp3(-1)/pcp4v2)-305331*(ucb1/pck) $ FRML _SJDD fcb = .05*dif(ydpl1/pcp4v2) +.019465*dif(wcp3(-1)/pcp4v2) - 81254*dif(ucb1/pck) + 0.296882*(fKcbw(-1)-fkcb(-1)) + bfivcb*fkcb(-1) $ FRML _D fCbs = (ucb1*fKcb(-1))/pcb $ FRML _SJRD Dlog(kcb) = 0.89506*dlog(fkcb)-0.00017*(tid-1957) $ FRML _I dif(fKcb) = fCb - bfivcb*fKcb(-1) $ FRML _I dif(fKncb) = fCb - bfinvcb*fKncb(-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 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 Wcp3 = pibh*fKnbhl + phk*fKnbhe + pcb*fkncb + Wpqkpc1 + pimp11*fKnmp + pibp11*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( 1.34408*log(Cp4xh1/(U*pcp4xhv1)) +0.257073/(1+(Cp4xh1/(U*pcp4xhv1)/exp(4.03))**(-20)) -0.900345*log(pche/pcp4xhv1) + 0.095970 ) $ FRML _SJRD Dlog(phk) = 0.742400*Dlog(Cp4xh1/(U*pcp4xhv1)) -0.387476*Dlog((pche/phk)/pcp4xhv1) -0.356054*log(fKbh(-1)/fKbhw(-1)) $ FRML _GJ_D phgk = phk/kphkg $ FRML _SJRD Dlog(fKbh) = 0.3*.032790*Dlog(phk/(.8*pibh+.2*phgk)) + 0.032790*log(phk(-1)/(.8*pibh(-1)+.2*phgk(-1))) + 1.15407*nbs/fKbh(-1) + 0.00978904*log(fKbhw(-1)/fKbh(-1)) + 0.00742588 - 0.6*( 0.3*0.032790*Dlog(phk(-1)/ (.8*pibh(-1)+.2*phgk(-1))) +0.032790*log(phk(-2)/(.8*pibh(-2)+.2*phgk(-2))) +1.15407*nbs(-1)/fKbh(-2) +0.00978904*log(fKbhw(-2)/fKbh(-2)) +0.00742588 - Dlog(fKbh(-1)) ) $ FRML _DJ_ fIbh = Dif(fKbh) + bfivbh*fKbh(-1) $ FRML _GJ_D fInvbh = bfinvbh*fKnbh(-1) $ FRML _I Dif(fKnbh) = fIbh - fInvbh - 1795*Dif(d99) $ FRML _GJ_D fIbhl = 1.15407*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)*1795*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 fIbo11 = fIbo*kfibo11 $ FRML _I Ibo11 = fIbo11*pibo11 $ FRML _I fImo11 = fImo*kfimo11 $ FRML _I Imo11 = fImo11*pimo11 $ FRML _G Io11 = Imo11 + Ibo11 $ FRML _G Ivo1 = (fInvmo*pimo + fInvbo*pibo)*kivo1 $ FRML _G Iph = kiph1 *(bqsa1*(pima*fIma+piba*fIba) +bqse1*(pime*fIme+pibe*fIbe) +bqsng1*(pimng*fImng+pibng*fIbng) +bqsnn1*(pimnn*fImnn+pibnn*fIbnn) +bqsnb1*(pimnb*fImnb+pibnb*fIbnb) +bqsnm1*(pimnm*fImnm+pibnm*fIbnm) +bqsnt1*(pimnt*fImnt+pibnt*fIbnt) +bqsnk1*(pimnk*fImnk+pibnk*fIbnk) +bqsnq1*(pimnq*fImnq+pibnq*fIbnq) +bqsb1*(pimb*fImb+pibb*fIbb) +bqsqh1* (pimqh*fImqh+pibqh*fIbqh) +bqsqs1*(pimqs*fImqs+pibqs*fIbqs) +bqsqt1*(pimqt*fImqt+pibqt*fIbqt) +bqsqq1*(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 fImp11 = fIm - fImo11 $ FRML _I fIbp11 = fIb - fIbo11 - fIbh $ FRML _I I = fImp11*pimp11 + fImo11*pimo11 + fIbp11*pibp11 + fIbo11*pibo11 + 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)+dtfetw $ 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/pwaw1)*kfxa) $ FRML _GJRD Dlog(fXa) = dlog(fXae)+efxas*dlog((pne0/pwaw1)*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 pkleA1 = 1 * ((LA1/DTHQA1)/( 113.8935/ 0.8057)) **(0.5*(( 113.8935* 254.3448)/(0 + 113.8935* 254.3448 + 0.0906*111924.000 + 1.4437* 1802.7762 )+ (LA1*HQA1)/(0 +LA1*HQA1 +UIMA*FKMA +PVEA*FVEA ))) * ((UIMA/DTFKMA1)/( 0.0906/ 0.7731)) **(0.5*(( 0.0906*111924.000)/(0 + 113.8935* 254.3448 + 0.0906*111924.000 + 1.4437* 1802.7762 )+ (UIMA*FKMA)/(0 +LA1*HQA1 +UIMA*FKMA +PVEA*FVEA ))) * ((PVEA/DTFVEA1)/( 1.4437/ 1.0000)) **(0.5*(( 1.4437* 1802.7762)/(0 + 113.8935* 254.3448 + 0.0906*111924.000 + 1.4437* 1802.7762 )+ (PVEA*FVEA)/(0 +LA1*HQA1 +UIMA*FKMA +PVEA*FVEA ))) $ frml _DJRD pkleB1 = 1 * ((LB1/DTHQB1)/( 153.4036/ 1.0937)) **(0.5*(( 153.4036* 260.6424)/(0 + 153.4036* 260.6424 + 0.1294*39866.0000 + 2.1404* 701.6273 )+ (LB1*HQB1)/(0 +LB1*HQB1 +UIMB*FKMB +PVEB*FVEB ))) * ((UIMB/DTFKMB1)/( 0.1294/ 1.1742)) **(0.5*(( 0.1294*39866.0000)/(0 + 153.4036* 260.6424 + 0.1294*39866.0000 + 2.1404* 701.6273 )+ (UIMB*FKMB)/(0 +LB1*HQB1 +UIMB*FKMB +PVEB*FVEB ))) * ((PVEB/DTFVEB1)/( 2.1404/ 1.0000)) **(0.5*(( 2.1404* 701.6273)/(0 + 153.4036* 260.6424 + 0.1294*39866.0000 + 2.1404* 701.6273 )+ (PVEB*FVEB)/(0 +LB1*HQB1 +UIMB*FKMB +PVEB*FVEB ))) $ frml _DJRD pkleNB1 = 1 * ((LNB1/DTHQNB1)/( 134.6366/ 0.9634)) **(0.5*(( 134.6366* 55.7549)/(0 + 134.6366* 55.7549 + 0.0928*23086.3750 + 1.1919* 900.1561 )+ (LNB1*HQNB1)/(0 +LNB1*HQNB1 +UIMNB*FKMNB +PVENB*FVENB ))) * ((UIMNB/DTFKMNB1)/( 0.0928/ 0.9094)) **(0.5*(( 0.0928*23086.3750)/(0 + 134.6366* 55.7549 + 0.0928*23086.3750 + 1.1919* 900.1561 )+ (UIMNB*FKMNB)/(0 +LNB1*HQNB1 +UIMNB*FKMNB +PVENB*FVENB ))) * ((PVENB/DTFVENB1)/( 1.1919/ 1.0000)) **(0.5*(( 1.1919* 900.1561)/(0 + 134.6366* 55.7549 + 0.0928*23086.3750 + 1.1919* 900.1561 )+ (PVENB*FVENB)/(0 +LNB1*HQNB1 +UIMNB*FKMNB +PVENB*FVENB ))) $ frml _DJRD pkleNF1 = 1 * ((LNF1/DTHQNF1)/( 145.9794/ 0.6775)) **(0.5*(( 145.9794* 114.0998)/(0 + 145.9794* 114.0998 + 0.0997*46551.3947 + 1.1511* 1398.3126 )+ (LNF1*HQNF1)/(0 +LNF1*HQNF1 +UIMNF*FKMNF +PVENF*FVENF ))) * ((UIMNF/DTFKMNF1)/( 0.0997/ 2.0736)) **(0.5*(( 0.0997*46551.3947)/(0 + 145.9794* 114.0998 + 0.0997*46551.3947 + 1.1511* 1398.3126 )+ (UIMNF*FKMNF)/(0 +LNF1*HQNF1 +UIMNF*FKMNF +PVENF*FVENF ))) * ((PVENF/DTFVENF1)/( 1.1511/ 1.0000)) **(0.5*(( 1.1511* 1398.3126)/(0 + 145.9794* 114.0998 + 0.0997*46551.3947 + 1.1511* 1398.3126 )+ (PVENF*FVENF)/(0 +LNF1*HQNF1 +UIMNF*FKMNF +PVENF*FVENF ))) $ frml _DJRD pkleNK1 = 1 * ((LNK1/DTHQNK1)/( 162.5028/ 0.7712)) **(0.5*(( 162.5028* 90.2823)/(0 + 162.5028* 90.2823 + 0.0906*51414.1889 + 1.1862* 958.0330 )+ (LNK1*HQNK1)/(0 +LNK1*HQNK1 +UIMNK*FKMNK +PVENK*FVENK ))) * ((UIMNK/DTFKMNK1)/( 0.0906/ 0.9393)) **(0.5*(( 0.0906*51414.1889)/(0 + 162.5028* 90.2823 + 0.0906*51414.1889 + 1.1862* 958.0330 )+ (UIMNK*FKMNK)/(0 +LNK1*HQNK1 +UIMNK*FKMNK +PVENK*FVENK ))) * ((PVENK/DTFVENK1)/( 1.1862/ 1.0000)) **(0.5*(( 1.1862* 958.0330)/(0 + 162.5028* 90.2823 + 0.0906*51414.1889 + 1.1862* 958.0330 )+ (PVENK*FVENK)/(0 +LNK1*HQNK1 +UIMNK*FKMNK +PVENK*FVENK ))) $ frml _DJRD pkleNM1 = 1 * ((LNM1/DTHQNM1)/( 143.7719/ 0.7878)) **(0.5*(( 143.7719* 293.2020)/(0 + 143.7719* 293.2020 + 0.1067*70994.0000 + 1.2082* 1306.2947 )+ (LNM1*HQNM1)/(0 +LNM1*HQNM1 +UIMNM*FKMNM +PVENM*FVENM ))) * ((UIMNM/DTFKMNM1)/( 0.1067/ 1.1201)) **(0.5*(( 0.1067*70994.0000)/(0 + 143.7719* 293.2020 + 0.1067*70994.0000 + 1.2082* 1306.2947 )+ (UIMNM*FKMNM)/(0 +LNM1*HQNM1 +UIMNM*FKMNM +PVENM*FVENM ))) * ((PVENM/DTFVENM1)/( 1.2082/ 1.0000)) **(0.5*(( 1.2082* 1306.2947)/(0 + 143.7719* 293.2020 + 0.1067*70994.0000 + 1.2082* 1306.2947 )+ (PVENM*FVENM)/(0 +LNM1*HQNM1 +UIMNM*FKMNM +PVENM*FVENM ))) $ frml _DJRD pkleNN1 = 1 * ((LNN1/DTHQNN1)/( 194.5386/ 0.8717)) **(0.5*(( 194.5386* 11.3522)/(0 + 194.5386* 11.3522 + 0.0997* 5373.6053 + 1.2815* 155.2817 )+ (LNN1*HQNN1)/(0 +LNN1*HQNN1 +UIMNN*FKMNN +PVENN*FVENN ))) * ((UIMNN/DTFKMNN1)/( 0.0997/ 1.1647)) **(0.5*(( 0.0997* 5373.6053)/(0 + 194.5386* 11.3522 + 0.0997* 5373.6053 + 1.2815* 155.2817 )+ (UIMNN*FKMNN)/(0 +LNN1*HQNN1 +UIMNN*FKMNN +PVENN*FVENN ))) * ((PVENN/DTFVENN1)/( 1.2815/ 1.0000)) **(0.5*(( 1.2815* 155.2817)/(0 + 194.5386* 11.3522 + 0.0997* 5373.6053 + 1.2815* 155.2817 )+ (PVENN*FVENN)/(0 +LNN1*HQNN1 +UIMNN*FKMNN +PVENN*FVENN ))) $ frml _DJRD pkleNQ1 = 1 * ((LNQ1/DTHQNQ1)/( 146.5828/ 0.8897)) **(0.5*(( 146.5828* 165.1600)/(0 + 146.5828* 165.1600 + 0.1046*52691.2119 + 1.1752* 839.9384 )+ (LNQ1*HQNQ1)/(0 +LNQ1*HQNQ1 +UIMNQ*FKMNQ +PVENQ*FVENQ ))) * ((UIMNQ/DTFKMNQ1)/( 0.1046/ 1.1548)) **(0.5*(( 0.1046*52691.2119)/(0 + 146.5828* 165.1600 + 0.1046*52691.2119 + 1.1752* 839.9384 )+ (UIMNQ*FKMNQ)/(0 +LNQ1*HQNQ1 +UIMNQ*FKMNQ +PVENQ*FVENQ ))) * ((PVENQ/DTFVENQ1)/( 1.1752/ 1.0000)) **(0.5*(( 1.1752* 839.9384)/(0 + 146.5828* 165.1600 + 0.1046*52691.2119 + 1.1752* 839.9384 )+ (PVENQ*FVENQ)/(0 +LNQ1*HQNQ1 +UIMNQ*FKMNQ +PVENQ*FVENQ ))) $ frml _DJRD pkleNT1 = 1 * ((LNT1/DTHQNT1)/( 142.4449/ 0.8532)) **(0.5*(( 142.4449* 38.9825)/(0 + 142.4449* 38.9825 + 0.1326* 4849.0000 + 1.1929* 157.1092 )+ (LNT1*HQNT1)/(0 +LNT1*HQNT1 +UIMNT*FKMNT +PVENT*FVENT ))) * ((UIMNT/DTFKMNT1)/( 0.1326/ 1.6523)) **(0.5*(( 0.1326* 4849.0000)/(0 + 142.4449* 38.9825 + 0.1326* 4849.0000 + 1.1929* 157.1092 )+ (UIMNT*FKMNT)/(0 +LNT1*HQNT1 +UIMNT*FKMNT +PVENT*FVENT ))) * ((PVENT/DTFVENT1)/( 1.1929/ 1.0000)) **(0.5*(( 1.1929* 157.1092)/(0 + 142.4449* 38.9825 + 0.1326* 4849.0000 + 1.1929* 157.1092 )+ (PVENT*FVENT)/(0 +LNT1*HQNT1 +UIMNT*FKMNT +PVENT*FVENT ))) $ frml _DJRD pkleO1 = 1 * ((LO1/DTHQO1)/( 168.8046/ 1.0000)) **(0.5*(( 168.8046* 1001.4627)/(0 + 168.8046* 1001.4627 + 0.1271*70450.0000 + 1.8578* 2345.5413 )+ (LO1*HQO1)/(0 +LO1*HQO1 +UIMO*FKMO +PVEO*FVEO ))) * ((UIMO/DTFKMO1)/( 0.1271/ 1.0000)) **(0.5*(( 0.1271*70450.0000)/(0 + 168.8046* 1001.4627 + 0.1271*70450.0000 + 1.8578* 2345.5413 )+ (UIMO*FKMO)/(0 +LO1*HQO1 +UIMO*FKMO +PVEO*FVEO ))) * ((PVEO/DTFVEO1)/( 1.8578/ 1.0000)) **(0.5*(( 1.8578* 2345.5413)/(0 + 168.8046* 1001.4627 + 0.1271*70450.0000 + 1.8578* 2345.5413 )+ (PVEO*FVEO)/(0 +LO1*HQO1 +UIMO*FKMO +PVEO*FVEO ))) $ frml _DJRD pkleQF1 = 1 * ((LQF1/DTHQQF1)/( 257.3405/ 0.8183)) **(0.5*(( 257.3405* 101.0862)/(0 + 257.3405* 101.0862 + 0.1425*33337.0000 + 1.7306* 211.9093 )+ (LQF1*HQQF1)/(0 +LQF1*HQQF1 +UIMQF*FKMQF +PVEQF*FVEQF ))) * ((UIMQF/DTFKMQF1)/( 0.1425/ 1.2618)) **(0.5*(( 0.1425*33337.0000)/(0 + 257.3405* 101.0862 + 0.1425*33337.0000 + 1.7306* 211.9093 )+ (UIMQF*FKMQF)/(0 +LQF1*HQQF1 +UIMQF*FKMQF +PVEQF*FVEQF ))) * ((PVEQF/DTFVEQF1)/( 1.7306/ 1.0000)) **(0.5*(( 1.7306* 211.9093)/(0 + 257.3405* 101.0862 + 0.1425*33337.0000 + 1.7306* 211.9093 )+ (PVEQF*FVEQF)/(0 +LQF1*HQQF1 +UIMQF*FKMQF +PVEQF*FVEQF ))) $ frml _DJRD pkleQH1 = 1 * ((LQH1/DTHQQH1)/( 151.4012/ 0.8885)) **(0.5*(( 151.4012* 556.6840)/(0 + 151.4012* 556.6840 + 0.1159*140579.341 + 1.4945* 2402.2704 )+ (LQH1*HQQH1)/(0 +LQH1*HQQH1 +UIMQH*FKMQH +PVEQH*FVEQH ))) * ((UIMQH/DTFKMQH1)/( 0.1159/ 0.9384)) **(0.5*(( 0.1159*140579.341)/(0 + 151.4012* 556.6840 + 0.1159*140579.341 + 1.4945* 2402.2704 )+ (UIMQH*FKMQH)/(0 +LQH1*HQQH1 +UIMQH*FKMQH +PVEQH*FVEQH ))) * ((PVEQH/DTFVEQH1)/( 1.4945/ 1.0000)) **(0.5*(( 1.4945* 2402.2704)/(0 + 151.4012* 556.6840 + 0.1159*140579.341 + 1.4945* 2402.2704 )+ (PVEQH*FVEQH)/(0 +LQH1*HQQH1 +UIMQH*FKMQH +PVEQH*FVEQH ))) $ frml _DJRD pkleQQ1 = 1 * ((LQQ1/DTHQQQ1)/( 153.3746/ 0.9669)) **(0.5*(( 153.3746* 657.1651)/(0 + 153.3746* 657.1651 + 0.1512*158691.589 + 1.4177* 2439.8306 )+ (LQQ1*HQQQ1)/(0 +LQQ1*HQQQ1 +UIMQQ*FKMQQ +PVEQQ*FVEQQ ))) * ((UIMQQ/DTFKMQQ1)/( 0.1512/ 1.3102)) **(0.5*(( 0.1512*158691.589)/(0 + 153.3746* 657.1651 + 0.1512*158691.589 + 1.4177* 2439.8306 )+ (UIMQQ*FKMQQ)/(0 +LQQ1*HQQQ1 +UIMQQ*FKMQQ +PVEQQ*FVEQQ ))) * ((PVEQQ/DTFVEQQ1)/( 1.4177/ 1.0000)) **(0.5*(( 1.4177* 2439.8306)/(0 + 153.3746* 657.1651 + 0.1512*158691.589 + 1.4177* 2439.8306 )+ (PVEQQ*FVEQQ)/(0 +LQQ1*HQQQ1 +UIMQQ*FKMQQ +PVEQQ*FVEQQ ))) $ frml _DJRD pkleQT1 = 1 * ((LQT1/DTHQQT1)/( 160.3047/ 0.8778)) **(0.5*(( 160.3047* 242.6477)/(0 + 160.3047* 242.6477 + 0.1164*114613.000 + 2.2629* 2230.6596 )+ (LQT1*HQQT1)/(0 +LQT1*HQQT1 +UIMQT*FKMQT +PVEQT*FVEQT ))) * ((UIMQT/DTFKMQT1)/( 0.1164/ 1.2496)) **(0.5*(( 0.1164*114613.000)/(0 + 160.3047* 242.6477 + 0.1164*114613.000 + 2.2629* 2230.6596 )+ (UIMQT*FKMQT)/(0 +LQT1*HQQT1 +UIMQT*FKMQT +PVEQT*FVEQT ))) * ((PVEQT/DTFVEQT1)/( 2.2629/ 1.0000)) **(0.5*(( 2.2629* 2230.6596)/(0 + 160.3047* 242.6477 + 0.1164*114613.000 + 2.2629* 2230.6596 )+ (PVEQT*FVEQT)/(0 +LQT1*HQQT1 +UIMQT*FKMQT +PVEQT*FVEQT ))) $ () () ENERGIFORBRUG I FASTE PRISER () () ERHVERV NG FRML _GJRDF Dlog(fVeng) = Dlog(fXng) - Dlog(dtfveng) $ () ERHVERV H FRML _GJRDF Dlog(fVeh) = Dlog(fXh) - Dlog(dtfveh) $ () ERHVERV QS FRML _GJRDF Dlog(fVeqs) = Dlog(fXqs) - Dlog(dtfveqs) $ () ERHVERV A FRML _DJRD LOG(FVEAW1) = LOG(FXA-hostkor) -0.24400*LOG(PVEA/PKLEA1) - (1-0.24400)*LOG(DTFVEA1) -3.51590 + 0.00000*FROS $ FRML _SJRD LOG(FVEA) = LOG(FVEAW1) $ () ERHVERV NE () FRML _DJRD LOG(FVENEW1) = LOG(FXNE) () -0.14788*LOG(PVENE/PWNE1) () - (1-0.14788)*LOG(DTFVENE1) -1.61934 () + 0.0012898*FROS -0.40097*D81 $ () FRML _SJRD DLOG(FVENE) = 0.96961*DLOG(FXNE) () + 0.90000*(-0.14788)*DLOG(PVENE/PWNE1) () + 0.0012898*DIF(FROS) () -0.40097*DIF(D81) () - 0.81354*(1-0.14788)*DLOG(DTFVENE1) () - 0.81354*(LOG(FVENE(-1)/FVENEW1(-1)) ) $ () ERHVERV NF FRML _DJRD LOG(FVENFW1) = LOG(FXNF) -0.24836*LOG(PVENF/PKLENF1) - (1-0.24836)*LOG(DTFVENF1) -4.21968 + 0.00000*FROS $ FRML _SJRD DLOG(FVENF) = 0.10000*DLOG(FXNF) + 0.90000*(-0.24836)*DLOG(PVENF/PKLENF1) + 0.00000*DIF(FROS) - 0.50613*(1-0.24836)*DLOG(DTFVENF1) - 0.50613*(LOG(FVENF(-1)/FVENFW1(-1)) ) $ () ERHVERV NN FRML _DJRD LOG(FVENNW1) = LOG(FXNN) -0.21936*LOG(PVENN/PKLENN1) - (1-0.21936)*LOG(DTFVENN1) -4.14032 + 0.00000*FROS + 0.10928*D7092 $ FRML _SJRD LOG(FVENN) = LOG(FVENNW1) $ () ERHVERV NB FRML _DJRD LOG(FVENBW1) = LOG(FXNB) -0.20000*LOG(PVENB/PKLENB1) - (1-0.20000)*LOG(DTFVENB1) -3.32590 + 0.00098170*FROS $ FRML _SJRD DLOG(FVENB) = 0.50899*DLOG(FXNB) + 0.10000*(-0.20000)*DLOG(PVENB/PKLENB1) + 0.00098170*DIF(FROS) - 0.43410*(1-0.20000)*DLOG(DTFVENB1) - 0.43410*(LOG(FVENB(-1)/FVENBW1(-1)) ) $ () ERHVERV NM FRML _DJRD LOG(FVENMW1) = LOG(FXNM) -0.011921*LOG(PVENM/PKLENM1) - (1-0.011921)*LOG(DTFVENM1) -4.69081 + 0.0011934*FROS $ FRML _SJRD DLOG(FVENM) = 0.66266*DLOG(FXNM) + 0.10000*(-0.011921)*DLOG(PVENM/PKLENM1) + 0.0011934*DIF(FROS) - 0.52366*(1-0.011921)*DLOG(DTFVENM1) - 0.52366*(LOG(FVENM(-1)/FVENMW1(-1)) ) $ () ERHVERV NT FRML _DJRD LOG(FVENTW1) = LOG(FXNT) -0.24940*LOG(PVENT/PKLENT1) - (1-0.24940)*LOG(DTFVENT1) -4.83929 + 0.0021806*FROS + 0.025886*D7092 $ FRML _SJRD LOG(FVENT) = LOG(FVENTW1) $ () ERHVERV NK FRML _DJRD LOG(FVENKW1) = LOG(FXNK) -0.17842*LOG(PVENK/PKLENK1) - (1-0.17842)*LOG(DTFVENK1) -3.99850 + 0.00000*FROS + 0.30992*D7377 $ FRML _SJRD LOG(FVENK) = LOG(FVENKW1) $ () ERHVERV NQ FRML _DJRD LOG(FVENQW1) = LOG(FXNQ) -0.18812*LOG(PVENQ/PKLENQ1) - (1-0.18812)*LOG(DTFVENQ1) -4.55421 + 0.0017238*FROS $ FRML _SJRD DLOG(FVENQ) = 0.70046*DLOG(FXNQ) + 0.90000*(-0.18812)*DLOG(PVENQ/PKLENQ1) + 0.0017238*DIF(FROS) - 0.79324*(1-0.18812)*DLOG(DTFVENQ1) - 0.79324*(LOG(FVENQ(-1)/FVENQW1(-1)) ) $ () ERHVERV B FRML _DJRD LOG(FVEBW1) = LOG(FXB) -0.068114*LOG(PVEB/PKLEB1) - (1-0.068114)*LOG(DTFVEB1) -5.21738 + 0.0010110*FROS + 0.52094*D7092 $ FRML _SJRD DLOG(FVEB) = 0.68044*DLOG(FXB) + 0.90000*(-0.068114)*DLOG(PVEB/PKLEB1) + 0.0010110*DIF(FROS) + 0.52094*DIF(D7092) - 0.73794*(1-0.068114)*DLOG(DTFVEB1) - 0.73794*(LOG(FVEB(-1)/FVEBW1(-1)) ) $ FRML _DJRD LOG(FVEOW1) = LOG(FXO) -0.17928*LOG(PVEO/PKLEO1) - (1-0.17928)*LOG(DTFVEO1) -4.70261 + 0.00071935*FROS + 0.41898*D7092 $ FRML _SJRD DLOG(FVEO) = 0.90000*DLOG(FXO) + 0.56506*(-0.17928)*DLOG(PVEO/PKLEO1) + 0.00071935*DIF(FROS) + 0.41898*DIF(D7092) - 0.88443*(1-0.17928)*DLOG(DTFVEO1) - 0.88443*(LOG(FVEO(-1)/FVEOW1(-1)) ) $ FRML _DJRD LOG(FVEQHW1) = LOG(FXQH) -0.10000*LOG(PVEQH/PKLEQH1) - (1-0.10000)*LOG(DTFVEQH1) -4.46289 + 0.0014237*FROS + 0.23444*D7092 $ FRML _SJRD DLOG(FVEQH) = 0.17126*DLOG(FXQH) + 0.10000*(-0.10000)*DLOG(PVEQH/PKLEQH1) + 0.0014237*DIF(FROS) + 0.23444*DIF(D7092) - 0.30346*(1-0.10000)*DLOG(DTFVEQH1) - 0.30346*(LOG(FVEQH(-1)/FVEQHW1(-1)) ) $ () ERHVERV QT FRML _DJRD LOG(FVEQTW1) = LOG(FXQT) -0.10945*LOG(PVEQT/PKLEQT1) - (1-0.10945)*LOG(DTFVEQT1) -3.87822 + 0.0010192*FROS + 0.077764*D7092 $ FRML _SJRD LOG(FVEQT) = LOG(FVEQTW1) $ () ERHVERV QF FRML _DJRD LOG(FVEQFW1) = LOG(FXQF) -0.10000*LOG(PVEQF/PKLEQF1) - (1-0.10000)*LOG(DTFVEQF1) -5.51491 + 0.00000*FROS $ FRML _SJRD DLOG(FVEQF) = 0.25659*DLOG(FXQF) + 0.10000*(-0.10000)*DLOG(PVEQF/PKLEQF1) + 0.00000*DIF(FROS) - 0.45720*(1-0.10000)*DLOG(DTFVEQF1) - 0.45720*(LOG(FVEQF(-1)/FVEQFW1(-1)) ) $ () ERHVERV QQ FRML _DJRD LOG(FVEQQW1) = LOG(FXQQ) -0.22138*LOG(PVEQQ/PKLEQQ1) - (1-0.22138)*LOG(DTFVEQQ1) -4.78653 + 0.0014236*FROS + 0.23196*D7092 $ FRML _SJRD LOG(FVEQQ) = LOG(FVEQQW1) $ () () () 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 $ () ----------------------------------------------------- () 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 fkmaw1 = (1/dtfkma1)*0.23291**(0.51000/(1-0.51000)) *(((fXa-hostkor)/65741.89638)/1.27891) *( ( ((la1*254.34477)/(uima*111924.00000)) *(dtfkma1/dthqa1) ) **(1-0.51000) *((1-0.23291)/0.23291)**0.51000+1 ) **(0.51000/(1-0.51000))*111924.00000 $ FRML _SJRDF Dlog(fKma) = 0.14000*Dlog(fKmaw1) + 0.12908*(log(fKmaw1(-1))-log(fKma(-1))) + rofKma1 *( Dlog(fKma(-1)) -0.14000*Dlog(fKmaw1(-1)) -0.12908*(log(fKmaw1(-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 HQan1 = (1/dthqa1) *( (1/(1-0.23291)) *(((fXa-hostkor)/65741.89638)/1.27891) **(-(1/0.51000-1)) -(0.23291/(1-0.23291)) *(dtfkma1*fKmak/111924.00000)**(-(1/0.51000-1)) ) **(-(1/(1/0.51000-1)))*254.34477 $ FRML _SJRDF log(HQa1) = 0.42724*(log(HQan1)-log(Hga))+log(Hga) + (1-0.42724+(-0.35940)) *(log(HQan1(-1))-log(Hga(-1))) - (-0.35940)*(log(HQan1(-2))-log(Hga(-2))) + rohqa1 *( log(HQa1(-1)) -( 0.42724*(log(HQan1(-1))-log(Hga(-1))) +(1-0.42724+(-0.35940)) *(log(HQan1(-2))-log(Hga(-2)))-(-0.35940) *(log(HQan1(-3))-log(Hga(-3)))+log(Hga(-1)) ) ) $ FRML _DJRD Qa1 = HQa1/(bqsa1*hgsa + (1-bqsa1)*hgwa)*1000 $ FRML _D Qsa1 = bqsa1*Qa1 $ FRML _I Qwa1 = Qa1-Qsa1 $ FRML _D Ywa1 = lnakk1*Hgwa*Qwa1*0.001*kla1 $ FRML _DJR la1 = (Ywa1+siqal) /(Qwa1*Hgwa)*1000 $ FRML _DJRD HQaw1 = (1/dthqa1)*(1-0.23291)**(0.51000/(1-0.51000)) *(((fXa-hostkor)/65741.89638)/1.27891) *( ( ((uima*111924.00000)/(la1*254.34477)) *(dthqa1/dtfkma1) ) **(1-0.51000) *(0.23291/(1-0.23291))**0.51000+1 ) **(0.51000/(1-0.51000))*254.34477 $ () ----------------------------------------------------- () 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 fkmngw1 = (1/dtfkmng1)*0.65012**(0.16223/(1-0.16223)) *((fXng/8756.43262)/0.95052) *( ( ((lng1*1.18052)/(uimng*13844.00000)) *(dtfkmng1/dthqng1) ) **(1-0.16223) *((1-0.65012)/0.65012)**0.16223+1 ) **(0.16223/(1-0.16223))*13844.00000 $ FRML _SJRDF Dlog(fKmng) = 0.20*Dlog(fKmngw1) + 0.20*Dlog(fKmngw1(-1)) + 0.20*Dlog(fKmngw1(-2)) + 0.20*Dlog(fKmngw1(-3)) + 0.20*Dlog(fKmngw1(-4)) $ FRML _DJRD fImng = dif(fKmng) + bfivmng*fKmng(-1) $ FRML _DJRD fKnmng = fImng + (1-bfinvmng)*fKnmng(-1) $ FRML _DJRD HQngw1 = (1/dthqng1)*(1-0.65012)**(0.16223/(1-0.16223)) *((fXng/8756.43262)/0.95052) *( ( ((uimng*13844.00000)/(lng1*1.18052)) *(dthqng1/dtfkmng1) ) **(1-0.16223) *(0.65012/(1-0.65012))**0.16223+1 ) **(0.16223/(1-0.16223))*1.18052 $ FRML _SJRDF Dlog(HQng1) = 0.65*(Dlog(HQngw1)-Dlog(Hgng)) + Dlog(Hgng) + 0.20*(Dlog(HQngw1(-1))-Dlog(Hgng(-1))) + 0.15*(Dlog(HQngw1(-2))-Dlog(Hgng(-2))) $ FRML _DJRD Qng1 = HQng1/(bqsng1*hgsng + (1-bqsng1)*hgwng)*1000 $ FRML _D Qsng1 = bqsng1*Qng1 $ FRML _I Qwng1 = Qng1-Qsng1 $ FRML _D Ywng1 = lnakk1*Hgwng*Qwng1*0.001*klng1 $ FRML _DJR lng1 = (Ywng1+siqngl) /(Qwng1*Hgwng)*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 fkmnfw1 = (1/dtfkmnf1)*0.43806**(0.63378/(1-0.63378)) *((fXnf/104743.64063)/0.98768) *( ( ((lnf1*114.09976)/(uimnf*46551.39453)) *(dtfkmnf1/dthqnf1) ) **(1-0.63378) *((1-0.43806)/0.43806)**0.63378+1 ) **(0.63378/(1-0.63378))*46551.39453 $ FRML _SJRDF Dlog(fKmnf) = 0.094150*Dlog(fKmnfw1) + 0.10218*(log(fKmnfw1(-1))-log(fKmnf(-1))) + rofKmnf1 *( Dlog(fKmnf(-1)) -0.094150*Dlog(fKmnfw1(-1)) -0.10218*(log(fKmnfw1(-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 HQnfn1 = (1/dthqnf1) *( (1/(1-0.43806)) *((fXnf/104743.64063)/0.98768) **(-(1/0.63378-1)) -(0.43806/(1-0.43806)) *(dtfkmnf1*fKmnfk/46551.39453)**(-(1/0.63378-1)) ) **(-(1/(1/0.63378-1)))*114.09976 $ FRML _SJRDF log(HQnf1) = 0.61979*(log(HQnfn1)-log(Hgnf))+log(Hgnf) + (1-0.61979+(-0.32979)) *(log(HQnfn1(-1))-log(Hgnf(-1))) - (-0.32979)*(log(HQnfn1(-2))-log(Hgnf(-2))) + rohqnf1 *( log(HQnf1(-1)) -( 0.61979*(log(HQnfn1(-1))-log(Hgnf(-1))) +(1-0.61979+(-0.32979)) *(log(HQnfn1(-2))-log(Hgnf(-2)))-(-0.32979) *(log(HQnfn1(-3))-log(Hgnf(-3)))+log(Hgnf(-1)) ) ) $ FRML _DJRD Qnf1 = HQnf1/(bqsnf1*hgsnf + (1-bqsnf1)*hgwnf)*1000 $ FRML _D Qsnf1 = bqsnf1*Qnf1 $ FRML _I Qwnf1 = Qnf1-Qsnf1 $ FRML _D Ywnf1 = lnakk1*Hgwnf*Qwnf1*0.001*klnf1 $ FRML _DJR lnf1 = (Ywnf1+siqnfl) /(Qwnf1*Hgwnf)*1000 $ FRML _DJRD HQnfw1 = (1/dthqnf1)*(1-0.43806)**(0.63378/(1-0.63378)) *((fXnf/104743.64063)/0.98768) *( ( ((uimnf*46551.39453)/(lnf1*114.09976)) *(dthqnf1/dtfkmnf1) ) **(1-0.63378) *(0.43806/(1-0.43806))**0.63378+1 ) **(0.63378/(1-0.63378))*114.09976 $ () ----------------------------------------------------- () 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 fkmnnw1 = (1/dtfkmnn1)*0.38517**(0.27999/(1-0.27999)) *((fXnn/12090.46973)/0.95470) *( ( ((lnn1*11.35217)/(uimnn*5373.60547)) *(dtfkmnn1/dthqnn1) ) **(1-0.27999) *((1-0.38517)/0.38517)**0.27999+1 ) **(0.27999/(1-0.27999))*5373.60547 $ FRML _SJRDF Dlog(fKmnn) = 0.10000*Dlog(fKmnnw1) + 0.15958*(log(fKmnnw1(-1))-log(fKmnn(-1))) + rofKmnn1 *( Dlog(fKmnn(-1)) -0.10000*Dlog(fKmnnw1(-1)) -0.15958*(log(fKmnnw1(-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 HQnnn1 = (1/dthqnn1) *( (1/(1-0.38517)) *((fXnn/12090.46973)/0.95470) **(-(1/0.27999-1)) -(0.38517/(1-0.38517)) *(dtfkmnn1*fKmnnk/5373.60547)**(-(1/0.27999-1)) ) **(-(1/(1/0.27999-1)))*11.35217 $ FRML _SJRDF log(HQnn1) = 0.36175*(log(HQnnn1)-log(Hgnn))+log(Hgnn) + (1-0.36175+(-0.21321)) *(log(HQnnn1(-1))-log(Hgnn(-1))) - (-0.21321)*(log(HQnnn1(-2))-log(Hgnn(-2))) + rohqnn1 *( log(HQnn1(-1)) -( 0.36175*(log(HQnnn1(-1))-log(Hgnn(-1))) +(1-0.36175+(-0.21321)) *(log(HQnnn1(-2))-log(Hgnn(-2)))-(-0.21321) *(log(HQnnn1(-3))-log(Hgnn(-3)))+log(Hgnn(-1)) ) ) $ FRML _DJRD Qnn1 = HQnn1/(bqsnn1*hgsnn + (1-bqsnn1)*hgwnn)*1000 $ FRML _D Qsnn1 = bqsnn1*Qnn1 $ FRML _I Qwnn1 = Qnn1-Qsnn1 $ FRML _D Ywnn1 = lnakk1*Hgwnn*Qwnn1*0.001*klnn1 $ FRML _DJR lnn1 = (Ywnn1+siqnnl) /(Qwnn1*Hgwnn)*1000 $ FRML _DJRD HQnnw1 = (1/dthqnn1)*(1-0.38517)**(0.27999/(1-0.27999)) *((fXnn/12090.46973)/0.95470) *( ( ((uimnn*5373.60547)/(lnn1*11.35217)) *(dthqnn1/dtfkmnn1) ) **(1-0.27999) *(0.38517/(1-0.38517))**0.27999+1 ) **(0.27999/(1-0.27999))*11.35217 $ () ----------------------------------------------------- () 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 fkmnbw1 = (1/dtfkmnb1)*0.25373**(0.42664/(1-0.42664)) *((fXnb/27016.24805)/1.02412) *( ( ((lnb1*55.75492)/(uimnb*23086.37500)) *(dtfkmnb1/dthqnb1) ) **(1-0.42664) *((1-0.25373)/0.25373)**0.42664+1 ) **(0.42664/(1-0.42664))*23086.37500 $ FRML _SJRDF Dlog(fKmnb) = 0.089767*Dlog(fKmnbw1) + 0.21478*(log(fKmnbw1(-1))-log(fKmnb(-1))) + rofKmnb1 *( Dlog(fKmnb(-1)) -0.089767*Dlog(fKmnbw1(-1)) -0.21478*(log(fKmnbw1(-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 HQnbn1 = (1/dthqnb1) *( (1/(1-0.25373)) *((fXnb/27016.24805)/1.02412) **(-(1/0.42664-1)) -(0.25373/(1-0.25373)) *(dtfkmnb1*fKmnbk/23086.37500)**(-(1/0.42664-1)) ) **(-(1/(1/0.42664-1)))*55.75492 $ FRML _SJRDF log(HQnb1) = 0.51045*(log(HQnbn1)-log(Hgnb))+log(Hgnb) + (1-0.51045+(-0.19242)) *(log(HQnbn1(-1))-log(Hgnb(-1))) - (-0.19242)*(log(HQnbn1(-2))-log(Hgnb(-2))) + rohqnb1 *( log(HQnb1(-1)) -( 0.51045*(log(HQnbn1(-1))-log(Hgnb(-1))) +(1-0.51045+(-0.19242)) *(log(HQnbn1(-2))-log(Hgnb(-2)))-(-0.19242) *(log(HQnbn1(-3))-log(Hgnb(-3)))+log(Hgnb(-1)) ) ) $ FRML _DJRD Qnb1 = HQnb1/(bqsnb1*hgsnb + (1-bqsnb1)*hgwnb)*1000 $ FRML _D Qsnb1 = bqsnb1*Qnb1 $ FRML _I Qwnb1 = Qnb1-Qsnb1 $ FRML _D Ywnb1 = lnakk1*Hgwnb*Qwnb1*0.001*klnb1 $ FRML _DJR lnb1 = (Ywnb1+siqnbl) /(Qwnb1*Hgwnb)*1000 $ FRML _DJRD HQnbw1 = (1/dthqnb1)*(1-0.25373)**(0.42664/(1-0.42664)) *((fXnb/27016.24805)/1.02412) *( ( ((uimnb*23086.37500)/(lnb1*55.75492)) *(dthqnb1/dtfkmnb1) ) **(1-0.42664) *(0.25373/(1-0.25373))**0.42664+1 ) **(0.42664/(1-0.42664))*55.75492 $ () ----------------------------------------------------- () 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 fkmnmw1 = (1/dtfkmnm1)*0.31195**(0.45493/(1-0.45493)) *((fXnm/131459.39063)/1.10828) *( ( ((lnm1*293.20197)/(uimnm*70994.00000)) *(dtfkmnm1/dthqnm1) ) **(1-0.45493) *((1-0.31195)/0.31195)**0.45493+1 ) **(0.45493/(1-0.45493))*70994.00000 $ FRML _SJRDF Dlog(fKmnm) = 0.13855*Dlog(fKmnmw1) + 0.21703*(log(fKmnmw1(-1))-log(fKmnm(-1))) + rofKmnm1 *( Dlog(fKmnm(-1)) -0.13855*Dlog(fKmnmw1(-1)) -0.21703*(log(fKmnmw1(-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 HQnmn1 = (1/dthqnm1) *( (1/(1-0.31195)) *((fXnm/131459.39063)/1.10828) **(-(1/0.45493-1)) -(0.31195/(1-0.31195)) *(dtfkmnm1*fKmnmk/70994.00000)**(-(1/0.45493-1)) ) **(-(1/(1/0.45493-1)))*293.20197 $ FRML _SJRDF log(HQnm1) = 0.60060*(log(HQnmn1)-log(Hgnm))+log(Hgnm) + (1-0.60060+(-0.15193)) *(log(HQnmn1(-1))-log(Hgnm(-1))) - (-0.15193)*(log(HQnmn1(-2))-log(Hgnm(-2))) + rohqnm1 *( log(HQnm1(-1)) -( 0.60060*(log(HQnmn1(-1))-log(Hgnm(-1))) +(1-0.60060+(-0.15193)) *(log(HQnmn1(-2))-log(Hgnm(-2)))-(-0.15193) *(log(HQnmn1(-3))-log(Hgnm(-3)))+log(Hgnm(-1)) ) ) $ FRML _DJRD Qnm1 = HQnm1/(bqsnm1*hgsnm + (1-bqsnm1)*hgwnm)*1000 $ FRML _D Qsnm1 = bqsnm1*Qnm1 $ FRML _I Qwnm1 = Qnm1-Qsnm1 $ FRML _D Ywnm1 = lnakk1*Hgwnm*Qwnm1*0.001*klnm1 $ FRML _DJR lnm1 = (Ywnm1+siqnml) /(Qwnm1*Hgwnm)*1000 $ FRML _DJRD HQnmw1 = (1/dthqnm1)*(1-0.31195)**(0.45493/(1-0.45493)) *((fXnm/131459.39063)/1.10828) *( ( ((uimnm*70994.00000)/(lnm1*293.20197)) *(dthqnm1/dtfkmnm1) ) **(1-0.45493) *(0.31195/(1-0.31195))**0.45493+1 ) **(0.45493/(1-0.45493))*293.20197 $ () ----------------------------------------------------- () 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 fkmntw1 = (1/dtfkmnt1)*0.61939**(0.30748/(1-0.30748)) *((fXnt/17040.36719)/0.93781) *( ( ((lnt1*38.98254)/(uimnt*4849.00000)) *(dtfkmnt1/dthqnt1) ) **(1-0.30748) *((1-0.61939)/0.61939)**0.30748+1 ) **(0.30748/(1-0.30748))*4849.00000 $ FRML _SJRDF Dlog(fKmnt) = 0.11293*Dlog(fKmntw1) + 0.23129*(log(fKmntw1(-1))-log(fKmnt(-1))) + rofKmnt1 *( Dlog(fKmnt(-1)) -0.11293*Dlog(fKmntw1(-1)) -0.23129*(log(fKmntw1(-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 HQntn1 = (1/dthqnt1) *( (1/(1-0.61939)) *((fXnt/17040.36719)/0.93781) **(-(1/0.30748-1)) -(0.61939/(1-0.61939)) *(dtfkmnt1*fKmntk/4849.00000)**(-(1/0.30748-1)) ) **(-(1/(1/0.30748-1)))*38.98254 $ FRML _SJRDF log(HQnt1) = 0.44847*(log(HQntn1)-log(Hgnt))+log(Hgnt) + (1-0.44847+(-0.099382)) *(log(HQntn1(-1))-log(Hgnt(-1))) - (-0.099382)*(log(HQntn1(-2))-log(Hgnt(-2))) + rohqnt1 *( log(HQnt1(-1)) -( 0.44847*(log(HQntn1(-1))-log(Hgnt(-1))) +(1-0.44847+(-0.099382)) *(log(HQntn1(-2))-log(Hgnt(-2)))-(-0.099382) *(log(HQntn1(-3))-log(Hgnt(-3)))+log(Hgnt(-1)) ) ) $ FRML _DJRD Qnt1 = HQnt1/(bqsnt1*hgsnt + (1-bqsnt1)*hgwnt)*1000 $ FRML _D Qsnt1 = bqsnt1*Qnt1 $ FRML _I Qwnt1 = Qnt1-Qsnt1 $ FRML _D Ywnt1 = lnakk1*Hgwnt*Qwnt1*0.001*klnt1 $ FRML _DJR lnt1 = (Ywnt1+siqntl) /(Qwnt1*Hgwnt)*1000 $ FRML _DJRD HQntw1 = (1/dthqnt1)*(1-0.61939)**(0.30748/(1-0.30748)) *((fXnt/17040.36719)/0.93781) *( ( ((uimnt*4849.00000)/(lnt1*38.98254)) *(dthqnt1/dtfkmnt1) ) **(1-0.30748) *(0.61939/(1-0.61939))**0.30748+1 ) **(0.30748/(1-0.30748))*38.98254 $ () ----------------------------------------------------- () 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 fkmnkw1 = (1/dtfkmnk1)*0.38739**(0.38028/(1-0.38028)) *((fXnk/55882.23828)/1.24449) *( ( ((lnk1*90.28234)/(uimnk*51414.18750)) *(dtfkmnk1/dthqnk1) ) **(1-0.38028) *((1-0.38739)/0.38739)**0.38028+1 ) **(0.38028/(1-0.38028))*51414.18750 $ FRML _SJRDF Dlog(fKmnk) = 0.10000*Dlog(fKmnkw1) + 0.21843*(log(fKmnkw1(-1))-log(fKmnk(-1))) + rofKmnk1 *( Dlog(fKmnk(-1)) -0.10000*Dlog(fKmnkw1(-1)) -0.21843*(log(fKmnkw1(-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 HQnkn1 = (1/dthqnk1) *( (1/(1-0.38739)) *((fXnk/55882.23828)/1.24449) **(-(1/0.38028-1)) -(0.38739/(1-0.38739)) *(dtfkmnk1*fKmnkk/51414.18750)**(-(1/0.38028-1)) ) **(-(1/(1/0.38028-1)))*90.28234 $ FRML _SJRDF log(HQnk1) = 0.51225*(log(HQnkn1)-log(Hgnk))+log(Hgnk) + (1-0.51225+(-0.21074)) *(log(HQnkn1(-1))-log(Hgnk(-1))) - (-0.21074)*(log(HQnkn1(-2))-log(Hgnk(-2))) + rohqnk1 *( log(HQnk1(-1)) -( 0.51225*(log(HQnkn1(-1))-log(Hgnk(-1))) +(1-0.51225+(-0.21074)) *(log(HQnkn1(-2))-log(Hgnk(-2)))-(-0.21074) *(log(HQnkn1(-3))-log(Hgnk(-3)))+log(Hgnk(-1)) ) ) $ FRML _DJRD Qnk1 = HQnk1/(bqsnk1*hgsnk + (1-bqsnk1)*hgwnk)*1000 $ FRML _D Qsnk1 = bqsnk1*Qnk1 $ FRML _I Qwnk1 = Qnk1-Qsnk1 $ FRML _D Ywnk1 = lnakk1*Hgwnk*Qwnk1*0.001*klnk1 $ FRML _DJR lnk1 = (Ywnk1+siqnkl) /(Qwnk1*Hgwnk)*1000 $ FRML _DJRD HQnkw1 = (1/dthqnk1)*(1-0.38739)**(0.38028/(1-0.38028)) *((fXnk/55882.23828)/1.24449) *( ( ((uimnk*51414.18750)/(lnk1*90.28234)) *(dthqnk1/dtfkmnk1) ) **(1-0.38028) *(0.38739/(1-0.38739))**0.38028+1 ) **(0.38028/(1-0.38028))*90.28234 $ () ----------------------------------------------------- () 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 fkmnqw1 = (1/dtfkmnq1)*0.47132**(0.23758/(1-0.23758)) *((fXnq/75197.39844)/1.03025) *( ( ((lnq1*165.15999)/(uimnq*52691.21094)) *(dtfkmnq1/dthqnq1) ) **(1-0.23758) *((1-0.47132)/0.47132)**0.23758+1 ) **(0.23758/(1-0.23758))*52691.21094 $ FRML _SJRDF Dlog(fKmnq) = 0.10737*Dlog(fKmnqw1) + 0.23789*(log(fKmnqw1(-1))-log(fKmnq(-1))) + rofKmnq1 *( Dlog(fKmnq(-1)) -0.10737*Dlog(fKmnqw1(-1)) -0.23789*(log(fKmnqw1(-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 HQnqn1 = (1/dthqnq1) *( (1/(1-0.47132)) *((fXnq/75197.39844)/1.03025) **(-(1/0.23758-1)) -(0.47132/(1-0.47132)) *(dtfkmnq1*fKmnqk/52691.21094)**(-(1/0.23758-1)) ) **(-(1/(1/0.23758-1)))*165.15999 $ FRML _SJRDF log(HQnq1) = 0.63106*(log(HQnqn1)-log(Hgnq))+log(Hgnq) + (1-0.63106+(-0.10518)) *(log(HQnqn1(-1))-log(Hgnq(-1))) - (-0.10518)*(log(HQnqn1(-2))-log(Hgnq(-2))) + rohqnq1 *( log(HQnq1(-1)) -( 0.63106*(log(HQnqn1(-1))-log(Hgnq(-1))) +(1-0.63106+(-0.10518)) *(log(HQnqn1(-2))-log(Hgnq(-2)))-(-0.10518) *(log(HQnqn1(-3))-log(Hgnq(-3)))+log(Hgnq(-1)) ) ) $ FRML _DJRD Qnq1 = HQnq1/(bqsnq1*hgsnq + (1-bqsnq1)*hgwnq)*1000 $ FRML _D Qsnq1 = bqsnq1*Qnq1 $ FRML _I Qwnq1 = Qnq1-Qsnq1 $ FRML _D Ywnq1 = lnakk1*Hgwnq*Qwnq1*0.001*klnq1 $ FRML _DJR lnq1 = (Ywnq1+siqnql) /(Qwnq1*Hgwnq)*1000 $ FRML _DJRD HQnqw1 = (1/dthqnq1)*(1-0.47132)**(0.23758/(1-0.23758)) *((fXnq/75197.39844)/1.03025) *( ( ((uimnq*52691.21094)/(lnq1*165.15999)) *(dthqnq1/dtfkmnq1) ) **(1-0.23758) *(0.47132/(1-0.47132))**0.23758+1 ) **(0.23758/(1-0.23758))*165.15999 $ () ----------------------------------------------------- () 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 fkmbw1 = (1/dtfkmb1)*0.24984**(0.16941/(1-0.16941)) *((fXb/114577.46094)/0.92992) *( ( ((lb1*260.64243)/(uimb*39866.00000)) *(dtfkmb1/dthqb1) ) **(1-0.16941) *((1-0.24984)/0.24984)**0.16941+1 ) **(0.16941/(1-0.16941))*39866.00000 $ FRML _SJRDF Dlog(fKmb) = 0.35531*Dlog(fKmbw1) + 0.17427*(log(fKmbw1(-1))-log(fKmb(-1))) + rofKmb1 *( Dlog(fKmb(-1)) -0.35531*Dlog(fKmbw1(-1)) -0.17427*(log(fKmbw1(-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 HQbn1 = (1/dthqb1) *( (1/(1-0.24984)) *((fXb/114577.46094)/0.92992) **(-(1/0.16941-1)) -(0.24984/(1-0.24984)) *(dtfkmb1*fKmbk/39866.00000)**(-(1/0.16941-1)) ) **(-(1/(1/0.16941-1)))*260.64243 $ FRML _SJRDF log(HQb1) = 0.74128*(log(HQbn1)-log(Hgb))+log(Hgb) + (1-0.74128+(-0.17626)) *(log(HQbn1(-1))-log(Hgb(-1))) - (-0.17626)*(log(HQbn1(-2))-log(Hgb(-2))) + rohqb1 *( log(HQb1(-1)) -( 0.74128*(log(HQbn1(-1))-log(Hgb(-1))) +(1-0.74128+(-0.17626)) *(log(HQbn1(-2))-log(Hgb(-2)))-(-0.17626) *(log(HQbn1(-3))-log(Hgb(-3)))+log(Hgb(-1)) ) ) $ FRML _DJRD Qb1 = HQb1/(bqsb1*hgsb + (1-bqsb1)*hgwb)*1000 $ FRML _D Qsb1 = bqsb1*Qb1 $ FRML _I Qwb1 = Qb1-Qsb1 $ FRML _D Ywb1 = lnakk1*Hgwb*Qwb1*0.001*klb1 $ FRML _DJR lb1 = (Ywb1+siqbl) /(Qwb1*Hgwb)*1000 $ FRML _DJRD HQbw1 = (1/dthqb1)*(1-0.24984)**(0.16941/(1-0.16941)) *((fXb/114577.46094)/0.92992) *( ( ((uimb*39866.00000)/(lb1*260.64243)) *(dthqb1/dtfkmb1) ) **(1-0.16941) *(0.24984/(1-0.24984))**0.16941+1 ) **(0.16941/(1-0.16941))*260.64243 $ () ----------------------------------------------------- () 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 fkmqhw1 = (1/dtfkmqh1)*0.27418**(0.14296/(1-0.14296)) *((fXqh/185435.45313)/1.09135) *( ( ((lqh1*556.68402)/(uimqh*140579.34375)) *(dtfkmqh1/dthqqh1) ) **(1-0.14296) *((1-0.27418)/0.27418)**0.14296+1 ) **(0.14296/(1-0.14296))*140579.34375 $ FRML _SJRDF Dlog(fKmqh) = 0.30042*Dlog(fKmqhw1) + 0.43545*(log(fKmqhw1(-1))-log(fKmqh(-1))) + rofKmqh1 *( Dlog(fKmqh(-1)) -0.30042*Dlog(fKmqhw1(-1)) -0.43545*(log(fKmqhw1(-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 HQqhn1 = (1/dthqqh1) *( (1/(1-0.27418)) *((fXqh/185435.45313)/1.09135) **(-(1/0.14296-1)) -(0.27418/(1-0.27418)) *(dtfkmqh1*fKmqhk/140579.34375)**(-(1/0.14296-1)) ) **(-(1/(1/0.14296-1)))*556.68402 $ FRML _SJRDF log(HQqh1) = 0.52458*(log(HQqhn1)-log(Hgqh))+log(Hgqh) + (1-0.52458+(-0.30085)) *(log(HQqhn1(-1))-log(Hgqh(-1))) - (-0.30085)*(log(HQqhn1(-2))-log(Hgqh(-2))) + rohqqh1 *( log(HQqh1(-1)) -( 0.52458*(log(HQqhn1(-1))-log(Hgqh(-1))) +(1-0.52458+(-0.30085)) *(log(HQqhn1(-2))-log(Hgqh(-2)))-(-0.30085) *(log(HQqhn1(-3))-log(Hgqh(-3)))+log(Hgqh(-1)) ) ) $ FRML _DJRD Qqh1 = HQqh1/(bqsqh1*hgsqh + (1-bqsqh1)*hgwqh)*1000 $ FRML _D Qsqh1 = bqsqh1*Qqh1 $ FRML _I Qwqh1 = Qqh1-Qsqh1 $ FRML _D Ywqh1 = lnakk1*Hgwqh*Qwqh1*0.001*klqh1 $ FRML _DJR lqh1 = (Ywqh1+siqqhl) /(Qwqh1*Hgwqh)*1000 $ FRML _DJRD HQqhw1 = (1/dthqqh1)*(1-0.27418)**(0.14296/(1-0.14296)) *((fXqh/185435.45313)/1.09135) *( ( ((uimqh*140579.34375)/(lqh1*556.68402)) *(dthqqh1/dtfkmqh1) ) **(1-0.14296) *(0.27418/(1-0.27418))**0.14296+1 ) **(0.14296/(1-0.14296))*556.68402 $ () ----------------------------------------------------- () 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 fkmqsw1 = (1/dtfkmqs1)*0.93730**(0.12389/(1-0.12389)) *((fXqs/41561.28125)/1.48121) *( ( ((lqs1*34.98289)/(uimqs*102423.00000)) *(dtfkmqs1/dthqqs1) ) **(1-0.12389) *((1-0.93730)/0.93730)**0.12389+1 ) **(0.12389/(1-0.12389))*102423.00000 $ FRML _SJRDF Dlog(fKmqs) = 0.20*Dlog(fKmqsw1) + 0.20*Dlog(fKmqsw1(-1)) + 0.20*Dlog(fKmqsw1(-2)) + 0.20*Dlog(fKmqsw1(-3)) + 0.20*Dlog(fKmqsw1(-4)) $ FRML _DJRD fImqs = dif(fKmqs) + bfivmqs*fKmqs(-1) $ FRML _DJRD fKnmqs = fImqs + (1-bfinvmqs)*fKnmqs(-1) $ FRML _DJRD HQqsw1 = (1/dthqqs1)*(1-0.93730)**(0.12389/(1-0.12389)) *((fXqs/41561.28125)/1.48121) *( ( ((uimqs*102423.00000)/(lqs1*34.98289)) *(dthqqs1/dtfkmqs1) ) **(1-0.12389) *(0.93730/(1-0.93730))**0.12389+1 ) **(0.12389/(1-0.12389))*34.98289 $ FRML _SJRDF Dlog(HQqs1) = 0.65*(Dlog(HQqsw1)-Dlog(Hgqs)) + Dlog(Hgqs) + 0.20*(Dlog(HQqsw1(-1))-Dlog(Hgqs(-1))) + 0.15*(Dlog(HQqsw1(-2))-Dlog(Hgqs(-2))) $ FRML _DJRD Qqs1 = HQqs1/(bqsqs1*hgsqs + (1-bqsqs1)*hgwqs)*1000 $ FRML _D Qsqs1 = bqsqs1*Qqs1 $ FRML _I Qwqs1 = Qqs1-Qsqs1 $ FRML _D Ywqs1 = lnakk1*Hgwqs*Qwqs1*0.001*klqs1 $ FRML _DJR lqs1 = (Ywqs1+siqqsl) /(Qwqs1*Hgwqs)*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 fkmqtw1 = (1/dtfkmqt1)*0.13765**(0.10000/(1-0.10000)) *((fXqt/106955.57031)/1.11077) *( ( ((lqt1*242.64774)/(uimqt*114613.00000)) *(dtfkmqt1/dthqqt1) ) **(1-0.10000) *((1-0.13765)/0.13765)**0.10000+1 ) **(0.10000/(1-0.10000))*114613.00000 $ FRML _SJRDF Dlog(fKmqt) = 0.15925*Dlog(fKmqtw1) + 0.20810*(log(fKmqtw1(-1))-log(fKmqt(-1))) + rofKmqt1 *( Dlog(fKmqt(-1)) -0.15925*Dlog(fKmqtw1(-1)) -0.20810*(log(fKmqtw1(-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 HQqtn1 = (1/dthqqt1) *( (1/(1-0.13765)) *((fXqt/106955.57031)/1.11077) **(-(1/0.10000-1)) -(0.13765/(1-0.13765)) *(dtfkmqt1*fKmqtk/114613.00000)**(-(1/0.10000-1)) ) **(-(1/(1/0.10000-1)))*242.64774 $ FRML _SJRDF log(HQqt1) = 0.46920*(log(HQqtn1)-log(Hgqt))+log(Hgqt) + (1-0.46920+(-0.29697)) *(log(HQqtn1(-1))-log(Hgqt(-1))) - (-0.29697)*(log(HQqtn1(-2))-log(Hgqt(-2))) + rohqqt1 *( log(HQqt1(-1)) -( 0.46920*(log(HQqtn1(-1))-log(Hgqt(-1))) +(1-0.46920+(-0.29697)) *(log(HQqtn1(-2))-log(Hgqt(-2)))-(-0.29697) *(log(HQqtn1(-3))-log(Hgqt(-3)))+log(Hgqt(-1)) ) ) $ FRML _DJRD Qqt1 = HQqt1/(bqsqt1*hgsqt + (1-bqsqt1)*hgwqt)*1000 $ FRML _D Qsqt1 = bqsqt1*Qqt1 $ FRML _I Qwqt1 = Qqt1-Qsqt1 $ FRML _D Ywqt1 = lnakk1*Hgwqt*Qwqt1*0.001*klqt1 $ FRML _DJR lqt1 = (Ywqt1+siqqtl) /(Qwqt1*Hgwqt)*1000 $ FRML _DJRD HQqtw1 = (1/dthqqt1)*(1-0.13765)**(0.10000/(1-0.10000)) *((fXqt/106955.57031)/1.11077) *( ( ((uimqt*114613.00000)/(lqt1*242.64774)) *(dthqqt1/dtfkmqt1) ) **(1-0.10000) *(0.13765/(1-0.13765))**0.10000+1 ) **(0.10000/(1-0.10000))*242.64774 $ () ----------------------------------------------------- () 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 fkmqfw1 = (1/dtfkmqf1)*0.90856**(0.10000/(1-0.10000)) *((fXqf/65028.85938)/1.02415) *( ( ((lqf1*101.08623)/(uimqf*33337.00000)) *(dtfkmqf1/dthqqf1) ) **(1-0.10000) *((1-0.90856)/0.90856)**0.10000+1 ) **(0.10000/(1-0.10000))*33337.00000 $ FRML _SJRDF Dlog(fKmqf) = 0.20*Dlog(fKmqfw1) + 0.20*Dlog(fKmqfw1(-1)) + 0.20*Dlog(fKmqfw1(-2)) + 0.20*Dlog(fKmqfw1(-3)) + 0.20*Dlog(fKmqfw1(-4)) $ FRML _DJRD fImqf = dif(fKmqf) + bfivmqf*fKmqf(-1) $ FRML _DJRD fKnmqf = fImqf + (1-bfinvmqf)*fKnmqf(-1) $ FRML _DJRD HQqfw1 = (1/dthqqf1)*(1-0.90856)**(0.10000/(1-0.10000)) *((fXqf/65028.85938)/1.02415) *( ( ((uimqf*33337.00000)/(lqf1*101.08623)) *(dthqqf1/dtfkmqf1) ) **(1-0.10000) *(0.90856/(1-0.90856))**0.10000+1 ) **(0.10000/(1-0.10000))*101.08623 $ FRML _SJRDF Dlog(HQqf1) = 0.65*(Dlog(HQqfw1)-Dlog(Hgqf)) + Dlog(Hgqf) + 0.20*(Dlog(HQqfw1(-1))-Dlog(Hgqf(-1))) + 0.15*(Dlog(HQqfw1(-2))-Dlog(Hgqf(-2))) $ FRML _DJRD Qqf1 = HQqf1/(bqsqf1*hgsqf + (1-bqsqf1)*hgwqf)*1000 $ FRML _D Qsqf1 = bqsqf1*Qqf1 $ FRML _I Qwqf1 = Qqf1-Qsqf1 $ FRML _D Ywqf1 = lnakk1*Hgwqf*Qwqf1*0.001*klqf1 $ FRML _DJR lqf1 = (Ywqf1+siqqfl) /(Qwqf1*Hgwqf)*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 fkmqqw1 = (1/dtfkmqq1)*0.35201**(0.40000/(1-0.40000)) *((fXqq/254401.78125)/0.91788) *( ( ((lqq1*657.16510)/(uimqq*158691.59375)) *(dtfkmqq1/dthqqq1) ) **(1-0.40000) *((1-0.35201)/0.35201)**0.40000+1 ) **(0.40000/(1-0.40000))*158691.59375 $ FRML _SJRDF Dlog(fKmqq) = 0.11258*Dlog(fKmqqw1) + 0.37084*(log(fKmqqw1(-1))-log(fKmqq(-1))) + rofKmqq1 *( Dlog(fKmqq(-1)) -0.11258*Dlog(fKmqqw1(-1)) -0.37084*(log(fKmqqw1(-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 HQqqn1 = (1/dthqqq1) *( (1/(1-0.35201)) *((fXqq/254401.78125)/0.91788) **(-(1/0.40000-1)) -(0.35201/(1-0.35201)) *(dtfkmqq1*fKmqqk/158691.59375)**(-(1/0.40000-1)) ) **(-(1/(1/0.40000-1)))*657.16510 $ FRML _SJRDF log(HQqq1) = 0.35763*(log(HQqqn1)-log(Hgqq))+log(Hgqq) + (1-0.35763+(-0.30549)) *(log(HQqqn1(-1))-log(Hgqq(-1))) - (-0.30549)*(log(HQqqn1(-2))-log(Hgqq(-2))) + rohqqq1 *( log(HQqq1(-1)) -( 0.35763*(log(HQqqn1(-1))-log(Hgqq(-1))) +(1-0.35763+(-0.30549)) *(log(HQqqn1(-2))-log(Hgqq(-2)))-(-0.30549) *(log(HQqqn1(-3))-log(Hgqq(-3)))+log(Hgqq(-1)) ) ) $ FRML _DJRD Qqq1 = HQqq1/(bqsqq1*hgsqq + (1-bqsqq1)*hgwqq)*1000 $ FRML _D Qsqq1 = bqsqq1*Qqq1 $ FRML _I Qwqq1 = Qqq1-Qsqq1 $ FRML _D Ywqq1 = lnakk1*Hgwqq*Qwqq1*0.001*klqq1 $ FRML _DJR lqq1 = (Ywqq1+siqqql) /(Qwqq1*Hgwqq)*1000 $ FRML _DJRD HQqqw1 = (1/dthqqq1)*(1-0.35201)**(0.40000/(1-0.40000)) *((fXqq/254401.78125)/0.91788) *( ( ((uimqq*158691.59375)/(lqq1*657.16510)) *(dthqqq1/dtfkmqq1) ) **(1-0.40000) *(0.35201/(1-0.35201))**0.40000+1 ) **(0.40000/(1-0.40000))*657.16510 $ () () 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, K*, K) FRML _D__D pkzne1 = pkzne1(-1) *(pvmne/pvmne(-1)) **(0.5*( (pvmne*bfvmne1) /(pvmne*bfvmne1+lne1*bhqne1+uimne*bfkmne1+uibne*bfkbne1) +(pvmne(-1)*bfvmne1(-1)) /(pvmne(-1)*bfvmne1(-1)+lne1(-1)*bhqne1(-1) +uimne(-1)*bfkmne1(-1)+uibne(-1)*bfkbne1(-1)) )) *(lne1/lne1(-1)) **(0.5*( (lne1*bhqne1) /(pvmne*bfvmne1+lne1*bhqne1+uimne*bfkmne1+uibne*bfkbne1) +(lne1(-1)*bhqne1(-1)) /(pvmne(-1)*bfvmne1(-1)+lne1(-1)*bhqne1(-1) +uimne(-1)*bfkmne1(-1)+uibne(-1)*bfkbne1(-1)) )) *(uimne/uimne(-1)) **(0.5*( (uimne*bfkmne1) /(pvmne*bfvmne1+lne1*bhqne1+uimne*bfkmne1+uibne*bfkbne1) +(uimne(-1)*bfkmne1(-1)) /(pvmne(-1)*bfvmne1(-1)+lne1(-1)*bhqne1(-1) +uimne(-1)*bfkmne1(-1)+uibne(-1)*bfkbne1(-1)) )) *(uibne/uibne(-1)) **(0.5*( (uibne*bfkbne1) /(pvmne*bfvmne1+lne1*bhqne1+uimne*bfkmne1+uibne*bfkbne1) +(uibne(-1)*bfkbne1(-1)) /(pvmne(-1)*bfvmne1(-1)+lne1(-1)*bhqne1(-1) +uimne(-1)*bfkmne1(-1)+uibne(-1)*bfkbne1(-1)) )) $ FRML _D__D log(pwne2) = (1/(1-0.16961)) *log( 0.000015551**0.16961 * (pkzne1/dtfkzne1)**(1-0.16961) +0.00011357**0.16961 * (pvene/dtfvene1)**(1-0.16961) ) $ FRML _D log(dtfkzne1) = 0.20*log(dthqne1) + 0.12*log(dtfkmne1) + 0.52*log(dtfkbne1) + 0.16*log(dtfvmne1) $ FRML _DJRD log(fKznew1) = log(fXne/1.00000) - 0.16961*log(pkzne1/pwne2) - (1-0.16961)*log(dtfkzne1) + 0.094681*d81 + 0.16961*log(0.000015551) $ FRML _SJRD Dlog(fKzne1) = 0.26455*Dlog(fXne) + 0.26455*(-0.16961)*Dlog(pkzne1/pwne2) - 0.30000*(1-0.16961)*Dlog(dtfkzne1) + 0.094681*Dif(d81) - 0.30000*(log(fKzne1(-1))-log(fKznew1(-1))) $ () ENERGI (E*, E) FRML _DJRD log(fVenew1) = log(fXne/1.00000) - 0.16961*log(pvene/pwne2) - (1-0.16961)*log(dtfvene1) + (-0.32940)*d81 + 0.16961*log(0.00011357) $ FRML _SJRDF Dlog(fVene) = 1.17333*Dlog(fXne) + 1.17333*(-0.16961)*Dlog(pvene/pwne2) - 0.72235*(1-0.16961)*Dlog(dtfvene1) + (-0.32940)*Dif(d81) - 0.72235*(log(fVene(-1))-log(fVenew1(-1))) $ () Udsplitning af Kapacitet på underliggende faktorer () Bygningskapital FRML _DJRD fKbnew1 = bfkbne1*fKznew1*(dtfkzne1/dtfkbne1) $ FRML _GJRDF Dlog(fKbne) = Dlog(bfkbne1) + 0.26455*Dlog(fXne) + 0.26455*(-0.16961)*Dlog(pkzne1/pwne2) - 0.30000*(1-0.16961)*Dlog(dtfkzne1) + 0.094681*Dif(d81) - 0.30000*log(fKbne(-1)/fKbnew1(-1)) $ FRML _DJRD fIbne = Dif(fKbne) + bfivbne*fKbne(-1) $ FRML _DJRD fKnbne = fIbne + (1-bfinvbne)*fKnbne(-1) + (-33*d99) $ () Maskinkapital FRML _DJRD fKmnew1 = bfkmne1*fKznew1*(dtfkzne1/dtfkmne1) $ FRML _GJRDF Dlog(fKmne) = Dlog(bfkmne1)+0.26455*Dlog(fXne) + 0.26455*(-0.16961)*Dlog(pkzne1/pwne2) - 0.30000*(1-0.16961)*Dlog(dtfkzne1) + 0.094681*Dif(d81) - 0.30000*log(fKmne(-1)/fKmnew1(-1)) $ FRML _DJRD fImne = Dif(fKmne) + bfivmne*fKmne(-1) $ FRML _DJRD fKnmne = fImne + (1-bfinvmne)*fKnmne(-1) $ () Arbejdskraft FRML _DJRD HQnew1 = bhqne1*fKznew1*(dtfkzne1/dthqne1) $ FRML _GJRDF Dlog(HQne1) = Dlog(bhqne1)+0.26455*Dlog(fXne) + 0.26455*(-0.16961)*Dlog(pkzne1/pwne2) - 0.30000*(1-0.16961)*Dlog(dtfkzne1) + 0.094681*Dif(d81) - 0.30000*log(HQne1(-1)/HQnew1(-1)) $ FRML _DJRD Qne1 = HQne1/(bqsne1*hgsne+(1-bqsne1)*hgwne)*1000 $ FRML _D Qsne1 = bqsne1*Qne1 $ FRML _I Qwne1 = Qne1-Qsne1 $ FRML _D Ywne1 = lnakk1*Hgwne*Qwne1*0.001*klne1 $ FRML _DJRD lne1 = (Ywne1+siqnel) /(Qwne1*Hgwne)*1000 $ () Materialer FRML _DJRD fVmnew1 = bfvmne1*fKznew1*(dtfkzne1/dtfvmne1) $ FRML _GJRDF Dlog(fVmne) = Dlog(bfvmne1)+0.26455*Dlog(fXne) + 0.26455*(-0.16961)*Dlog(pkzne1/pwne2) - 0.30000*(1-0.16961)*Dlog(dtfkzne1) + 0.094681*Dif(d81) - 0.30000*log(fVmne(-1)/fVmnew1(-1)) $ () SEKTORPRIS FRML _D pwnew1 = (pvene*fVenew1+pkzne1*fKznew1+siqne-siqnel-.006*Siqej)/fXne $ FRML _D pwneve = pvene*fVene/fXne $ FRML _DJRD log(pxnew1) = log(pwnew1) $ FRML _SJRDF Dlog(pxne) = 0.93719*Dlog(pwneve)*(pwneve(-1)/pxne(-1)) + 0.06281*Dlog(pwneve(-1))*(pwneve(-1)/pxne(-1)) - 0.50000*(log(pxne(-1))-log(pxnew1(-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 HQe1 = 1/dthqe*(dthqe(-1)*HQe1(-1))*(fXe/fXe(-1)) $ FRML _DJRD Qe1 = HQe1/(bqse1*hgse+(1-bqse1)*hgwe)*1000 $ FRML _D Qse1 = bqse1*Qe1 $ FRML _I Qwe1 = Qe1-Qse1 $ FRML _G Ywe1 = lnakk1*Hgwe*Qwe1*0.001*kle1 $ FRML _DJRD le1 = (Ywe1+siqel)/(Qwe1*Hgwe)*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 HQh1 = 1/dthqh*(dthqh(-1)*HQh1(-1))*(fXh/fXh(-1)) $ FRML _DJRD Qh1 = HQh1/(bqsh1*hgsh+(1-bqsh1)*hgwh)*1000 $ FRML _D Qsh1 = bqsh1*Qh1 $ FRML _I Qwh1 = Qh1-Qsh1 $ FRML _G Ywh1 = lnakk1*Hgwh*Qwh1*0.001*klh1 $ FRML _DJRD lh1 = (Ywh1+siqhl)/(Qwh1*Hgwh)*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 Qso1 = bqso1/(1-bqso1)*Qwo1 $ FRML _I Qo2 = Qwo1 + Qso1 $ FRML _DJRD HQo1 = (Qo2*((bqso1*hgso+(1-bqso1)*hgwo)))/1000 $ FRML _GJRD Ywo2 = lohkk1*Qwo1*(1-bqo/2)*0.001 $ FRML _DJRD lo1 = (Ywo2+siqol) /(Qwo1*Hgwo)*1000 $ FRML _D fYfo = klohh1*Ha*Qwo1*(1-bqo/2) + fInvmo + fInvbo $ FRML _I fVo = fVeo + fVmo $ FRML _I fXo = fYfo + fVo $ FRML _I Yfo = Ywo2 + (fInvmo*pimo+fInvbo*pibo)*kivo2 + 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 fIo11 = fImo11 + fIbo11 $ FRML _G Qo1 = Qo2*kqo2 $ FRML _I Qp12 = Q1 - 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) + (-138 * 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) $ () () () ARBEJDSMARKED () () () ARBEJDSLSHED () () FRML _I Uaw = Ua1 - (Q1-Qw1) $ 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 Ul = Ua1 - Q1 $ FRML _D bul1 = Ul/Uaw $ () ARBEJDSUDBUD FRML _D Ua1 = (Uw - Uwxa)*(1-D7184) + Ua1*D7184 $ () UDENFOR ARBEJDSSTYRKE FRML _I Uwxa =( Uuxa + Uak + Urev + Usxa + Usb + Umf + Uef + Ufox + Ukxa + Ur - (Ur1 + Ur2))*(1-dUwxa) + dUwxa*ZUwxa $ () AKTIVERING () FRML _G__D Qmf = exp((log(Qmf(-1)*(1-d7194)+d7194)+bqmf*dlog(Ul))) () *(1+JRQmf) $ () FRML _G__D Uak = exp((log(Uak(-1)*(1-d7193)+d7193)+buak*dlog(Ul))) () *(1+JRUak) $ FRML _G__D Qmf = (1+bqmf*(Ul/Ul(-1)-1)*(1-d7194(-1))) *(Qmf(-1)+d7194(-1))*(1+JRQmf)-d7194 $ FRML _G__D Uak = (1+buak*(Ul/Ul(-1)-1)*(1-d7193(-1))) *(Uak(-1)+d7193(-1))*(1+JRUak)-d7193 $ () EFTERLØN FRML _G___ Uefw = (Uefe + euefyl*((Yduef*(1-d7199)+d7199) /((Ydua+d99(-1))*(1-d7199)+d7199)-kuef) + JDUefw)*(1-duef) + duef*zuef $ FRML _G___ Uef = (dif(Uefe) + euefys*((Yduef*(1-d7199)+d7199) /((Ydua+d99(-1))*(1-d7199)+d7199)-kuef) + 0.25*(uefw(-1)-uef(-1))+ Uef(-1) + JDUef)*(1-duef) + duef*zuef $ () UDDANNELSE FRML _S__D uuxa = (-0.37229*Dif(Q1/U1564) + uuxa(-1)/u1529(-1))*u1529 *(1-d7184) + JDUuxa $ () ARBEJDStid FRML _SJ_D log(Hgw) = 0.31495*Dlog(fyf) + log((Ha+Hdag)*(1-bq/2)) - 0.09561 $ FRML _GJRD Hgwa = Hgwa(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwe = Hgwe(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwng = Hgwng(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwne = Hgwne(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnf = Hgwnf(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnn = Hgwnn(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnb = Hgwnb(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnm = Hgwnm(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnt = Hgwnt(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnk = Hgwnk(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwnq = Hgwnq(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwb = Hgwb(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwqh = Hgwqh(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwqs = Hgwqs(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwqt = Hgwqt(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwqf = Hgwqf(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwqq = Hgwqq(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwh = Hgwh(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgwo = Hgwo(-1)*Hgw/Hgw(-1) $ FRML _D Hgwn = (Hgwng*Qwng1 + Hgwne*Qwne1 + Hgwnf*Qwnf1 + Hgwnn*Qwnn1+ Hgwnb*Qwnb1 + Hgwnm*Qwnm1 + Hgwnt*Qwnt1 + Hgwnk*Qwnk1+ Hgwnq*Qwnq1) /(Qwng1 + Qwne1 + Qwnf1 + Qwnn1 + Qwnb1 + Qwnm1 + Qwnt1 + Qwnk1 + Qwnq1) $ FRML _GJRD Hgsa = Hgsa(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnf = Hgsnf(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnn = Hgsnn(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnb = Hgsnb(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnm = Hgsnm(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnt = Hgsnt(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnk = Hgsnk(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsnq = Hgsnq(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsb = Hgsb(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsqh = Hgsqh(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsqs = Hgsqs(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsqt = Hgsqt(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsqq = Hgsqq(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgsh = Hgsh(-1)*Hgw/Hgw(-1) $ FRML _GJRD Hgso = Hgso(-1)*Hgw/Hgw(-1) $ FRML _D Hga = bqsa1*hgsa+(1-bqsa1)*hgwa $ FRML _D Hge = bqse1*hgse+(1-bqse1)*hgwe $ FRML _D Hgng = bqsng1*hgsng+(1-bqsng1)*hgwng $ FRML _D Hgne = bqsne1*hgsne+(1-bqsne1)*hgwne $ FRML _D Hgnf = bqsnf1*hgsnf+(1-bqsnf1)*hgwnf $ FRML _D Hgnn = bqsnn1*hgsnn+(1-bqsnn1)*hgwnn $ FRML _D Hgnb = bqsnb1*hgsnb+(1-bqsnb1)*hgwnb $ FRML _D Hgnm = bqsnm1*hgsnm+(1-bqsnm1)*hgwnm $ FRML _D Hgnt = bqsnt1*hgsnt+(1-bqsnt1)*hgwnt $ FRML _D Hgnk = bqsnk1*hgsnk+(1-bqsnk1)*hgwnk $ FRML _D Hgnq = bqsnq1*hgsnq+(1-bqsnq1)*hgwnq $ FRML _D Hgb = bqsb1*hgsb+(1-bqsb1)*hgwb $ FRML _D Hgqh = bqsqh1*hgsqh+(1-bqsqh1)*hgwqh $ FRML _D Hgqs = bqsqs1*hgsqs+(1-bqsqs1)*hgwqs $ FRML _D Hgqt = bqsqt1*hgsqt+(1-bqsqt1)*hgwqt $ FRML _D Hgqf = bqsqf1*hgsqf+(1-bqsqf1)*hgwqf $ FRML _D Hgqq = bqsqq1*hgsqq+(1-bqsqq1)*hgwqq $ FRML _D Hgh = bqsh1*hgsh+(1-bqsh1)*hgwh $ FRML _D Hgo = bqso1*hgso+(1-bqso1)*hgwo $ () HJÆLPESYSTEM TIL ENDOGENISERING AF SKATTER MM. I LØN OG ARBEJDSTID () () GENNEMSNITLIG ARBEJDSTID FOR ENDOGEN TREND FRML _G log(haw) = log(dthaw) $ FRML _G log(ha) = log(ha(-1)) + 0.15*(log(haw(-1))-log(ha(-1))) + kha $ () TRENDÆNDRING FRML _G dlog(dtlnap) = ( ehgwl*dlog(haw) +ebtyddl*dlog(btydd*(1-d7199)+d7199) +bwb * etss0wl * dlog(1-tss0wb) +bwm * etss0wl * dlog(1-tss0wm) +bwt * etss0wl * dlog(1-tss0wt) +bwb * etssmwl * dlog(1-tssmwb) +bwm * etssmwl * dlog(1-tssmwm) +bwt * etssmwl * dlog(1-tssmwt) + epcpl * dlog(1-tsda) +epcpl*dlog(pcp))*(1-ddtlnap) + ddtlnap*dlog(zdtlnap) $ FRML _G dlog(dthaw) = (bwb * etss0wh * dlog(1-tss0wb) +bwm * etss0wh * dlog(1-tss0wm) +bwt * etss0wh * dlog(1-tss0wt) +bwb * etssmwh * dlog(1-tssmwb) +bwm * etssmwh * dlog(1-tssmwm) +bwt * etssmwh * dlog(1-tssmwt) + epcph * dlog(1-tsda) +epcph*dlog(lnap/pcp))*(1-ddthaw) + ddthaw*dlog(zdthaw) $ () Disponible gennemsnitsindkomster FRML _G Ydna = (lnap*hgwn*(1-(tsda+taqwy1))-taqwh1) *(1-tss0w)*(1-d7199) $ FRML _GJRD ttyd = ttyd(-1)*(1+dlog(lih*ha)) $ FRML _G Ydl = ttyd*(1-taqwy1)*(1-tss0l)*(1-d7199) $ FRML _G__D btydd = (Ydl*(1-d7199)+d7199)/(Ydna*(1-d7199)+d7199) $ FRML _G Ydua = bul1*Ydl+(1-bul1)*Ydna $ FRML _GJ_ yduef = ttysae1*ptty1*(1-Tss0ef)*(1-d7199) $ () SAMLEt BESKÆFTIGELSE FRML _I Q1 = Qa1+Qe1+Qb1+Qh1+Qo2 +Qng1+Qne1+Qnf1+Qnn1+Qnb1+Qnm1+Qnt1+Qnk1+Qnq1 +Qqh1+QqS1+Qqt1+Qqf1+Qqq1+Qres1 $ FRML _I Qw1 = Q1-Qsa1-Qse1-Qsb1-Qsh1-Qso1 -Qsng1-Qsne1-Qsnf1-Qsnn1-Qsnb1-Qsnm1-Qsnt1-Qsnk1-Qsnq1 -Qsqh1-Qsqs1-Qsqt1-Qsqf1-Qsqq1 $ FRML _I Qs1 = Q1-Qw1 $ FRML _I Qwp1 = Qw1-Qwo1 $ FRML _I Qsp1 = Qs1-Qso1 $ () () 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 pwaw1 = ( uima*fKmaw1+uiba*fKbaw+la1*HQaw1+pvea*fVeaw1 +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 pwnfw1 = ( uimnf*fKmnfw1+uibnf*fKbnfw+lnf1*HQnfw1+pvenf*fVenfw1 +pvmnf*fVmnf+Siqnf-.008*Siqej-Siqnfl)/fXnf $ FRML _D pwnfvv = Vnf/fXnf $ FRML _D pwnfvl1 = (lnf1*HQnfn1)/fXnf $ FRML _DJRD log(pxnfw1) = log(pwnfw1) $ () Mow's retvending af landbruget FRML _SJRD dlog(pxnf) = 0.83994*dlog(pne0)+0.16006*dlog(pne0(-1)) $ () () NYDELSESMIDDELINDUSTRI () FRML _D pwnnw1 = ( uimnn*fKmnnw1+uibnn*fKbnnw+lnn1*HQnnw1 +pvenn*fVennw1+pvmnn*fVmnn+Siqnn-0.0030000*Siqej-Siqnnl)/fXnn $ FRML _D pwnnvv = Vnn/fXnn $ FRML _D pwnnvl1 = (lnn1*HQnnn1)/fXnn $ FRML _DJRD log(pxnnw1) = log(pwnnw1) + 0.027192/0.20000 $ FRML _SJRD dlog(pxnn) = 1.00000*dlog(pwnnvl1)*pwnnvl1(-1)/pxnn(-1) +0.70768*dlog(pwnnvv)*pwnnvv(-1)/pxnn(-1) +0.00000*dlog(pwnnvl1(-1))*pwnnvl1(-1)/pxnn(-1) +0.29232*dlog(pwnnvv(-1))*pwnnvv(-1)/pxnn(-1) -0.20000*log(pxnn(-1)/pxnnw1(-1)) $ () () LEVERANDRER TIL BYGGERI () FRML _D pwnbw1 = ( uimnb*fKmnbw1+uibnb*fKbnbw+lnb1*HQnbw1 +pvenb*fVenbw1+pvmnb*fVmnb+Siqnb-0.0060000*Siqej-Siqnbl)/fXnb $ FRML _D pwnbvv = Vnb/fXnb $ FRML _D pwnbvl1 = (lnb1*HQnbn1)/fXnb $ FRML _DJRD log(pxnbw1) = log(pwnbw1) + 0.00000 $ FRML _SJRD dlog(pxnb) = 0.45557*dlog(pwnbvl1)*pwnbvl1(-1)/pxnb(-1) +0.92789*dlog(pwnbvv)*pwnbvv(-1)/pxnb(-1) +0.54443*dlog(pwnbvl1(-1))*pwnbvl1(-1)/pxnb(-1) +0.24308*dlog(pwnbvv(-1))*pwnbvv(-1)/pxnb(-1) -0.20000*log(pxnb(-1)/pxnbw1(-1)) $ () () JERN- OG METALINDUSTRI () FRML _D pwnmw1 = ( uimnm*fKmnmw1+uibnm*fKbnmw+lnm1*HQnmw1 +pvenm*fVenmw1+pvmnm*fVmnm+Siqnm-0.018000*Siqej-Siqnml)/fXnm $ FRML _D pwnmvv = Vnm/fXnm $ FRML _D pwnmvl1 = (lnm1*HQnmn1)/fXnm $ FRML _DJRD log(pxnmw1) = log(pwnmw1) + 0.00000 $ FRML _SJRD dlog(pxnm) = 0.44094*dlog(pwnmvl1)*pwnmvl1(-1)/pxnm(-1) +0.75098*dlog(pwnmvv)*pwnmvv(-1)/pxnm(-1) +0.55906*dlog(pwnmvl1(-1))*pwnmvl1(-1)/pxnm(-1) +0.24902*dlog(pwnmvv(-1))*pwnmvv(-1)/pxnm(-1) -0.20000*log(pxnm(-1)/pxnmw1(-1)) $ () () TRANSPORTMIDDELINDUSTRI () FRML _D pwntw1 = ( uimnt*fKmntw1+uibnt*fKbntw+lnt1*HQntw1 +pvent*fVentw1+pvmnt*fVmnt+Siqnt-0.0030000*Siqej-Siqntl)/fXnt $ FRML _D pwntvv = Vnt/fXnt $ FRML _D pwntvl1 = (lnt1*HQntn1)/fXnt $ FRML _DJRD log(pxntw1) = log(pwntw1) + 0.00000 $ FRML _SJRD dlog(pxnt) = 0.28897*dlog(pwntvl1)*pwntvl1(-1)/pxnt(-1) +0.78165*dlog(pwntvv)*pwntvv(-1)/pxnt(-1) +0.71103*dlog(pwntvl1(-1))*pwntvl1(-1)/pxnt(-1) +0.21835*dlog(pwntvv(-1))*pwntvv(-1)/pxnt(-1) -0.21722*log(pxnt(-1)/pxntw1(-1)) $ () () KEMISK INDUSTRI MV. () FRML _D pwnkw1 = ( uimnk*fKmnkw1+uibnk*fKbnkw+lnk1*HQnkw1 +pvenk*fVenkw1+pvmnk*fVmnk+Siqnk-0.0090000*Siqej-Siqnkl)/fXnk $ FRML _D pwnkvv = Vnk/fXnk $ FRML _D pwnkvl1 = (lnk1*HQnkn1)/fXnk $ FRML _DJRD log(pxnkw1) = log(pwnkw1) + 0.0067994/0.20000 $ FRML _SJRD dlog(pxnk) = 0.35095*dlog(pwnkvl1)*pwnkvl1(-1)/pxnk(-1) +0.88254*dlog(pwnkvv)*pwnkvv(-1)/pxnk(-1) +0.64905*dlog(pwnkvl1(-1))*pwnkvl1(-1)/pxnk(-1) +0.13079*dlog(pwnkvv(-1))*pwnkvv(-1)/pxnk(-1) -0.20000*log(pxnk(-1)/pxnkw1(-1)) $ () () ANDEN FREMSTILLINGSVIRKSOMHED () FRML _D pwnqw1 = ( uimnq*fKmnqw1+uibnq*fKbnqw+lnq1*HQnqw1 +pvenq*fVenqw1+pvmnq*fVmnq+Siqnq-0.011000*Siqej-Siqnql)/fXnq $ FRML _D pwnqvv = Vnq/fXnq $ FRML _D pwnqvl1 = (lnq1*HQnqn1)/fXnq $ FRML _DJRD log(pxnqw1) = log(pwnqw1) + 0.00000 $ FRML _SJRD dlog(pxnq) = 0.62317*dlog(pwnqvl1)*pwnqvl1(-1)/pxnq(-1) +0.81566*dlog(pwnqvv)*pwnqvv(-1)/pxnq(-1) +0.37683*dlog(pwnqvl1(-1))*pwnqvl1(-1)/pxnq(-1) +0.18434*dlog(pwnqvv(-1))*pwnqvv(-1)/pxnq(-1) -0.20000*log(pxnq(-1)/pxnqw1(-1)) $ () () BYGGE- OG ANL’GSVIRKSOMHED () FRML _D pwbw1 = ( uimb*fKmbw1+uibb*fKbbw+lb1*HQbw1 +pveb*fVebw1+pvmb*fVmb+Siqb-0.0060000*Siqej-Siqbl)/fXb $ FRML _D pwbvv = Vb/fXb $ FRML _D pwbvl1 = (lb1*HQbn1)/fXb $ FRML _DJRD log(pxbw1) = log(pwbw1) + 0.00000 $ FRML _SJRD dlog(pxb) = 0.48961*dlog(pwbvl1)*pwbvl1(-1)/pxb(-1) +0.77284*dlog(pwbvv)*pwbvv(-1)/pxb(-1) +0.51039*dlog(pwbvl1(-1))*pwbvl1(-1)/pxb(-1) +0.22716*dlog(pwbvv(-1))*pwbvv(-1)/pxb(-1) -0.20000*log(pxb(-1)/pxbw1(-1)) $ () () HANDEL () FRML _D pwqhw1 = ( uimqh*fKmqhw1+uibqh*fKbqhw+lqh1*HQqhw1 +pveqh*fVeqhw1+pvmqh*fVmqh+Siqqh-0.056000*Siqej-Siqqhl)/fXqh $ FRML _D pwqhvv = Vqh/fXqh $ FRML _D pwqhvl1 = (lqh1*HQqhn1)/fXqh $ FRML _DJRD log(pxqhw1) = log(pwqhw1) + 0.00000 $ FRML _SJRD dlog(pxqh) = 0.65064*dlog(pwqhvl1)*pwqhvl1(-1)/pxqh(-1) +1.16278*dlog(pwqhvv)*pwqhvv(-1)/pxqh(-1) +0.50491*dlog(pwqhvl1(-1))*pwqhvl1(-1)/pxqh(-1) +0.00000*dlog(pwqhvv(-1))*pwqhvv(-1)/pxqh(-1) -0.21501*log(pxqh(-1)/pxqhw1(-1)) $ () () ANDEN TRANSPORT MV. () FRML _D pwqtw1 = ( uimqt*fKmqtw1+uibqt*fKbqtw+lqt1*HQqtw1 +pveqt*fVeqtw1+pvmqt*fVmqt+Siqqt-0.016000*Siqej-Siqqtl)/fXqt $ FRML _D pwqtvv = Vqt/fXqt $ FRML _D pwqtvl1 = (lqt1*HQqtn1)/fXqt $ FRML _DJRD log(pxqtw1) = log(pwqtw1) + 0.00000 $ FRML _SJRD dlog(pxqt) = 0.83282*dlog(pwqtvl1)*pwqtvl1(-1)/pxqt(-1) +0.85000*dlog(pwqtvv)*pwqtvv(-1)/pxqt(-1) +0.00000*dlog(pwqtvl1(-1))*pwqtvl1(-1)/pxqt(-1) +0.00000*dlog(pwqtvv(-1))*pwqtvv(-1)/pxqt(-1) -0.20000*log(pxqt(-1)/pxqtw1(-1)) $ () () ANDRE TJENESTEYDENDE ERHVERV () FRML _D pwqqw1 = ( uimqq*fKmqqw1+uibqq*fKbqqw+lqq1*HQqqw1 +pveqq*fVeqqw1+pvmqq*fVmqq+Siqqq-0.13600*Siqej-Siqqql)/fXqq $ FRML _D pwqqvv = Vqq/fXqq $ FRML _D pwqqvl1 = (lqq1*HQqqn1)/fXqq $ FRML _DJRD log(pxqqw1) = log(pwqqw1) + 0.00000 $ FRML _SJRD dlog(pxqq) = 0.98986*dlog(pwqqvl1)*pwqqvl1(-1)/pxqq(-1) +0.72573*dlog(pwqqvv)*pwqqvv(-1)/pxqq(-1) +0.010140*dlog(pwqqvl1(-1))*pwqqvl1(-1)/pxqq(-1) +0.27427*dlog(pwqqvv(-1))*pwqqvv(-1)/pxqq(-1) -0.20000*log(pxqq(-1)/pxqqw1(-1)) $ () () FINANSIEL VIRKSOMHED () FRML _D pwqfw1 = ( uimqf*fKmqfw1+uibqf*fKbqfw+lqf1*HQqfw1 +pveqf*fVeqfw1+pvmqf*fVmqf +Siqqf-0.016000*Siqej-Siqqfl)/fXqf $ FRML _D pwqfwv1 = (lqf1*HQqfw1+pveqf*fVeqfw1+pvmqf*fVmqf)/fXqf $ FRML _S__DF dlog(pxqf) = 0.31563*(dlog(pwqfwv1)-dlog(pwqfwv1(-1))) -0.22304*(dlog(pxqf(-1))-dlog(pwqfw1(-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)) /(yrh1(-1)-fKbhe(-1)/fKbhl(-1)*(Ywh1+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_ pnimp11 = pnim*kpnimp1 $ FRML _GJ_ pnimo11 = pnim*kpnimo1 $ FRML _GJ_D pnib = ( abib*pxb + aqqib*pxqq + am5ib*(pm5+tm5) + am6qib*(pm6q+tm6q) )*kpnib*kkp $ FRML _GJ_ pnibp11 = pnib*kpnibp1 $ FRML _GJ_ pnibo11 = pnib*kpnibo1 $ 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 = kpibo1*pibo11 $ 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 = kpimo1*pimo11 $ 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 pimp11 = (1+btgimp1*tg)*(pnimp11+tpimp1)*(1+trimp1) $ FRML _G pimo11 = (1+btgimo1*tg)*(pnimo11+tpimo1) $ FRML _G pibp11 = (1+btgibp1*tg)*(pnibp11+tpibp1) $ FRML _G pibo11 = (1+btgibo1*tg)*(pnibo11+tpibo1) $ FRML _G pibh = (1+btgibh*tg)*(pnibh+tpibh) $ FRML _I pibp = pibp11*kpibp1 $ FRML _I pimp = pimp11*kpimp1 $ 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 btyd1 = (Tyd/Ulfhk)/(lah1*(1-tsda)*0.001) $ FRML _D kqyfnl1 = (fYfnf+fYfnn+fYfnb+fYfnk+fYfnm+fYfnq+fYfnt)/ (Hqnf1+Hqnn1+Hqnb1+Hqnk1+Hqnm1+Hqnq1+Hqnt1) $ 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 taqwh1 = Saqw1/(Qw1*Hgwn*0.001) $ FRML _D lnap = lna1 + taqwh1 $ FRML _SJRDF Dlog(lna1) = 0.6436*0.5*(log(pxn)-log(pxn(-2))) - Dlog((lna1+btaqwh*taqwh1)/lna1) + 0.2575*0.5*(log(pcp/pxn)-log(pcp(-2)/pxn(-2))) - 0.2575*0.5*(log(1-tss0u)-log(1-tss0u(-2))) - 1.1558*((1/3)*Dif(bul1)+(2/3)*Dif(bul1(-1))) + 0.1429*(log(kqyfnl1)-log(kqyfnl1(-1))) - 0.2126*((log(lnak1(-2)/(pyfnl(-2)*kqyfnl1(-2))) + 4.7150*bul1(-2) - 0.5809*btYd1(-2) + log(dtlnap))) +0.03861*d4795 - 0.02074 $ FRML _GJ_ lnakk1 = lna1 + taqwh1 + (taqp1+tadf)*(1-bqn/2)/Hgwn $ FRML _GJ_ lnak1 = lnakk1 + (tqu1+Tiqab1)*(1-bqn/2)/Hgwn $ FRML _GJ_ lah1 = lna1*Ha $ FRML _GJ_ lnahk1 = lnak1*Hgwn/(1-bqn/2) $ FRML _GJDD loh1 = loh1(-1)*((lah1/lah1(-1))*(1+JRloh)) $ FRML _GJ_ lohkk1 = loh1 + (Saqw1/(Qw1*.001)) $ FRML _GJ_ lohk1 = lohkk1 + 2/3*tqu1 + Tiqab1 $ FRML _GJRD lih = lih(-1)*(lnap/lnap(-1)) $ FRML _I Tiqab1 = Siqab/Qw1*1000 $ FRML _I Yw1 = Ywa1 +Ywe1+Ywng1+Ywne1+Ywnf1+Ywnn1+Ywnb1+Ywnm1 +Ywnt1+Ywnk1+Ywnq1+Ywb1+Ywqh1+Ywqs1+Ywqt1 +Ywqf1+Ywqq1+Ywh1+Ywo2 $ () () () 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 btb2 = (Tbhsl+Tbhsk+Saqw1)/Ysda3 $ FRML _GJRD ptty1 = ptty1(-1)*(1+0.5*(Rlisa+RliSa(-1)))*Dsr2 + ptty1(-1)*(1+Rlisa)*((1-tsda)/(1-tsda(-1))) *(1-btb2(-2))/(1-btb2(-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*Qw1*ttysas2*ptty1 $ FRML _GJ_D Tysae = 0.001*Uef*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 _GJDD pcrs1 = pcrs1(-1)*(1+Rlisa)*(1-btb2(-2))/(1-btb2(-3)) *(1-tsda)/(1-tsda(-1)) $ FRML _GJ_D Yas = ( Yw1+Twen+Tyd+Typ+Tysa+Tyks +Typshl+Tphhlu+Tpdmpu+Tpspu -Sdu-Saqw1/(1-tsda)-Saqp-Saqo -(Tbhsl+Tbhsk)/(1-tsda) -Typri)*kyas2 $ () En simpelt fordeling af a-indkomst på løn, dagpenge, efterløn, folkepension og øvrig a-indkomst FRML _GJ_D Yasw = kyas2*(Yw1+Twen-Typri) $ FRML _GJ_D Yasd = kyas2*Tyd $ FRML _GJ_D Yase = kyas2*Tysae $ FRML _GJ_D Yasp = kyas2*Typsfp $ FRML _D Yasr = Yas-(Yasw+Yasd+Yase+Yasp) $ () FRML _GJ_D Yspps = (Tpdmpi+Saqwy+Tpspi)*kyspps $ FRML _DJ_D Ivmps1 = bivmp0*pimp11*fImp11 + (1+d8291*(ptty1/ptty1(-1)-1)) *( (bivmp(-1)*(1-bivmp1(-1)) -(1-bivmp(-1))*bivmp0(-1) )*pimp11(-1)*fImp11(-1) +(1-(bivmp+bivmp(-1))/2)*Ivmps1(-1)*bivmp/bivmp(-1)) $ FRML _DJ_D Ivbps1 = bivbp0*pibp11*fIbp11 + (1+d8291*(ptty1/ptty1(-1)-1)) *( (bivbp(-1)*(bivbpw(-1)-bivbp0(-1)) -(1-bivbp(-1))*bivbp0(-1) )*pibp11(-1)*fIbp11(-1) +(1-(bivbp+bivbp(-1))/2)*Ivbps1(-1)*bivbp/bivbp(-1) ) $ FRML _D Ivps1 = Ivmps1 + Ivbps1 $ FRML _D Yrr2 = Yrp - 0.85*Yrh1 - (Iph/(I-Io11))*Ivps1 $ FRML _GJ_D Yrpss1 = (0.5*Yrr2+0.5*Yrr2(-1))*kyrpss3 $ 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+ kysprs2*(Yw1+Yrr2) $ FRML _DJ_D Ys = Ysp + Yrphs + Tippps1 - (Safm + kylws1*Yw1) - kyl3s2*(Yw1+Yrr2) + Tysb + kysrs3*(Yw1+Yrr2) $ () Selvstændige (s) () """""""""""""""" FRML _GJ_D Ussy = kussy*(Q1-Qw1) $ FRML _GJDD Ysps = kysps*(.017*Yasw+.000*Yasd+.000*Yase+.000*Yasp+.036*Yasr +.842*Yrpss1 -.260*ktops1*(Tphhli+Tphhki) -.032*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.032*Yspps +.034*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Yss = Kyss*(Ysps +.033*(Yrphs+Tippps1) -.017*(Safm + kylws1*Yw1) -.034*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.034*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbysps = ((Ysps*Ussye+(1-dsk2))*pcrs1e-(Yspse*Ussy+(1-dsk2))*pcrs1) /((Yspse*Ussy+(1-dsk2))*pcrs1) $ FRML _D kbyss = ((Yss*Ussye+(1-dsk2))*pcrs1e-(Ysse*Ussy+(1-dsk2))*pcrs1) /((Ysse*Ussy+(1-dsk2))*pcrs1) $ FRML _G Ysps1 = (bysp10s+100*bysp11s*kbysps)*Ysps $ FRML _G Ysps2 = (bysp20s+100*bysp21s*kbysps)*Ysps $ FRML _G Ysps3 = (bysp30s+100*bysp31s*kbysps)*Ysps $ FRML _G Ysps4 = (bysp40s+100*bysp41s*kbysps)*Ysps $ FRML _G Ysps5 = (bysp50s+100*bysp51s*kbysps)*Ysps $ FRML _G Yss1 = (bys10s+100*bys11s*kbyss)*Yss $ FRML _G Yss2 = (bys20s+100*bys21s*kbyss)*Yss $ FRML _G Yss3 = (bys30s+100*bys31s*kbyss)*Yss $ FRML _G Yss4 = (bys40s+100*bys41s*kbyss)*Yss $ FRML _G Yss5 = (bys50s+100*bys51s*kbyss)*Yss $ FRML _G Ssysps1 = tsysp1*ysps1 $ FRML _G Ssysps2 = tsysp2*ysps2 $ FRML _G Ssysps3 = tsysp3*ysps3 $ FRML _G Ssysps4 = tsysp4*ysps4 $ FRML _G Ssysps5 = tsysp5*ysps5 $ FRML _D Ssysps = Ssysps1+Ssysps2+Ssysps3+Ssysps4+Ssysps5 $ FRML _G Ssyss1 = tsys1*yss1 $ FRML _G Ssyss2 = tsys2*yss2 $ FRML _G Ssyss3 = tsys3*yss3 $ FRML _G Ssyss4 = tsys4*yss4 $ FRML _G Ssyss5 = tsys5*yss5 $ FRML _D Ssyss = Ssyss1+Ssyss2+Ssyss3+Ssyss4+Ssyss5 $ () Lønmodtagere (w) () """""""""""""""" FRML _GJ_D Uwsy = kuwsy*Qw1 $ FRML _GJDD Yspw = kyspw*(.969*Yasw+.421*Yasd+.000*Yase+.000*Yasp+.202*Yasr +.127*Yrpss1 -.581*ktops1*(Tphhli+Tphhki) -.954*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.954*Yspps +.951*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Ysw = Kysw*(Yspw +1.003*(Yrphs+Tippps1) -.969*(Safm + kylws1*Yw1) -.951*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.951*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbyspw = ((Yspw*Uwsye+(1-dsk2))*pcrs1e-(Yspwe*Uwsy+(1-dsk2))*pcrs1) /((Yspwe*Uwsy+(1-dsk2))*pcrs1) $ FRML _D kbysw = ((Ysw*Uwsye+(1-dsk2))*pcrs1e-(Yswe*Uwsy+(1-dsk2))*pcrs1) /((Yswe*Uwsy+(1-dsk2))*pcrs1) $ FRML _G Yspw1 = (bysp10w+100*bysp11w*kbyspw)*Yspw $ FRML _G Yspw2 = (bysp20w+100*bysp21w*kbyspw)*Yspw $ FRML _G Yspw3 = (bysp30w+100*bysp31w*kbyspw)*Yspw $ FRML _G Yspw4 = (bysp40w+100*bysp41w*kbyspw)*Yspw $ FRML _G Yspw5 = (bysp50w+100*bysp51w*kbyspw)*Yspw $ FRML _G Ysw1 = (bys10w+100*bys11w*kbysw)*Ysw $ FRML _G Ysw2 = (bys20w+100*bys21w*kbysw)*Ysw $ FRML _G Ysw3 = (bys30w+100*bys31w*kbysw)*Ysw $ FRML _G Ysw4 = (bys40w+100*bys41w*kbysw)*Ysw $ FRML _G Ysw5 = (bys50w+100*bys51w*kbysw)*Ysw $ FRML _G Ssyspw1 = tsysp1*yspw1 $ FRML _G Ssyspw2 = tsysp2*yspw2 $ FRML _G Ssyspw3 = tsysp3*yspw3 $ FRML _G Ssyspw4 = tsysp4*yspw4 $ FRML _G Ssyspw5 = tsysp5*yspw5 $ FRML _D Ssyspw = Ssyspw1+Ssyspw2+Ssyspw3+Ssyspw4+Ssyspw5 $ FRML _G Ssysw1 = tsys1*ysw1 $ FRML _G Ssysw2 = tsys2*ysw2 $ FRML _G Ssysw3 = tsys3*ysw3 $ FRML _G Ssysw4 = tsys4*ysw4 $ FRML _G Ssysw5 = tsys5*ysw5 $ FRML _D Ssysw = Ssysw1+Ssysw2+Ssysw3+Ssysw4+Ssysw5 $ () Dagpengemodtagere (l) () """"""""""""""""""""" FRML _GJ_D Ulsy = kulsy*Ul $ FRML _GJDD Yspl = kyspl*(.006*Yasw+.579*Yasd+.000*Yase+.000*Yasp+.013*Yasr +.000*Yrpss1 -.086*ktops1*(Tphhli+Tphhki) -.006*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.006*Yspps +.006*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Ysl = Kysl*(Yspl +.021*(Yrphs+Tippps1) -.006*(Safm + kylws1*Yw1) -.006*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.006*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbyspl = ((Yspl*Ulsye+(1-dsk2))*pcrs1e-(Ysple*Ulsy+(1-dsk2))*pcrs1) /((Ysple*Ulsy+(1-dsk2))*pcrs1) $ FRML _D kbysl = ((Ysl*Ulsye+(1-dsk2))*pcrs1e-(Ysle*Ulsy+(1-dsk2))*pcrs1) /((Ysle*Ulsy+(1-dsk2))*pcrs1) $ FRML _G Yspl1 = (bysp10l+100*bysp11l*kbyspl)*Yspl $ FRML _G Yspl2 = (bysp20l+100*bysp21l*kbyspl)*Yspl $ FRML _G Yspl3 = (bysp30l+100*bysp31l*kbyspl)*Yspl $ FRML _G Yspl4 = (bysp40l+100*bysp41l*kbyspl)*Yspl $ FRML _G Yspl5 = (bysp50l+100*bysp51l*kbyspl)*Yspl $ FRML _G Ysl1 = (bys10l+100*bys11l*kbysl)*Ysl $ FRML _G Ysl2 = (bys20l+100*bys21l*kbysl)*Ysl $ FRML _G Ysl3 = (bys30l+100*bys31l*kbysl)*Ysl $ FRML _G Ysl4 = (bys40l+100*bys41l*kbysl)*Ysl $ FRML _G Ysl5 = (bys50l+100*bys51l*kbysl)*Ysl $ FRML _G Ssyspl1 = tsysp1*yspl1 $ FRML _G Ssyspl2 = tsysp2*yspl2 $ FRML _G Ssyspl3 = tsysp3*yspl3 $ FRML _G Ssyspl4 = tsysp4*yspl4 $ FRML _G Ssyspl5 = tsysp5*yspl5 $ FRML _D Ssyspl = Ssyspl1+Ssyspl2+Ssyspl3+Ssyspl4+Ssyspl5 $ FRML _G Ssysl1 = tsys1*ysl1 $ FRML _G Ssysl2 = tsys2*ysl2 $ FRML _G Ssysl3 = tsys3*ysl3 $ FRML _G Ssysl4 = tsys4*ysl4 $ FRML _G Ssysl5 = tsys5*ysl5 $ FRML _D Ssysl = Ssysl1+Ssysl2+Ssysl3+Ssysl4+Ssysl5 $ () Efterlønnere (ef) () """"""""""""""""" FRML _GJ_D Uefsy = kuefsy*Uef $ FRML _GJDD Yspef = kyspef*(.001*Yasw+.000*Yasd+1.00*Yase+.000*Yasp+.057*Yasr +.000*Yrpss1 -.000*ktops1*(Tphhli+Tphhki) -.001*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.001*Yspps +.001*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Ysef = Kysef*(Yspef +.010*(Yrphs+Tippps1) -.001*(Safm + kylws1*Yw1) -.001*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.001*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbyspef = ((Yspef*Uefsye+(1-dsk2))*pcrs1e-(Yspefe*Uefsy+(1-dsk2))*pcrs1) /((Yspefe*Uefsy+(1-dsk2))*pcrs1) $ FRML _D kbysef = ((Ysef*Uefsye+(1-dsk2))*pcrs1e-(Ysefe*Uefsy+(1-dsk2))*pcrs1) /((Ysefe*Uefsy+(1-dsk2))*pcrs1) $ FRML _G Yspef1 = (bysp10ef+100*bysp11ef*kbyspef)*Yspef $ FRML _G Yspef2 = (bysp20ef+100*bysp21ef*kbyspef)*Yspef $ FRML _G Yspef3 = (bysp30ef+100*bysp31ef*kbyspef)*Yspef $ FRML _G Yspef4 = (bysp40ef+100*bysp41ef*kbyspef)*Yspef $ FRML _G Yspef5 = (bysp50ef+100*bysp51ef*kbyspef)*Yspef $ FRML _G Ysef1 = (bys10ef+100*bys11ef*kbysef)*Ysef $ FRML _G Ysef2 = (bys20ef+100*bys21ef*kbysef)*Ysef $ FRML _G Ysef3 = (bys30ef+100*bys31ef*kbysef)*Ysef $ FRML _G Ysef4 = (bys40ef+100*bys41ef*kbysef)*Ysef $ FRML _G Ysef5 = (bys50ef+100*bys51ef*kbysef)*Ysef $ FRML _G Ssyspef1 = tsysp1*yspef1 $ FRML _G Ssyspef2 = tsysp2*yspef2 $ FRML _G Ssyspef3 = tsysp3*yspef3 $ FRML _G Ssyspef4 = tsysp4*yspef4 $ FRML _G Ssyspef5 = tsysp5*yspef5 $ FRML _D Ssyspef = Ssyspef1+Ssyspef2+Ssyspef3+Ssyspef4+Ssyspef5 $ FRML _G Ssysef1 = tsys1*ysef1 $ FRML _G Ssysef2 = tsys2*ysef2 $ FRML _G Ssysef3 = tsys3*ysef3 $ FRML _G Ssysef4 = tsys4*ysef4 $ FRML _G Ssysef5 = tsys5*ysef5 $ FRML _D Ssysef = Ssysef1+Ssysef2+Ssysef3+Ssysef4+Ssysef5 $ () Pensionister (fp) () """"""""""""""""" FRML _GJ_D Ufpsy = kufpsy*Ufp $ FRML _GJDD Yspfp = kyspfp*(.001*Yasw+.000*Yasd+.000*Yase+1.00*Yasp+.047*Yasr +.021*Yrpss1 -.000*ktops1*(Tphhli+Tphhki) -.001*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.001*Yspps +.001*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Ysfp = Kysfp*(Yspfp -.108*(Yrphs+Tippps1) -.001*(Safm + kylws1*Yw1) -.001*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.001*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbyspfp = ((Yspfp*Ufpsye+(1-dsk2))*pcrs1e-(Yspfpe*Ufpsy+(1-dsk2))*pcrs1) /((Yspfpe*Ufpsy+(1-dsk2))*pcrs1) $ FRML _D kbysfp = ((Ysfp*Ufpsye+(1-dsk2))*pcrs1e-(Ysfpe*Ufpsy+(1-dsk2))*pcrs1) /((Ysfpe*Ufpsy+(1-dsk2))*pcrs1) $ FRML _G Yspfp1 = (bysp10fp+100*bysp11fp*kbyspfp)*Yspfp $ FRML _G Yspfp2 = (bysp20fp+100*bysp21fp*kbyspfp)*Yspfp $ FRML _G Yspfp3 = (bysp30fp+100*bysp31fp*kbyspfp)*Yspfp $ FRML _G Yspfp4 = (bysp40fp+100*bysp41fp*kbyspfp)*Yspfp $ FRML _G Yspfp5 = (bysp50fp+100*bysp51fp*kbyspfp)*Yspfp $ FRML _G Ysfp1 = (bys10fp+100*bys11fp*kbysfp)*Ysfp $ FRML _G Ysfp2 = (bys20fp+100*bys21fp*kbysfp)*Ysfp $ FRML _G Ysfp3 = (bys30fp+100*bys31fp*kbysfp)*Ysfp $ FRML _G Ysfp4 = (bys40fp+100*bys41fp*kbysfp)*Ysfp $ FRML _G Ysfp5 = (bys50fp+100*bys51fp*kbysfp)*Ysfp $ FRML _G Ssyspfp1 = tsysp1*yspfp1 $ FRML _G Ssyspfp2 = tsysp2*yspfp2 $ FRML _G Ssyspfp3 = tsysp3*yspfp3 $ FRML _G Ssyspfp4 = tsysp4*yspfp4 $ FRML _G Ssyspfp5 = tsysp5*yspfp5 $ FRML _D Ssyspfp = Ssyspfp1+Ssyspfp2+Ssyspfp3+Ssyspfp4+Ssyspfp5 $ FRML _G Ssysfp1 = tsys1*ysfp1 $ FRML _G Ssysfp2 = tsys2*ysfp2 $ FRML _G Ssysfp3 = tsys3*ysfp3 $ FRML _G Ssysfp4 = tsys4*ysfp4 $ FRML _G Ssysfp5 = tsys5*ysfp5 $ FRML _D Ssysfp = Ssysfp1+Ssysfp2+Ssysfp3+Ssysfp4+Ssysfp5 $ () Øvrige (q) () """""""""" FRML _GJ_D Uqsy = kuqsy*(Uwxa-Uef) $ FRML _GJDD Yspq = kyspq*(.007*Yasw+.000*Yasd+.000*Yase+.000*Yasp+.648*Yasr +.000*Yrpss1 -.073*ktops1*(Tphhli+Tphhki) -.007*ksdas1*(Sda-tsda*(Tbhsk+Tbhsl)) -.007*Yspps +.007*kysprs2*(Yw1+Yrr2) ) $ FRML _GJDD Ysq = Kysq*(Yspq +.041*(Yrphs+Tippps1) -.007*(Safm + kylws1*Yw1) -.007*kyl3s2*(Yw1+Yrr2) +.000*Tysb +.007*kysrs3*(Yw1+Yrr2) ) $ FRML _D kbyspq = ((Yspq*Uqsye+(1-dsk2))*pcrs1e-(Yspqe*Uqsy+(1-dsk2))*pcrs1) /((Yspqe*Uqsy+(1-dsk2))*pcrs1) $ FRML _D kbysq = ((Ysq*Uqsye+(1-dsk2))*pcrs1e-(Ysqe*Uqsy+(1-dsk2))*pcrs1) /((Ysqe*Uqsy+(1-dsk2))*pcrs1) $ FRML _G Yspq1 = (bysp10q+100*bysp11q*kbyspq)*Yspq $ FRML _G Yspq2 = (bysp20q+100*bysp21q*kbyspq)*Yspq $ FRML _G Yspq3 = (bysp30q+100*bysp31q*kbyspq)*Yspq $ FRML _G Yspq4 = (bysp40q+100*bysp41q*kbyspq)*Yspq $ FRML _G Yspq5 = (bysp50q+100*bysp51q*kbyspq)*Yspq $ FRML _G Ysq1 = (bys10q+100*bys11q*kbysq)*Ysq $ FRML _G Ysq2 = (bys20q+100*bys21q*kbysq)*Ysq $ FRML _G Ysq3 = (bys30q+100*bys31q*kbysq)*Ysq $ FRML _G Ysq4 = (bys40q+100*bys41q*kbysq)*Ysq $ FRML _G Ysq5 = (bys50q+100*bys51q*kbysq)*Ysq $ FRML _G Ssyspq1 = tsysp1*yspq1 $ FRML _G Ssyspq2 = tsysp2*yspq2 $ FRML _G Ssyspq3 = tsysp3*yspq3 $ FRML _G Ssyspq4 = tsysp4*yspq4 $ FRML _G Ssyspq5 = tsysp5*yspq5 $ FRML _D Ssyspq = Ssyspq1+Ssyspq2+Ssyspq3+Ssyspq4+Ssyspq5 $ FRML _G Ssysq1 = tsys1*ysq1 $ FRML _G Ssysq2 = tsys2*ysq2 $ FRML _G Ssysq3 = tsys3*ysq3 $ FRML _G Ssysq4 = tsys4*ysq4 $ FRML _G Ssysq5 = tsys5*ysq5 $ FRML _D Ssysq = Ssysq1+Ssysq2+Ssysq3+Ssysq4+Ssysq5 $ () Alle () Uw+Ufp burde være Uw+Ufpxa (? udenfor dk) FRML _GJ_D Usy = (1-dsk2)*((Uw+Ufp)*kusy2*(1-dsk1) +dsk1*(Ua1+Ufp+Ufo+Uef+Umf)*kusy1) + dsk2*(Ussy+Uwsy+Ulsy+Uefsy+Ufpsy+Uqsy) $ 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 _G bysp10 = dsk2*((bysp10s*Ysps+bysp10w*Yspw+bysp10l*Yspl +bysp10ef*Yspef+bysp10fp*Yspfp +bysp10q*Yspq)/Ysp) +(1-dsk2)*bysp10e $ FRML _G bysp20 = dsk2*((bysp20s*Ysps+bysp20w*Yspw+bysp20l*Yspl +bysp20ef*Yspef+bysp20fp*Yspfp +bysp20q*Yspq)/Ysp) +(1-dsk2)*bysp20e $ FRML _G bysp30 = dsk2*((bysp30s*Ysps+bysp30w*Yspw+bysp30l*Yspl +bysp30ef*Yspef+bysp30fp*Yspfp +bysp30q*Yspq)/Ysp) +(1-dsk2)*bysp30e $ FRML _G bysp40 = dsk2*((bysp40s*Ysps+bysp40w*Yspw+bysp40l*Yspl +bysp40ef*Yspef+bysp40fp*Yspfp +bysp40q*Yspq)/Ysp) +(1-dsk2)*bysp40e $ FRML _G bysp50 = dsk2*((bysp50s*Ysps+bysp50w*Yspw+bysp50l*Yspl +bysp50ef*Yspef+bysp50fp*Yspfp +bysp50q*Yspq)/Ysp) +(1-dsk2)*bysp50e $ FRML _G bysp11 = dsk2*((bysp11s*Ysps+bysp11w*Yspw+bysp11l*Yspl +bysp11ef*Yspef+bysp11fp*Yspfp +bysp11q*Yspq)/Ysp) +(1-dsk2)*bysp11e $ FRML _G bysp21 = dsk2*((bysp21s*Ysps+bysp21w*Yspw+bysp21l*Yspl +bysp21ef*Yspef+bysp21fp*Yspfp +bysp21q*Yspq)/Ysp) +(1-dsk2)*bysp21e $ FRML _G bysp31 = dsk2*((bysp31s*Ysps+bysp31w*Yspw+bysp31l*Yspl +bysp31ef*Yspef+bysp31fp*Yspfp +bysp31q*Yspq)/Ysp) +(1-dsk2)*bysp31e $ FRML _G bysp41 = dsk2*((bysp41s*Ysps+bysp41w*Yspw+bysp41l*Yspl +bysp41ef*Yspef+bysp41fp*Yspfp +bysp41q*Yspq)/Ysp) +(1-dsk2)*bysp41e $ FRML _G bysp51 = dsk2*((bysp51s*Ysps+bysp51w*Yspw+bysp51l*Yspl +bysp51ef*Yspef+bysp51fp*Yspfp +bysp51q*Yspq)/Ysp) +(1-dsk2)*bysp51e $ FRML _G bys10 = dsk2*((bys10s*Yss+bys10w*Ysw+bys10l*Ysl +bys10ef*Ysef+bys10fp*Ysfp +bys10q*Ysq)/Ys) +(1-dsk2)*bys10e $ FRML _G bys20 = dsk2*((bys20s*Yss+bys20w*Ysw+bys20l*Ysl +bys20ef*Ysef+bys20fp*Ysfp +bys20q*Ysq)/Ys) +(1-dsk2)*bys20e $ FRML _G bys30 = dsk2*((bys30s*Yss+bys30w*Ysw+bys30l*Ysl +bys30ef*Ysef+bys30fp*Ysfp +bys30q*Ysq)/Ys) +(1-dsk2)*bys30e $ FRML _G bys40 = dsk2*((bys40s*Yss+bys40w*Ysw+bys40l*Ysl +bys40ef*Ysef+bys40fp*Ysfp +bys40q*Ysq)/Ys) +(1-dsk2)*bys40e $ FRML _G bys50 = dsk2*((bys50s*Yss+bys50w*Ysw+bys50l*Ysl +bys50ef*Ysef+bys50fp*Ysfp +bys50q*Ysq)/Ys) +(1-dsk2)*bys50e $ FRML _G bys11 = dsk2*((bys11s*Yss+bys11w*Ysw+bys11l*Ysl +bys11ef*Ysef+bys11fp*Ysfp +bys11q*Ysq)/Ys) +(1-dsk2)*bys11e $ FRML _G bys21 = dsk2*((bys21s*Yss+bys21w*Ysw+bys21l*Ysl +bys21ef*Ysef+bys21fp*Ysfp +bys21q*Ysq)/Ys) +(1-dsk2)*bys21e $ FRML _G bys31 = dsk2*((bys31s*Yss+bys31w*Ysw+bys31l*Ysl +bys31ef*Ysef+bys31fp*Ysfp +bys31q*Ysq)/Ys) +(1-dsk2)*bys31e $ FRML _G bys41 = dsk2*((bys41s*Yss+bys41w*Ysw+bys41l*Ysl +bys41ef*Ysef+bys41fp*Ysfp +bys41q*Ysq)/Ys) +(1-dsk2)*bys41e $ FRML _G bys51 = dsk2*((bys51s*Yss+bys51w*Ysw+bys51l*Ysl +bys51ef*Ysef+bys51fp*Ysfp +bys51q*Ysq)/Ys) +(1-dsk2)*bys51e $ () Udskrivningsgrundlag () Personlig indkomst FRML _GJDD Ysp1 = (1-dsk2)*(bysp10+100*bysp11*kbysp)*ysp +dsk2*(Ysps1+Yspw1+Yspl1+Yspef1+Yspfp1+Yspq1) $ FRML _GJDD Ysp2 = (1-dsk2)*(bysp20+100*bysp21*kbysp)*ysp +dsk2*(Ysps2+Yspw2+Yspl2+Yspef2+Yspfp2+Yspq2) $ FRML _GJDD Ysp3 = (1-dsk2)*(bysp30+100*bysp31*kbysp)*ysp +dsk2*(Ysps3+Yspw3+Yspl3+Yspef3+Yspfp3+Yspq3) $ FRML _GJDD Ysp4 = (1-dsk2)*(bysp40+100*bysp41*kbysp)*ysp +dsk2*(Ysps4+Yspw4+Yspl4+Yspef4+Yspfp4+Yspq4) $ FRML _GJDD Ysp5 = (1-dsk2)*(bysp50+100*bysp51*kbysp)*ysp +dsk2*(Ysps5+Yspw5+Yspl5+Yspef5+Yspfp5+Yspq5) $ () Skattepligtig indkomst FRML _GJDD Ys1 = (1-dsk2)*(bys10+100*bys11*kbys)*ys +dsk2*(Yss1+Ysw1+Ysl1+Ysef1+Ysfp1+Ysq1) $ FRML _GJDD Ys2 = (1-dsk2)*(bys20+100*bys21*kbys)*ys +dsk2*(Yss2+Ysw2+Ysl2+Ysef2+Ysfp2+Ysq2) $ FRML _GJDD Ys3 = (1-dsk2)*(bys30+100*bys31*kbys)*ys +dsk2*(Yss3+Ysw3+Ysl3+Ysef3+Ysfp3+Ysq3) $ FRML _GJDD Ys4 = (1-dsk2)*(bys40+100*bys41*kbys)*ys +dsk2*(Yss4+Ysw4+Ysl4+Ysef4+Ysfp4+Ysq4) $ FRML _GJDD Ys5 = (1-dsk2)*(bys50+100*bys51*kbys)*ys +dsk2*(Yss5+Ysw5+Ysl5+Ysef5+Ysfp5+Ysq5) $ () Slutskatter, personlig indkomst FRML _GJDD Ssysp1 = (1-dsk2)*tsysp1*ysp1*(1+JRSsysp1) +dsk2*(Ssysps1+Ssyspw1+Ssyspl1+Ssyspef1 +Ssyspfp1+Ssyspq1) $ FRML _GJDD Ssysp2 = (1-dsk2)*tsysp2*ysp2*(1+JRSsysp2) +dsk2*(Ssysps2+Ssyspw2+Ssyspl2+Ssyspef2 +Ssyspfp2+Ssyspq2) $ FRML _GJDD Ssysp3 = (1-dsk2)*tsysp3*ysp3*(1+JRSsysp3) +dsk2*(Ssysps3+Ssyspw3+Ssyspl3+Ssyspef3 +Ssyspfp3+Ssyspq3) $ FRML _GJDD Ssysp4 = (1-dsk2)*tsysp4*ysp4*(1+JRSsysp3) +dsk2*(Ssysps4+Ssyspw4+Ssyspl4+Ssyspef4 +Ssyspfp4+Ssyspq4) $ FRML _GJDD Ssysp5 = (1-dsk2)*tsysp5*ysp5*(1+JRSsysp3) +dsk2*(Ssysps5+Ssyspw5+Ssyspl5+Ssyspef5 +Ssyspfp5+Ssyspq5) $ () Slutskatter, skattepligtig indkomst FRML _GJDD Ssys1 = (1-dsk2)*tsys1*ys1*(1+JRSsys1) +dsk2*(Ssyss1+Ssysw1+Ssysl1+Ssysef1 +Ssysfp1+Ssysq1) $ FRML _GJDD Ssys2 = (1-dsk2)*tsys2*ys2*(1+JRSsys2) +dsk2*(Ssyss2+Ssysw2+Ssysl2+Ssysef2 +Ssysfp2+Ssysq2) $ FRML _GJDD Ssys3 = (1-dsk2)*tsys3*ys3*(1+JRSsys3) +dsk2*(Ssyss3+Ssysw3+Ssysl3+Ssysef3 +Ssysfp3+Ssysq3) $ FRML _GJDD Ssys4 = (1-dsk2)*tsys4*ys4*(1+JRSsys4) +dsk2*(Ssyss4+Ssysw4+Ssysl4+Ssysef4 +Ssysfp4+Ssysq4) $ FRML _GJDD Ssys5 = (1-dsk2)*tsys5*ys5*(1+JRSsys5) +dsk2*(Ssyss5+Ssysw5+Ssysl5+Ssysef5 +Ssysfp5+Ssysq5) $ () Makrosatser FRML _G tssp0 = (1-dsk1)*(tsysp1*bysp10+tsysp2*bysp20+tsysp3*bysp30 +tsysp4*bysp40+tsysp5*bysp50) +dsk1*tssp0e $ FRML _G tssp1 = (1-dsk1)*100*(tsysp1*bysp11+tsysp2*bysp21+tsysp3*bysp31 +tsysp4*bysp41+tsysp5*bysp51) +dsk1*tssp1e $ FRML _G tss0 = (1-dsk1)*(tsys1*bys10+tsys2*bys20+tsys3*kys3*bys30 +tsys4*bys40+tsys5*bys50) +dsk1*tss0e $ FRML _G tss1 = (1-dsk1)*100*(tsys1*bys11+tsys2*bys21+tsys3*bys31 +tsys4*bys41+tsys5*bys51) +dsk1*tss1e $ () Slutskattet, komponenter FRML _GJDD Ssya = ((pimp11*fKnmp+pibp11*fKnbp)*iwbz)*kssya1 $ FRML _GJDD Ssyej = fKnbhe(-1)*phv*tqkej*kssyej*(1+JRSssyej) $ FRML _GJDD Ssyv = tsds1*Ysdsr1*kssyv1 $ FRML _GJDD Ssysp = dsk1*(tssp0+tssp1*kbysp)*Ysp*kssyp +(1-dsk1)*(Ssysp1 + Ssysp2 + Ssysp3 + Ssysp4 + Ssysp5) $ FRML _GJDD Ssys = dsk1*(tss0+tss1*kbys)*Ys*kssy1 +(1-dsk1)*(Ssys1 + Ssys2 + Ssys3 + Ssys4 + Ssys5) $ FRML _D Ssy2 = Ssys + Ssysp + Ssyej + Ssya + Ssyv $ FRML _G Sdk1 = Ssy2+ Sksi1(-1) + Ssf + Ssso $ FRML _G Sdu = tdu1*Qw1*(1-bq/2)*0.001 $ FRML _DJ_D Ysda3 = Yw1 - Typri + 0.75*(0.5*Yrr2+0.5*Yrr2(-1)) $ FRML _DJ_D Tarn = Tyd + Tysas + Tysae + Tysao - Safm - Saqp $ FRML _G tsda = tsdae + ((Tarn(-2)-Tarne(-2))/(Ysda3(-2)*3))*(1-Dtsda) $ FRML _GJ_D Sda = (tsda*Ysda3)*ksda3 $ FRML _GJ_D Sdv = tsdv1*fkcb(-1) $ FRML _D Ivpsbk1 = (fKnmqf/fKnmp)*Ivmps1+(fKnbqf/fKnbp)*Ivbps1 $ 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 Ysdsbk1 = Yrqf1+Tibn+Yfqi-(Ivpsbk1+Ivpsbk1(-1))/2 $ FRML _GJ_D Sdsbk = ksdsbk2 *(tsds1*(1/2)*bsdsbk*Ysdsbk1 +ktsds(-1)*tsds1(-1)*(1-(1/2)*bsdsbk(-1))*Ysdsbk1(-1)) +0.82354*(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)) +2007.63*d88 $ FRML _DJRD Ysdsr1 = Yrs1+Tipps -( (1-(Iph/(I-Io11)))*Ivps1-Ivpsbk1 +(1-(Iph(-1)/(I(-1)-Io11(-1))))*Ivps1(-1)-Ivpsbk1(-1) )/2 $ FRML _GJRD Sdsr = ksdsr2 *(tsds1*(1/2)*bsds*Ysdsr1 +ktsds(-1)*tsds1(-1)*(1-(1/2)*bsds(-1))*Ysdsr1(-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 = ksdra1*tsdra*iwbz*(fKnmp*pimp11+fKnbp*pibp11) $ 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*Qw1*(1-bq/2)*.001 +ktaqwul1*taqw1*(Ulfhk+Ulu)*.001 $ FRML _G Saqwy = taqwy1*(ksda3*Ysda3-(Saqw1+Tbhsk+Tbhsp) +ksaqwy1*(Tyd+Tysas+Tyks)) $ FRML _I Saqw = Saqw1+Saqwy $ FRML _G Saqo = taqo1*Qwo1*(1-bqo/2)*0.001 $ FRML _G Saqp = taqp1*Qwp1*(1-bqp/2)*0.001 $ FRML _G Safma = tafma1*ptty1*(Qw1*(1-bq/2)+Ulfhk+Umf+Uef+Qs1)*0.001 $ FRML _G Safme = tafme*ptty1*bsafme1*(Qw1*(1-bq/2)+Ulfhk+Umf+Qs1)*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 $ () LØNMODTAGERE () ALLE FRML _G tss0w = tsys1 *(bys10w + 100*bys11w *kbysw ) + tsys2 *(bys20w + 100*bys21w *kbysw ) + tsys3 *(bys30w + 100*bys31w *kbysw ) + tsys4 *(bys40w + 100*bys41w *kbysw ) + tsys5 *(bys50w + 100*bys51w *kbysw ) + tsysp1*(bysp10w + 100*bysp11w *kbyspw) + tsysp2*(bysp20w + 100*bysp21w *kbyspw) + tsysp3*(bysp30w + 100*bysp31w *kbyspw) + tsysp4*(bysp40w + 100*bysp41w *kbyspw) + tsysp5*(bysp50w + 100*bysp51w *kbyspw) $ () BUNDSKAT () gennemsnit FRML _G tss0wb = tsys1 *(bys10wb + 100*bys11wb *kbysw ) + tsys2 *(bys20wb + 100*bys21wb *kbysw ) + tsys3 *(bys30wb + 100*bys31wb *kbysw ) + tsys4 *(bys40wb + 100*bys41wb *kbysw ) + tsys5 *(bys50wb + 100*bys51wb *kbysw ) + tsysp1*(bysp10wb + 100*bysp11wb*kbyspw) + tsysp2*(bysp20wb + 100*bysp21wb*kbyspw) + tsysp3*(bysp30wb + 100*bysp31wb*kbyspw) + tsysp4*(bysp40wb + 100*bysp41wb*kbyspw) + tsysp5*(bysp50wb + 100*bysp51wb*kbyspw) $ () marginal FRML _G tssmwb = tsys1 *d1wb + tsys2 *d2wb + tsys3 *d3wb + tsys4 *d4wb + tsys5 *d5wb + tsysp1*dp1wb + tsysp2*dp2wb + tsysp3*dp3wb + tsysp4*dp4wb + tsysp5*dp5wb $ () MELLEMSKAT () gennemsnit FRML _G tss0wm = tsys1 *(bys10wm + 100*bys11wm *kbysw ) + tsys2 *(bys20wm + 100*bys21wm *kbysw ) + tsys3 *(bys30wm + 100*bys31wm *kbysw ) + tsys4 *(bys40wm + 100*bys41wm *kbysw ) + tsys5 *(bys50wm + 100*bys51wm *kbysw ) + tsysp1*(bysp10wm + 100*bysp11wm*kbyspw) + tsysp2*(bysp20wm + 100*bysp21wm*kbyspw) + tsysp3*(bysp30wm + 100*bysp31wm*kbyspw) + tsysp4*(bysp40wm + 100*bysp41wm*kbyspw) + tsysp5*(bysp50wm + 100*bysp51wm*kbyspw) $ () marginal FRML _G tssmwm = tsys1 *d1wm + tsys2 *d2wm + tsys3 *d3wm + tsys4 *d4wm + tsys5 *d5wm + tsysp1*dp1wm + tsysp2*dp2wm + tsysp3*dp3wm + tsysp4*dp4wm + tsysp5*dp5wm $ () TOPSKAT () gennemsnit FRML _G tss0wt = tsys1 *(bys10wt + 100*bys11wt *kbysw ) + tsys2 *(bys20wt + 100*bys21wt *kbysw ) + tsys3 *(bys30wt + 100*bys31wt *kbysw ) + tsys4 *(bys40wt + 100*bys41wt *kbysw ) + tsys5 *(bys50wt + 100*bys51wt *kbysw ) + tsysp1*(bysp10wt + 100*bysp11wt*kbyspw) + tsysp2*(bysp20wt + 100*bysp21wt*kbyspw) + tsysp3*(bysp30wt + 100*bysp31wt*kbyspw) + tsysp4*(bysp40wt + 100*bysp41wt*kbyspw) + tsysp5*(bysp50wt + 100*bysp51wt*kbyspw) $ () marginal FRML _G tssmwt = tsys1 *d1wt + tsys2 *d2wt + tsys3 *d3wt + tsys4 *d4wt + tsys5 *d5wt + tsysp1*dp1wt + tsysp2*dp2wt + tsysp3*dp3wt + tsysp4*dp4wt + tsysp5*dp5wt $ () EFTERLØNNERE FRML _G tss0ef = tsys1 *(bys10ef + 100*bys11ef *kbysef ) + tsys2 *(bys20ef + 100*bys21ef *kbysef ) + tsys3 *(bys30ef + 100*bys31ef *kbysef ) + tsys4 *(bys40ef + 100*bys41ef *kbysef ) + tsys5 *(bys50ef + 100*bys51ef *kbysef ) + tsysp1*(bysp10ef + 100*bysp11ef *kbyspef) + tsysp2*(bysp20ef + 100*bysp21ef *kbyspef) + tsysp3*(bysp30ef + 100*bysp31ef *kbyspef) + tsysp4*(bysp40ef + 100*bysp41ef *kbyspef) + tsysp5*(bysp50ef + 100*bysp51ef *kbyspef) $ () LEDIGE FRML _G tss0l = tsys1 *(bys10l + 100*bys11l *kbysl ) + tsys2 *(bys20l + 100*bys21l *kbysl ) + tsys3 *(bys30l + 100*bys31l *kbysl ) + tsys4 *(bys40l + 100*bys41l *kbysl ) + tsys5 *(bys50l + 100*bys51l *kbysl ) + tsysp1*(bysp10l + 100*bysp11l *kbyspl) + tsysp2*(bysp20l + 100*bysp21l *kbyspl) + tsysp3*(bysp30l + 100*bysp31l *kbyspl) + tsysp4*(bysp40l + 100*bysp41l *kbyspl) + tsysp5*(bysp50l + 100*bysp51l *kbyspl) $ () () () 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 + tpibp1*fIbp11 + tpimp1*fImp11 + tpimo1*fImo11 + tpibo1*fIbo11 + 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) + btgimp1*tg*pimp11*fImp11/((1+trimp1)*(1+btgimp1*tg)) + btgimo1*tg*pimo11*fImo11/(1+btgimo1*tg) + btgibo1*tg*pibo11*fIbo11/(1+btgibo1*tg) + btgibp1*tg*pibp11*fIbp11/(1+btgibp1*tg) + btgil*tg*pil*fIl/(1+btgil*tg) $ FRML _I Sig = Sigx + Sigc + Sigi1 $ FRML _G Sir = trb*fCb*pcb/(1+trb) + trimp1*fImp11*pimp11/(1+trimp1) $ FRML _G Siqu = tqu1*Qw1*(1-bq/2)*0.001 $ FRML _G tqab = tqabe + ((Tarn(-2)-Tarne(-2))/((Yw1(-2)-Typri(-2))*3)) *(1-Dtsda) $ FRML _GJ_D Siqab = tqab*(Yw1-Typri)*ksiqab1 $ 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*Ywqf1+tsiqam*(0.07*Ywqq1+Ywh1))*(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 + (Io11+Io1res+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) - (Io11 + Io1res + Tkoubi) - Ilo1 - Tkojr $ FRML _I Ydp = Yr1 - Ivo1 + Yw1 + Twen + Tipn -(Sd-Sden) - Saso- Typri- Tbpho + Saen + Ty + Tyen + Taop + Taep - Tapo - Tape $ FRML _I Ydph1 = Yrp + Yw1+ Twen + Tipph - (Sd - Sds - Sden) - (Typri + Saso + Tbpho + Tbhsp - Saen) + (Ty + Typshp + Tyen) + Taphn $ FRML _I Tfphn1 = Ydph1-Cp-(Typshp-Tbhsp)+(Tkoph-Sak-Tkphe) -(Iph+Ilph+Tkphjr) $ FRML _I Ydps1 = Ydp - Ydph1 $ () 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 -Tkoek-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 = kiok11*Io11 $ 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 Yr1 = Yf - Siq - Yw1 $ FRML _I Yra1 = Yfa - Siqa - Ywa1 $ FRML _I Yre1 = Yfe - Siqe - Ywe1 $ FRML _I Yrng1 = Yfng - Siqng - Ywng1 $ FRML _I Yrne1 = Yfne - Siqne - Ywne1 $ FRML _I Yrnf1 = Yfnf - Siqnf - Ywnf1 $ FRML _I Yrnn1 = Yfnn - Siqnn - Ywnn1 $ FRML _I Yrnb1 = Yfnb - Siqnb - Ywnb1 $ FRML _I Yrnm1 = Yfnm - Siqnm - Ywnm1 $ FRML _I Yrnt1 = Yfnt - Siqnt - Ywnt1 $ FRML _I Yrnk1 = Yfnk - Siqnk - Ywnk1 $ FRML _I Yrnq1 = Yfnq - Siqnq - Ywnq1 $ FRML _I Yrb1 = Yfb - Siqb - Ywb1 $ FRML _I Yrqh1 = Yfqh - Siqqh - Ywqh1 $ FRML _I Yrqs1 = Yfqs - Siqqs - Ywqs1 $ FRML _I Yrqt1 = Yfqt - Siqqt - Ywqt1 $ FRML _I Yrqf1 = Yfqf - Siqqf - Ywqf1 $ FRML _I Yrqq1 = Yfqq - Siqqq - Ywqq1 $ FRML _I Yrh1 = Yfh - Siqh - Ywh1 $ FRML _I Yro1 = Yfo - Siqo - Ywo2 $ FRML _G Yrp = kyrp2 *( bqsa1*Yfa+bqse1*Yfe+bqsng1*Yfng+bqsnf1*Yfnf +bqsnn1*Yfnn+bqsnb1*Yfnb+bqsnm1*Yfnm+bqsnt1*Yfnt +bqsnk1*Yfnk+bqsnq1*Yfnq+bqsb1*Yfb+bqsqh1*Yfqh +bqsqs1*Yfqs+bqsqt1*Yfqt+bqsqq1*Yfqq+0.82*Yfh ) $ FRML _D Yrs1 = Yr1 - Yrqf1 - 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 - Io11 - Io1res) - 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 _GJRD Dlog(lna) = Dlog(lna1) $ 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 = ktbhsl2*(1+JRktbhsl)*Ysda3*(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 = ktbhsk2*(1+JRktbhsk)*Ysda3*(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 = kbhl2*(1+JRtphhli)*Ydph1 $ 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 = kbhk2*(1+JRtphhki)*Ydph1 $ 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*(ksda3*Ysda3-(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 = Yw1+Twen-Typri-Saso+Ty+Tyen-(Sd-Sden) $ FRML ISDKOR Sdkor = Sd - Sden $ FRML IYRPS1 Yrps1 = Yr1 - Ivo1 $ FRML IYDD Ydd = Ydpl1/pcp4v2 $ FRML IYDDxH Yddxh = (Ydpl1/pcp4v2) - fCh $ FRML IWCPLD Wcpld = Wcp3(-1)/pcp4v2 $ FRML IFCPDK fCpdk = fCf+fCn+fCi+fCe+fCg+fCb+fCv+fCh+fCk+fCs $ FRML IFCP42 fcp42 = fCp - fCb + fCbs $ FRML IFCP4XH1 fCp4xh1 = fCp42 - fCh $ FRML ICh1 Ch1 = fChl*pchl+fChe*pche $ FRML IFCh1 fCh1 = Ch1/pch1 $ FRML IFCP411 fCp411 = fCp4xh1 + fCh1 $ FRML ICBS Cbs = pcb*fCbs $ FRML ICB Cb = pcb*fCb $ FRML ICp42 Cp42 = Cp - Cb + Cbs $ FRML ICp411 Cp411 = Cp4xh1+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 ICGBK1 Cgbk1 = pcgbk1*fCgbk1 $ FRML IfCgk fCgk = Cgk/pcgk $ FRML IYDY Ydy = 100*Ydp/Y $ FRML IBCP4XH1 bcp4xh1 = (Cp42-(pch*fCh))/(Ydpl1) $ FRML IBCPXH bcpxh = (Cp-(pch*fCh))/(Ydpl1-(pch*fCh)) $ FRML IBCP42 bcp42 = Cp42/Ydpl1 $ FRML IBCP411 bcp411 = Cp411/Ydpl1 $ FRML IBCP bcp = Cp/Ydp $ FRML IBCPYSM bcpysm = Cp/(Yf + Ty) $ FRML IBCPY bcpy = Cp/Y $ FRML IBCPYF bcpyf = Cp/Yf $ FRML IBWCP3 bwcp3 = Wcp3(-1) / Ydp $ FRML IBfCgk bfcgk = fCg/fCk $ FRML IECP4XH1 ecp4xh1 = Cp4xh1 - exp( .357954*(Ydphk2-Ydphk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +.175511*(Ydpsk2-Ydpsk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +.077816*Dlog(Wcp3(-1)) -.600497*Dlog(pcp4xhv1)+.106991*Dlog(pch1) -.052315*(d72-d72(-1)) -.302352*(log(Cp4xh1(-1)/pcp4xhv1(-1)) -.791963*log(Ydpl1(-1)/pcp4v2(-1)) -(1-.791963)*log(Wcp3(-2)/pcp4v2(-1)) +0.900345*log(pcp4xhv1(-1)/pcp4v2(-1)) + 0.00273788*(tid-1958) + 0.052315*d72 +0.305863) +log(Cp4xh1(-1)/pcp4xhv1(-1))+log(pcp4xhv1) ) $ FRML IEFCP4XH efcp4xh1 = ecp4xh1*fCp4xh1/Cp4xh1 $ () () 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 IFIP11 fIp11 = fIbp11 + fImp11 + fIt + fIbh + fIl $ FRML IIP11 Ip11 = I - Io11 $ FRML IFIFP fIfp = fImp + fImk + fIbp + fIbh + fIt $ FRML IFIFPXH fIfpxh = fImp + fImk + fIbp + fIt $ FRML IFIFP1Xh fIfp1xh1 = fIbp11 + fImp11 + fIt $ FRML IFIFO fIfo = fImo + fIbo $ FRML IFIO fIo = fImo + fIbo $ FRML IIT It = pit*fIt $ FRML IIBB Ib = pibp11*fIbp11 + pibo11*fIbo11 + pibh*fIbh $ FRML IIBM Im = pimp11*fImp11 + pimo11*fImo11 $ FRML IIPB11 Ibp11 = pibp11*fIbp11 $ FRML IIPM11 Imp11 = pimp11*fImp11 $ 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 Ikhn1 khn1 = 1000*fXn/(HQng1+HQne1+HQnf1+HQnn1+HQnb1+HQnm1+HQnt1 +HQnk1+HQnq1) $ FRML IQXa1 Qxa1 = fXa/Qa1 $ FRML IQXe1 Qxe1 = fXe/Qe1 $ FRML IQXng1 Qxng1 = fXng/Qng1 $ FRML IQXne1 Qxne1 = fXne/Qne1 $ FRML IQXnf1 Qxnf1 = fXnf/Qnf1 $ FRML IQXnn1 Qxnn1 = fXnn/Qnn1 $ FRML IQXnb1 Qxnb1 = fXnb/Qnb1 $ FRML IQXnm1 Qxnm1 = fXnm/Qnm1 $ FRML IQXnt1 Qxnt1 = fXnt/Qnt1 $ FRML IQXnk1 Qxnk1 = fXnk/Qnk1 $ FRML IQXnq1 Qxnq1 = fXnq/Qnq1 $ FRML IQXb1 Qxb1 = fXb/Qb1 $ FRML IQXqh1 Qxqh1 = fXqh/Qqh1 $ FRML IQXqs1 Qxqs1 = fXqs/QQS1 $ FRML IQXqt1 Qxqt1 = fXqt/Qqt1 $ FRML IQXqf1 Qxqf1 = fXqf/Qqf1 $ FRML IQXqq1 Qxqq1 = fXqq/Qqq1 $ FRML IQXh1 Qxh1 = fXh/Qh1 $ FRML IQXo1 QXo1 = fXo/Qo2 $ FRML IQxn1 Qxn1 = (fXng+fXne+fXnf+fXnn+fXnb+fXnm+fXnt+fXnk+fXnq)/ (Qng1+Qne1+Qnf1+Qnn1+Qnb1+Qnm1+Qnt1+Qnk1+Qnq1) $ FRML IQxq1 Qxq1 = (fXqh+fXqs+fXqt+fXqf+fXqq)/ (Qqh1+QQS1+Qqt1+Qqf1+Qqq1) $ FRML IkQYfa1 kqyfa1 = fYfa/HQa1 $ FRML IkQYfe1 kqyfe1 = fYfe/HQe1 $ FRML IkQYfng1 kqyfng1 = fYfng/HQng1 $ FRML IkQYfne1 kqyfne1 = fYfne/HQne1 $ FRML IkQYfnf1 kqyfnf1 = fYfnf/HQnf1 $ FRML IkQYfnn1 kqyfnn1 = fYfnn/HQnn1 $ FRML IkQYfnb1 kqyfnb1 = fYfnb/HQnb1 $ FRML IkQYfnm1 kqyfnm1 = fYfnm/HQnm1 $ FRML IkQYfnt1 kqyfnt1 = fYfnt/HQnt1 $ FRML IkQYfnk1 kqyfnk1 = fYfnk/HQnk1 $ FRML IkQYfnq1 kqyfnq1 = fYfnq/HQnq1 $ FRML IkQYfb1 kqyfb1 = fYfb/HQb1 $ FRML IkQYfqh1 kqyfqh1 = fYfqh/HQqh1 $ FRML IkQYfqs1 kqyfqs1 = fYfqs/HQQS1 $ FRML IkQYfqt1 kqyfqt1 = fYfqt/HQqt1 $ FRML IkQYfqf1 kqyfqf1 = fYfqf/HQqf1 $ FRML IkQYfqq1 kqyfqq1 = fYfqq/HQqq1 $ FRML IkQYfh1 kqyfh1 = fYfh/HQh1 $ FRML IkQYfo1 kqyfo1 = fYfo/HQo1 $ FRML IkQYfq1 kqyfq1 = (fYfqh+fYfqs+fYfqt+fYfqf+fYfqq)/ (HQqh1 +HQQS1 +HQqt1 +HQqf1 +HQqq1) $ FRML IqfY1 qfy1 = fY/Q1 $ FRML IqfYf1 qfyf1 = fYf/Q1 $ () () BESK’FTIGELSE () FRML IQU1 Qu1 = Q1-Qe1-Qa1 $ FRML IQn1 Qn1 = Qng1+Qne1+Qnf1+Qnn1+Qnb1+Qnm1+Qnt1+Qnk1+Qnq1 $ FRML IQn1 Qwn1 = Qwng1+Qwne1+Qwnf1+Qwnn1+Qwnb1+Qwnm1+Qwnt1 +Qwnk1+Qwnq1 $ FRML IQn1 Qsn1 = Qsng1+Qsne1+Qsnf1+Qsnn1+Qsnb1+Qsnm1+Qsnt1 +Qsnk1+Qsnq1 $ FRML IQq1 Qq1 = Qqh1+Qqs1+Qqt1+Qqf1+Qqq1 $ FRML IQwq1 Qwq1 = Qwqs1+Qwqh1+Qwqq1+Qwqt1+Qwqf1 $ FRML IQSq1 Qsq1 = Qq1-Qwq1$ FRML IQSU1 Qsu1 = Q1-Qw1-Qsa1 $ () () () ARBEJDSLSHED () () FRML IUlfh Ulfh = Ulf - Ulfd $ FRML IUlfm Ulfm = Ulf - Ulfu $ FRML IUli Uli = Ul - Ulf $ FRML Ibula bula = 100*(Ul/Ua1) $ () () () LNSUMMER OG LNKVOTER () () FRML IYwn1 Ywn1 = Ywng1+Ywne1+Ywnf1+Ywnn1+Ywnb1+Ywnm1+Ywnt1+Ywnk1+Ywnq1 $ FRML IYwq1 Ywq1 = Ywqh1+Ywqs1+Ywqt1+Ywqf1+Ywqq1 $ FRML Ibyw1 byw1 = Yw1/Yf $ FRML Ibywn1 bywn1 = (Ywng1+Ywne1+Ywnf1+Ywnn1+Ywnb1+Ywnm1+Ywnt1+Ywnk1+Ywnq1) /(Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq) $ FRML Ibywq1 bywq1 = (Ywqh1+Ywqs1+Ywqt1+Ywqf1+Ywqq1) /(Yfqh+Yfqs+Yfqt+Yfqf+Yfqq) $ FRML Ibywa1 bywa1 = Ywa1/Yfa $ FRML Ibywe1 bywe1 = Ywe1/Yfe $ FRML Ibywng1 bywng1 = Ywng1/Yfng $ FRML Ibywne1 bywne1 = Ywne1/Yfne $ FRML Ibywnf1 bywnf1 = Ywnf1/Yfnf $ FRML Ibywnn1 bywnn1 = Ywnn1/Yfnn $ FRML Ibywnb1 bywnb1 = Ywnb1/Yfnb $ FRML Ibywnm1 bywnm1 = Ywnm1/Yfnm $ FRML Ibywnt1 bywnt1 = Ywnt1/Yfnt $ FRML Ibywnk1 bywnk1 = Ywnk1/Yfnk $ FRML Ibywnq1 bywnq1 = Ywnq1/Yfnq $ FRML Ibywb1 bywb1 = Ywb1/Yfb $ FRML Ibywqh1 bywqh1 = Ywqh1/Yfqh $ FRML Ibywqs1 bywqs1 = Ywqs1/Yfqs $ FRML Ibywqt1 bywqt1 = Ywqt1/Yfqt $ FRML Ibywqf1 bywqf1 = Ywqf1/Yfqf $ FRML Ibywqq1 bywqq1 = Ywqq1/Yfqq $ FRML Ibywh1 bywh1 = Ywh1/Yfh $ FRML Ibywo1 bywo1 = Ywo1/Yfo $ FRML Ipyfn pyfn = (Yfng+Yfne+Yfnf+Yfnn+Yfnb+Yfnm+Yfnt+Yfnk+Yfnq)/fYfn $ FRML Ikqyfn1 kqyfn1 = fYfn/(HQng1+HQne1+HQnf1+HQnn1+HQnb1+HQnm1+HQnt1+HQnk1+HQnq1) $ () () () 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 = btgimp1*tg*pimp11*fImp11/((1+trimp1)*(1+btgimp1*tg)) +btgibp1*tg*pibp11*fIbp11/(1+btgibp1*tg) $ FRML ISigPB Sigibp = btgibp1*tg*pibp11*fIbp11/(1+btgibp1*tg) $ FRML ISigpm Sigimp = btgimp1*tg*pimp11*fImp11/((1+trimp1)*(1+btgimp1*tg)) $ FRML ISigOB Sigibo = btgibo1*tg*pibo11*fIbo11/(1+btgibo1*tg) $ FRML ISigOM Sigimo = btgimo1*tg*pimo11*fImo11/(1+btgimo1*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 = tpibp1*fIbp11 + tpimp1*fImp11 $ FRML ISipibp Sipibp = tpibp1*fIbp11 $ FRML ISipimp Sipimp = tpimp1*fImp11 $ FRML ISipio Sipio = tpibo1*fIbo11 + tpimo1*fImo11 $ FRML ISipOB Sipibo = tpibo1*fIbo11 $ FRML ISipOM Sipimo = tpimo1*fImo11 $ FRML ISipibh Sipibh = tpibh*fIbh $ FRML ISipL Sipil = tpil*fIl $ FRML ISirpm Sirimp = trimp1*fImp11*pimp11/(1+trimp1) $ FRML ISixie Sixie = Sipx+tpibo1*fIbo11+tpimo1*fImo11+tpibh*fIbh+tpibp1*fIbp11 +tpimp1*fImp11+tpil*fIl+trimp1*fImp11*pimp11/(1+trimp1) +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 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 = kysprs2*(Yw1+Yrr2) $ FRML IYLWS Ylws = (Safm + kylws1*Yw1) $ FRML IYLWS Yl3s = kyl3s2*(Yw1+Yrr2) $ FRML IYLWS Ysrs1 = kysrs3*(Yw1+Yrr2) $ FRML IWSDSBK Wsdsbk = Wbbzk(-1)*((kwpbu-kwpbu(-1) )/kwpbu(-1))*0.6 $ () Slutskatter FRML ISsy Ssy = Ssy2 + Ssf + Ssso $ () Friholdt indkomst FRML IYsp1r Ysp1r = Ysp-Ysp1 $ FRML IYsp2r Ysp2r = Ysp-Ysp2 $ FRML IYsp3r Ysp3r = Ysp-Ysp3 $ FRML IYsp4r Ysp4r = Ysp-Ysp4 $ FRML IYsp5r Ysp5r = Ysp-Ysp5 $ FRML IYs1r Ys1r = Ys-Ys1 $ FRML IYs2r Ys2r = Ys-Ys2 $ FRML IYs3r Ys3r = Ys-Ys3 $ FRML IYs4r Ys4r = Ys-Ys4 $ FRML IYs5r Ys5r = Ys-Ys5 $ FRML Ytssp0e tssp0e = tssp0 $ FRML Ytssp1e tssp1e = tssp1 $ FRML Ytss0e tss0e = tss0 $ FRML Ytss1e tss1e = tss1 $ FRML Ybysp10e bysp10e = bysp10 $ FRML Ybysp20e bysp20e = bysp20 $ FRML Ybysp30e bysp30e = bysp30 $ FRML Ybysp40e bysp40e = bysp40 $ FRML Ybysp50e bysp50e = bysp50 $ FRML Ybysp11e bysp11e = bysp11 $ FRML Ybysp21e bysp21e = bysp21 $ FRML Ybysp31e bysp31e = bysp31 $ FRML Ybysp41e bysp41e = bysp41 $ FRML Ybysp51e bysp51e = bysp51 $ FRML Ybys10e bys10e = bys10 $ FRML Ybys20e bys20e = bys20 $ FRML Ybys30e bys30e = bys30 $ FRML Ybys40e bys40e = bys40 $ FRML Ybys50e bys50e = bys50 $ FRML Ybys11e bys11e = bys11 $ FRML Ybys21e bys21e = bys21 $ FRML Ybys31e bys31e = bys31 $ FRML Ybys41e bys41e = bys41 $ FRML Ybys51e bys51e = bys51 $ () () BRUTTONATIONALPRODUKT, BRUTTOV’RDITILV’KST () OG ANDRE INDKOMSTBEGREBER M.V. () FRML IFYST fYst = fY + fM $ FRML IYST Yst = (Y) + (M) $ FRML IYRT1 Yrt1 = Yf-Yw1+Tipn $ FRML IYAB1 Yab1 = Yw1+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*Yw1/Y $ FRML IYRY Yry = 100*Yr1/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 IAFIP11 afip11 = (fIp11 - fIp11(-1))/fY(-1) $ FRML IAfIp1xh afifp1xh1 = (fIfp1xh1 - fIfp1xh1(-1))/fY(-1) $ FRML IAFIO11 afio11 = (fIo11 - fIo11(-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 = (Io11+io1res)-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 Tfpsn1 = Tfpn-Tfphn1 $ 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 ITFPHNY1 Tfphny1 = 100*Tfphn1/Y $ FRML ITFPSNY1 Tfpsny1 = 100*Tfpsn1/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 () FRML IFKMaM1 fkmam1 = 0.34046**(0.51387/(1-0.51387))*(1/dtfkma1) *((fxa-hostkor)/65741.89638/1.18142)*111924.00000 $ FRML IFKMnfM1 fkmnfm1 = 0.34173**(0.30062/(1-0.30062))*(1/dtfkmnf1) *(fxnf/104743.64063/1.03529)*46551.39453 $ FRML IFKMnnM1 fkmnnm1 = 0.42423**(0.30040/(1-0.30040))*(1/dtfkmnn1) *(fxnn/12090.46973/1.03891)*5373.60547 $ FRML IFKMnbM1 fkmnbm1 = 0.23548**(0.43174/(1-0.43174))*(1/dtfkmnb1) *(fxnb/27016.24805/0.94871)*23086.37500 $ FRML IFKMnmM1 fkmnmm1 = 0.28420**(0.42444/(1-0.42444))*(1/dtfkmnm1) *(fxnm/131459.39063/1.00569)*70994.00000 $ FRML IFKMntM1 fkmntm1 = 0.39050**(0.46355/(1-0.46355))*(1/dtfkmnt1) *(fxnt/17040.36719/0.95843)*4849.00000 $ FRML IFKMnkM1 fkmnkm1 = 0.36555**(0.35734/(1-0.35734))*(1/dtfkmnk1) *(fxnk/55882.23828/1.08005)*51414.18750 $ FRML IFKMnqM1 fkmnqm1 = 0.48006**(0.18608/(1-0.18608))*(1/dtfkmnq1) *(fxnq/75197.39844/1.00318)*52691.21094 $ FRML IFKMbM1 fkmbm1 = 0.28351**(0.20010/(1-0.20010))*(1/dtfkmb1) *(fxb/114577.46094/1.02587)*39866.00000 $ FRML IFKMqhM1 fkmqhm1 = 0.20742**(0.15918/(1-0.15918))*(1/dtfkmqh1) *(fxqh/185435.45313/1.01199)*140579.34375 $ FRML IFKMqtM1 fkmqtm1 = 0.58488**(0.21492/(1-0.21492))*(1/dtfkmqt1) *(fxqt/106955.57031/1.00781)*114613.00000 $ FRML IFKMqqM1 fkmqqm1 = 0.35744**(0.40000/(1-0.40000))*(1/dtfkmqq1) *(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 Idtfvex1 dtfvex1 = (dtfvea1*fVea+dtfvenf1*fVenf+dtfvenn1*fVenn+dtfvenb1*fVenb +dtfvenm1*fVenm+dtfvent1*fVent+dtfvenk1*fVenk+dtfvenq1*fVenq +dtfveb1*fVeb+dtfveqh1*fVeqh+dtfveqs*fVeqs+dtfveqt1*fVeqt +dtfveqf1*fVeqf+dtfveqq1*fVeqq+dtfveh*fVeh+dtfveo1*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 IfVexw2 fVexw2 = fVeaw1+fVenfw1+fVennw1+fVenbw1+fVenmw1+fVentw1+fVenkw1+fVenqw1 +fVebw1+fVeqhw1+fVeqtw1+fVeqfw1+fVeqqw1+fVeow1 $ FRML Idtfvex2 dtfvex2 = (dtfvea1*fVea+dtfvenf1*fVenf+dtfvenn1*fVenn+dtfvenb1*fVenb +dtfvenm1*fVenm+dtfvent1*fVent+dtfvenk1*fVenk+dtfvenq1*fVenq +dtfveb1*fVeb+dtfveqh1*fVeqh+dtfveqt1*fVeqt +dtfveqf1*fVeqf+dtfveqq1*fVeqq+dtfveo1*fVeo) /fVex1 $ FRML Ipklex2 pklex2 = (pklea1*fVea+pklenf1*fVenf+pklenn1*fVenn+pklenb1*fVenb +pklenm1*fVenm+pklent1*fVent+pklenk1*fVenk+pklenq1*fVenq +pkleb1*fVeb+pkleqh1*fVeqh+pkleqt1*fVeqt +pkleqf1*fVeqf+pkleqq1*fVeqq+pkleo1*fVeo) /fVex1 $ () Omkostningsudtryk i relativpris, pwkle FRML Ipwklea1 pwklea1 = uima *fKma +la1 *HQa1 +pvea *fVea $ FRML Ipwklenf1 pwklenf1 = uimnf*fKmnf+lnf1*HQnf1+pvenf*fVenf $ FRML Ipwklenn1 pwklenn1 = uimnn*fKmnn+lnn1*HQnn1+pvenn*fVenn $ FRML Ipwklenb1 pwklenb1 = uimnb*fKmnb+lnb1*HQnb1+pvenb*fVenb $ FRML Ipwklenm1 pwklenm1 = uimnm*fKmnm+lnm1*HQnm1+pvenm*fVenm $ FRML Ipwklent1 pwklent1 = uimnt*fKmnt+lnt1*HQnt1+pvent*fVent $ FRML Ipwklenk1 pwklenk1 = uimnk*fKmnk+lnk1*HQnk1+pvenk*fVenk $ FRML Ipwklenq1 pwklenq1 = uimnq*fKmnq+lnq1*HQnq1+pvenq*fVenq $ FRML Ipwkleb1 pwkleb1 = uimb *fKmb +lb1 *HQb1 +pveb *fVeb $ FRML Ipwkleqh1 pwkleqh1 = uimqh*fKmqh+lqh1*HQqh1+pveqh*fVeqh $ FRML Ipwkleqt1 pwkleqt1 = uimqt*fKmqt+lqt1*HQqt1+pveqt*fVeqt $ FRML Ipwkleqf1 pwkleqf1 = uimqf*fKmqf+lqf1*HQqf1+pveqf*fVeqf $ FRML Ipwkleqq1 pwkleqq1 = uimqq*fKmqq+lqq1*HQqq1+pveqq*fVeqq $ FRML Ipwkleo1 pwkleo1 = uimo *fKmo +lo1 *HQo1 +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 IFKM3M1 fKm3m1 = fKmam1 + fKmqqm1 + fKmqhm1 + fKmnmm1 + fKmqtm1 + fKmbm1 + fKmnqm1 + fKmnfm1 + fKmnbm1 + fKmnkm1 + fKmntm1 + fKmnnm1 $ 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 = (pimp11*fImp11 + pimo11*fImo11)/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 Idtfkmn1 dtfkmn1 = (dtfkmng1*fKmng+dtfkmne1*fKmne+dtfkmnf1*fKmnf +dtfkmnn1*fKmnn+dtfkmnb1*fKmnb+dtfkmnm1*fKmnm +dtfkmnt1*fKmnt+dtfkmnk1*fKmnk+dtfkmnq1*fKmnq)/fKmn $ FRML Idtfkmq1 dtfkmq1 = (dtfkmqh1*fKmqh+dtfkmqs1*fKmqs+dtfkmqt1*fKmqt +dtfkmqf1*fKmqf+dtfkmqq1*fKmqq)/fKmq $ FRML Idtfkmp1 dtfkmp1 = (dtfkma1*fKma+dtfkme*fKme+dtfkmng1*fKmng +dtfkmne1*fKmne+dtfkmnf1*fKmnf+dtfkmnn1*fKmnn +dtfkmnb1*fKmnb+dtfkmnm1*fKmnm+dtfkmnt1*fKmnt +dtfkmnk1*fKmnk+dtfkmnq1*fKmnq+dtfkmb1*fKmb +dtfkmqh1*fKmqh+dtfkmqs1*fKmqs+dtfkmqt1*fKmqt +dtfkmqf1*fKmqf+dtfkmqq1*fKmqq+dtfkmh*fKmh)/fKmp $ FRML Idtfkm21 dtfkm21 = (dtfkmng1*fKmng+dtfkmne1*fKmne+dtfkmqs1*fKmqs +dtfkmqf1*fKmqf)/fKm2 $ FRML Idtfkm31 dtfkm31 = (dtfkma1*fKma+dtfkmnf1*fKmnf+dtfkmnn1*fKmnn +dtfkmnb1*fKmnb+dtfkmnm1*fKmnm+dtfkmnt1*fKmnt +dtfkmnk1*fKmnk+dtfkmnq1*fKmnq+dtfkmb1*fKmb +dtfkmqh1*fKmqh+dtfkmqt1*fKmqt+dtfkmqq1*fKmqq)/fKm3 $ FRML Idtfkm231 dtfkm231 = (dtfkma1*fKma+dtfkmng1*fKmng+dtfkmne1*fKmne +dtfkmnf1*fKmnf+dtfkmnn1*fKmnn+dtfkmnb1*fKmnb +dtfkmnm1*fKmnm+dtfkmnt1*fKmnt+dtfkmnk1*fKmnk +dtfkmnq1*fKmnq+dtfkmb1*fKmb+dtfkmqh1*fKmqh +dtfkmqs1*fKmqs+dtfkmqt1*fKmqt+dtfkmqf1*fKmqf +dtfkmqq1*fKmqq)/fKm23 $ () fKmw (ønsket kapital) FRML IfKmnw1 fKmnw1 = fKmngw1+fKmnew1+fKmnfw1+fKmnnw1+fKmnbw1+fKmnmw1+fKmntw1 +fKmnkw1+fKmnqw1 $ FRML IfKmqw1 fKmqw1 = fKmqhw1+fKmqsw1+fKmqtw1+fKmqfw1+fKmqqw1 $ FRML IfKm2w1 fKm2w1 = fKmngw1+fKmnew1+fKmqsw1+fKmqfw1 $ FRML IfKm3w1 fKm3w1 = fKmaw1+fKmnfw1+fKmnnw1+fKmnbw1+fKmnmw1+fKmntw1+fKmnkw1 +fKmnqw1+fKmbw1+fKmqhw1+fKmqtw1+fKmqqw1 $ FRML IfKm23w1 fKm23w1 = fKm2w1 + fKm3w1 $ () rho_Km (autokorrelationsparameter) FRML Irofkm31 rofkm31 = (rofkma1*fKma+rofkmnf1*fKmnf+rofkmnn1*fKmnn+rofkmnb1*fKmnb+rofkmnm1*fKmnm +rofkmnt1*fKmnt+rofkmnk1*fKmnk+rofkmnq1*fKmnq+rofkmb1*fKmb+rofkmqh1*fKmqh +rofkmqt1*fKmqt+rofkmqq1*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 = (pibp11*fIbp11 + pibh*fIbh + pibo11*fIbo11)/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+dtfkbne1*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+dtfkbne1*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+dtfkbne1*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+fKbnew1+fKbnfw+fKbnnw+fKbnbw+fKbnmw+fKbntw +fKbnkw+fKbnqw $ FRML IfKbqw fKbqw = fKbqhw+fKbqsw+fKbqtw+fKbqfw+fKbqqw $ FRML IfKb2w fKb2w = fKbngw+fKbnew1+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 IHQn1 HQn1 = HQng1+HQne1+HQnf1+HQnn1+HQnb1+HQnm1+HQnt1+HQnk1+HQnq1 $ FRML IHQq1 HQq1 = HQqh1+HQqs1+HQqt1+HQqf1+HQqq1 $ FRML IHQp1 HQp1 = HQa1+HQe1+HQng1+HQne1+HQnf1+HQnn1+HQnb1+HQnm1+HQnt1+HQnk1+HQnq1+HQb1+HQqh1 +HQqs1+HQqt1+HQqf1+HQqq1+HQh1 $ FRML IHQ21 HQ21 = HQng1+HQne1+HQqs1+HQqf1 $ FRML IHQ31 HQ31 = HQa1+HQnf1+HQnn1+HQnb1+HQnm1+HQnt1+HQnk1+HQnq1+HQb1+HQqh1+HQqt1+HQqq1 $ FRML IHQ231 HQ231 = HQ21 + HQ31 $ FRML IHQ1 HQ1 = HQ231 + HQe1 + HQh1 + HQo1 $ () Q FRML IQp1 Qp1 = Qa1+Qe1+Qng1+Qne1+Qnf1+Qnn1+Qnb1+Qnm1+Qnt1+Qnk1+Qnq1+Qb1 +Qqh1+Qqs1+Qqt1+Qqf1+Qqq1+Qh1 $ FRML IQ21 Q21 = Qng1+Qne1+Qqs1+Qqf1 $ FRML IQ31 Q31 = Qa1+Qnf1+Qnn1+Qnb1+Qnm1+Qnt1+Qnk1+Qnq1+Qb1+Qqh1+Qqt1+Qqq1 $ FRML IQ231 Q231 = Q21 + Q31 $ () Qs FRML IQs21 Qs21 = Qsng1+Qsne1+Qsqs1+Qsqf1 $ FRML IQs31 Qs31 = Qsa1+Qsnf1+Qsnn1+Qsnb1+Qsnm1+Qsnt1+Qsnk1+Qsnq1+Qsb1+Qsqh1+Qsqt1+Qsqq1 $ FRML IQs231 Qs231 = Qs21 + Qs31 $ () Selvstændigkvoter FRML Ibqsq1 bqsQ1 = Qsq1/Qq1 $ FRML Ibqsn1 bqsN1 = Qsn1/Qn1 $ FRML Ibqsp1 bqsP1 = QsP1/Qp1 $ FRML Ibqs21 bqs21 = Qs21/Q21 $ FRML Ibqs31 bqs31 = Qs31/Q31 $ FRML Ibqs231 bqs231 = Qs231/Q231 $ () Qw FRML IQw21 Qw21 = Qwng1+Qwne1+Qwqs1+Qwqf1 $ FRML IQw31 Qw31 = Qwa1+Qwnf1+Qwnn1+Qwnb1+Qwnm1+Qwnt1+Qwnk1+Qwnq1+Qwb1+Qwqh1+Qwqt1+Qwqq1 $ FRML IQw231 Qw231 = Qw21 + Qw31 $ () Yw FRML IYwp1 Ywp1 = Ywa1+Ywe1+Ywng1+Ywne1+Ywnf1+Ywnn1+Ywnb1+Ywnm1+Ywnt1+Ywnk1+Ywnq1 +Ywb1+Ywqh1+Ywqs1+Ywqt1+Ywqf1+Ywqq1+Ywh1 $ FRML IYw21 Yw21 = Ywng1+Ywne1+Ywqs1+Ywqf1 $ FRML IYw31 Yw31 = Ywa1+Ywnf1+Ywnn1+Ywnb1+Ywnm1+Ywnt1+Ywnk1+Ywnq1+Ywb1+Ywqh1+Ywqt1 +Ywqq1 $ FRML IYw231 Yw231 = Yw21 + Yw31 $ () l FRML Iln1 ln1 = (lng1*HQng1+lne1*HQne1+lnf1*HQnf1+lnn1*HQnn1+lnb1*HQnb1+lnm1*HQnm1 +lnt1*HQnt1+lnk1*HQnk1+lnq1*HQnq1)/HQn1 $ FRML Ilq1 lq1 = (lqh1*HQqh1+lqs1*HQqs1+lqt1*HQqt1+lqf1*HQqf1+lqq1*HQqq1)/HQq1 $ FRML Ilp1 lp1 = (la1*HQa1+le1*HQe1+lng1*HQng1+lne1*HQne1+lnf1*HQnf1+lnn1*HQnn1 +lnb1*HQnb1+lnm1*HQnm1+lnt1*HQnt1+lnk1*HQnk1+lnq1*HQnq1+lb1*HQb1 +lqh1*HQqh1+lqs1*HQqs1+lqt1*HQqt1+lqf1*HQqf1+lqq1*HQqq1+lh1*HQh1)/HQp1 $ FRML Il21 l21 = (lng1*HQng1+lne1*HQne1+lqs1*HQqs1+lqf1*HQqf1)/HQ21 $ FRML Il31 l31 = (la1*HQa1+lnf1*HQnf1+lnn1*HQnn1+lnb1*HQnb1+lnm1*HQnm1+lnt1*HQnt1 +lnk1*HQnk1+lnq1*HQnq1+lb1*HQb1+lqh1*HQqh1+lqt1*HQqt1+lqq1*HQqq1)/HQ31 $ FRML Il231 l231 = (la1*HQa1+lng1*HQng1+lne1*HQne1+lnf1*HQnf1+lnn1*HQnn1+lnb1*HQnb1 +lnm1*HQnm1+lnt1*HQnt1+lnk1*HQnk1+lnq1*HQnq1+lb1*HQb1+lqh1*HQqh1 +lqs1*HQqs1+lqt1*HQqt1+lqf1*HQqf1+lqq1*HQqq1)/HQ231 $ FRML Il1 l1 = (la1*HQa1+le1*HQe1+lng1*HQng1+lne1*HQne1+lnf1*HQnf1+lnn1*HQnn1 +lnb1*HQnb1+lnm1*HQnm1+lnt1*HQnt1+lnk1*HQnk1+lnq1*HQnq1+lb1*HQb1 +lqh1*HQqh1+lqs1*HQqs1+lqt1*HQqt1+lqf1*HQqf1+lqq1*HQqq1+lh1*HQh1 +lo1*HQo1)/HQ1 $ () dthq FRML Idthqn1 dthqn1 = (dthqng1*HQng1+dthqne1*HQne1+dthqnf1*HQnf1+dthqnn1*HQnn1 +dthqnb1*HQnb1+dthqnm1*HQnm1+dthqnt1*HQnt1+dthqnk1*HQnk1 +dthqnq1*HQnq1)/HQn1 $ FRML Idthqq1 dthqq1 = (dthqqh1*HQqh1+dthqqs1*HQqs1+dthqqt1*HQqt1+dthqqf1*HQqf1 +dthqqq1*HQqq1)/HQq1 $ FRML Idthqp1 dthqp1 = (dthqa1*HQa1+dthqe*HQe1+dthqng1*HQng1+dthqne1*HQne1+dthqnf1*HQnf1 +dthqnn1*HQnn1+dthqnb1*HQnb1+dthqnm1*HQnm1+dthqnt1*HQnt1 +dthqnk1*HQnk1+dthqnq1*HQnq1+dthqb1*HQb1+dthqqh1*HQqh1 +dthqqs1*HQqs1+dthqqt1*HQqt1+dthqqf1*HQqf1+dthqqq1*HQqq1 +dthqh*HQh1)/HQp1 $ FRML Idthq21 dthq21 = (dthqng1*HQng1+dthqne1*HQne1+dthqqs1*HQqs1+dthqqf1*HQqf1)/HQ21 $ FRML Idthq31 dthq31 = (dthqa1*HQa1+dthqnf1*HQnf1+dthqnn1*HQnn1+dthqnb1*HQnb1 +dthqnm1*HQnm1+dthqnt1*HQnt1+dthqnk1*HQnk1+dthqnq1*HQnq1 +dthqb1*HQb1+dthqqh1*HQqh1+dthqqt1*HQqt1+dthqqq1*HQqq1)/HQ31 $ FRML Idthq231 dthq231 = (dthqa1*HQa1+dthqng1*HQng1+dthqne1*HQne1+dthqnf1*HQnf1 +dthqnn1*HQnn1+dthqnb1*HQnb1+dthqnm1*HQnm1+dthqnt1*HQnt1 +dthqnk1*HQnk1+dthqnq1*HQnq1+dthqb1*HQb1+dthqqh1*HQqh1 +dthqqs1*HQqs1+dthqqt1*HQqt1+dthqqf1*HQqf1+dthqqq1*HQqq1)/HQ231 $ () HQw og HQn FRML IHQnw1 HQnw1 = HQngw1+HQnew1+HQnfw1+HQnnw1+HQnbw1+HQnmw1+HQntw1+HQnkw1+HQnqw1 $ FRML IHQqw1 HQqw1 = HQqhw1+HQqsw1+HQqtw1+HQqfw1+HQqqw1 $ FRML IHQ2w1 HQ2w1 = HQngw1+HQnew1+HQqsw1+HQqfw1 $ FRML IHQ3w1 HQ3w1 = HQaw1+HQnfw1+HQnnw1+HQnbw1+HQnmw1+HQntw1+HQnkw1+HQnqw1+HQbw1 +HQqhw1+HQqtw1+HQqqw1 $ FRML IHQ23w1 HQ23w1 = HQ2w1 + HQ3w1 $ FRML IHQ3n1 HQ3n1 = HQan1+HQnfn1+HQnnn1+HQnbn1+HQnmn1+HQntn1+HQnkn1+HQnqn1+HQbn1 +HQqhn1+HQqtn1+HQqqn1 $ () rho_L FRML Irohq31 rohq31 = (rohqa1*HQa1+rohqnf1*HQnf1+rohqnn1*HQnn1+rohqnb1*HQnb1+rohqnm1*HQnm1 +rohqnt1*HQnt1+rohqnk1*HQnk1+rohqnq1*HQnq1+rohqb1*HQb1+rohqqh1*HQqh1 +rohqqt1*HQqt1+rohqqq1*HQqq1)/HQ31 $ () 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 Idtfven1 dtfven1 = (dtfveng*fVeng+dtfvene1*fVene+dtfvenf1*fVenf+dtfvenn1*fVenn +dtfvenb1*fVenb+dtfvenm1*fVenm+dtfvent1*fVent+dtfvenk1*fVenk +dtfvenq1*fVenq)/fVen $ FRML Idtfveq1 dtfveq1 = (dtfveqh1*fVeqh+dtfveqs*fVeqs+dtfveqt1*fVeqt+dtfveqf1*fVeqf +dtfveqq1*fVeqq)/fVeq $ FRML Idtfvep1 dtfvep1 = (dtfvea1*fVea+ 1*fVee+dtfveng*fVeng+dtfvene1*fVene +dtfvenf1*fVenf+dtfvenn1*fVenn+dtfvenb1*fVenb+dtfvenm1*fVenm +dtfvent1*fVent+dtfvenk1*fVenk+dtfvenq1*fVenq+dtfveb1*fVeb +dtfveqh1*fVeqh+dtfveqs*fVeqs+dtfveqt1*fVeqt+dtfveqf1*fVeqf +dtfveqq1*fVeqq+dtfveh*fVeh)/fVep $ FRML Idtfve21 dtfve21 = (dtfveng*fVeng+dtfvene1*fVene+dtfveqs*fVeqs+dtfveqf1*fVeqf) /fVe2 $ FRML Idtfve31 dtfve31 = (dtfvea1*fVea+dtfvenf1*fVenf+dtfvenn1*fVenn+dtfvenb1*fVenb +dtfvenm1*fVenm+dtfvent1*fVent+dtfvenk1*fVenk+dtfvenq1*fVenq +dtfveb1*fVeb+dtfveqh1*fVeqh+dtfveqt1*fVeqt+dtfveqq1*fVeqq) /fVe3 $ FRML Idtfve231 dtfve231 = (dtfvea1*fVea+dtfveng*fVeng+dtfvene1*fVene+dtfvenf1*fVenf +dtfvenn1*fVenn+dtfvenb1*fVenb+dtfvenm1*fVenm+dtfvent1*fVent +dtfvenk1*fVenk+dtfvenq1*fVenq+dtfveb1*fVeb+dtfveqh1*fVeqh +dtfveqs*fVeqs+dtfveqt1*fVeqt+dtfveqf1*fVeqf+dtfveqq1*fVeqq) /fVe23 $ () fVew FRML IfVe3w1 fVe3w1 = fVeaw1+fVenfw1+fVennw1+fVenbw1+fVenmw1+fVentw1+fVenkw1+fVenqw1 +fVebw1+fVeqhw1+fVeqtw1+fVeqqw1 $ () 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 IPCP42 pcp42 = Cp42/fCp42 $ FRML IPI pi = I/(fIbh+fIbo11+fImo11+fIbp11+fImp11+fIt+fIl) $ FRML IPIF pif = (I - fIl*pil) /(fIbh+fIbo11+fImo11+fIbp11+fImp11+fIt) $ FRML IPIFP1XH pifp1xh = (pimp11*fImp11 + pibp11*fIbp11 + pit*fIt) /(fImp11+fIbp11+fIt) $ FRML IPIO11 pio11 = (Imo11+Ibo11)/(fImo11+fIbo11) $ FRML IPIP11 pip11 = Ip11/fIp11 $ () 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 Ipwavl1 pwavl1 = (la1*HQan1)/fXa $ FRML Ipwanv1 pwanv1 = pwavv+pwavl1 $ FRML Ipwnfnv1 pwnfnv1 = pwnfvv+pwnfvl1 $ FRML Ipwnnnv1 pwnnnv1 = pwnnvv+pwnnvl1 $ FRML Ipwnbnv1 pwnbnv1 = pwnbvv+pwnbvl1 $ FRML Ipwnmnv1 pwnmnv1 = pwnmvv+pwnmvl1 $ FRML Ipwntnv1 pwntnv1 = pwntvv+pwntvl1 $ FRML Ipwnknv1 pwnknv1 = pwnkvv+pwnkvl1 $ FRML Ipwnqnv1 pwnqnv1 = pwnqvv+pwnqvl1 $ FRML Ipwbnv1 pwbnv1 = pwbvv+pwbvl1 $ FRML Ipwqhnv1 pwqhnv1 = pwqhvv+pwqhvl1 $ FRML Ipwqtnv1 pwqtnv1 = pwqtvv+pwqtvl1 $ FRML Ipwqqnv1 pwqqnv1 = pwqqvv+pwqqvl1 $ FRML Ipwngw1 pwngw1 = (uimng*fKmngw1+uibng*fKbng+lng1*HQngw1+pveng*fVeng +pvmng*fVmng+Siqng-.000*Siqej-Siqngl)/fXng $ FRML Ipwqsw1 pwqsw1 = (uimqs*fKmqsw1+uibqs*fKbqs+lqs1*HQqsw1+pveqs*fVeqs +pvmqs*fVmqs+Siqqs-.006*Siqej-Siqqsl)/fXqs $ FRML Ipw3nv1 pw3nv1 = (pwanv1*fXa+pwnfnv1*fXnf+pwnnnv1*fXnn+pwnbnv1*fXnb +pwnmnv1*fXnm+pwntnv1*fXnt+pwnknv1*fXnk+pwnqnv1*fXnq +pwbnv1*fXb+pwqhnv1*fXqh+pwqtnv1*fXqt+pwqqnv1*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 Ipw3vl1 pw3vl1 = (pwavl1*fXa+pwnfvl1*fXnf+pwnnvl1*fXnn+pwnbvl1*fXnb+pwnmvl1*fXnm +pwntvl1*fXnt+pwnkvl1*fXnk+pwnqvl1*fXnq+pwbvl1*fXb+pwqhvl1*fXqh +pwqtvl1*fXqt+pwqqvl1*fXqq)/fX3 $ FRML Ipwnw1 pwnw1 = (pwngw1*fXng+pwnew1*fXne+pwnfw1*fXnf+pwnnw1*fXnn+pwnbw1*fXnb +pwnmw1*fXnm+pwntw1*fXnt+pwnkw1*fXnk+pwnqw1*fXnq)/fXn $ FRML Ipwqw1 pwqw1 = (pwqhw1*fXqh+pwqsw1*fXqs+pwqtw1*fXqt+pwqfw1*fXqf+pwqqw1*fXqq) /fXq $ FRML Ipw3w1 pw3w1 = (pwaw1*fXa+pwnfw1*fXnf+pwnnw1*fXnn+pwnbw1*fXnb+pwnmw1*fXnm +pwntw1*fXnt+pwnkw1*fXnk+pwnqw1*fXnq+pwbw1*fXb+pwqhw1*fXqh +pwqtw1*fXqt+pwqqw1*fXqq)/fX3 $ FRML Ipw23w1 pw23w1 = (pwaw1*fXa+pwngw1*fXng+pwnew1*fXne+pwnfw1*fXnf+pwnnw1*fXnn +pwbw1*fXb+pwqhw1*fXqh+pwqsw1*fXqs+pwqtw1*fXqt+pwqfw1*fXqf +pwqqw1*fXqq)/fX23 $ () () FAKTISKE OMKOSTNINGER () FRML Ipwa1 pwa1 = (uima*fKma+uiba*fKba+la1*HQa1+pvea*fVea+pvma*fVma +Siqa-.094*Siqej-Siqal)/fXa $ FRML Ipwe1 pwe1 = (uime*fKme+uibe*fKbe+le1*HQe1+pvee*fVee+pvme*fVme +Siqe-.000*Siqej-Siqel)/fXe $ FRML Ipwng1 pwng1 = (uimng*fKmng+uibng*fKbng+lng1*HQng1+pveng*fVeng+pvmng*fVmng +Siqng-.000*Siqej-Siqngl)/fXng $ FRML Ipwne1 pwne1 = (uimne*fKmne+uibne*fKbne+lne1*HQne1+pvene*fVene+pvmne*fVmne +Siqne-.006*Siqej-Siqnel)/fXne $ FRML Ipwnf1 pwnf1 = (uimnf*fKmnf+uibnf*fKbnf+lnf1*HQnf1+pvenf*fVenf+pvmnf*fVmnf +Siqnf-.008*Siqej-Siqnfl)/fXnf $ FRML Ipwnn1 pwnn1 = (uimnn*fKmnn+uibnn*fKbnn+lnn1*HQnn1+pvenn*fVenn+pvmnn*fVmnn +Siqnn-.003*Siqej-Siqnnl)/fXnn $ FRML Ipwnb1 pwnb1 = (uimnb*fKmnb+uibnb*fKbnb+lnb1*HQnb1+pvenb*fVenb+pvmnb*fVmnb +Siqnb-.006*Siqej-Siqnbl)/fXnb $ FRML Ipwnm1 pwnm1 = (uimnm*fKmnm+uibnm*fKbnm+lnm1*HQnm1+pvenm*fVenm+pvmnm*fVmnm +Siqnm-.018*Siqej-Siqnml)/fXnm $ FRML Ipwnt1 pwnt1 = (uimnt*fKmnt+uibnt*fKbnt+lnt1*HQnt1+pvent*fVent+pvmnt*fVmnt +Siqnt-.003*Siqej-Siqntl)/fXnt $ FRML Ipwnk1 pwnk1 = (uimnk*fKmnk+uibnk*fKbnk+lnk1*HQnk1+pvenk*fVenk+pvmnk*fVmnk +Siqnk-.009*Siqej-Siqnkl)/fXnk $ FRML Ipwnq1 pwnq1 = (uimnq*fKmnq+uibnq*fKbnq+lnq1*HQnq1+pvenq*fVenq+pvmnq*fVmnq +Siqnq-.011*Siqej-Siqnql)/fXnq $ FRML Ipwb1 pwb1 = (uimb*fKmb+uibb*fKbb+lb1*HQb1+pveb*fVeb+pvmb*fVmb +Siqb-.006*Siqej-Siqbl)/fXb $ FRML Ipwqh1 pwqh1 = (uimqh*fKmqh+uibqh*fKbqh+lqh1*HQqh1+pveqh*fVeqh+pvmqh*fVmqh +Siqqh-.056*Siqej-Siqqhl)/fXqh $ FRML Ipwqs1 pwqs1 = (uimqs*fKmqs+uibqs*fKbqs+lqs1*HQqs1+pveqs*fVeqs+pvmqs*fVmqs +Siqqs-.006*Siqej-Siqqsl)/fXqs $ FRML Ipwqt1 pwqt1 = (uimqt*fKmqt+uibqt*fKbqt+lqt1*HQqt1+pveqt*fVeqt+pvmqt*fVmqt +Siqqt-.017*Siqej-Siqqtl)/fXqt $ FRML Ipwqf1 pwqf1 = (uimqf*fKmqf+uibqf*fKbqf+lqf1*HQqf1+pveqf*fVeqf+pvmqf*fVmqf +Siqqf-.016*Siqej-Siqqfl)/fXqf $ FRML Ipwqq1 pwqq1 = (uimqq*fKmqq+uibqq*fKbqq+lqq1*HQqq1+pveqq*fVeqq+pvmqq*fVmqq +Siqqq-.136*Siqej-Siqqql)/fXqq $ FRML Ipwh1 pwh1 = (uimh*fKmh+uibh*fKbh+lh1*HQh1+pveh*fVeh+pvmh*fVmh +Siqh-.565*Siqej-Siqhl)/fXh $ FRML Ipwo1 pwo1 = (uimo*fKmo+uibo*fKbo+lo1*HQo1+pveo*fVeo+pvmo*fVmo +Siqo-.040*Siqej-Siqol)/fXo $ FRML Ipwn1 pwn1 = (pwng1*fXng+pwne1*fXne+pwnf1*fXnf+pwnn1*fXnn+pwnb1*fXnb +pwnm1*fXnm+pwnt1*fXnt+pwnk1*fXnk+pwnq1*fXnq)/fXn $ FRML Ipwq1 pwq1 = (pwqh1*fXqh+pwqs1*fXqs+pwqt1*fXqt+pwqf1*fXqf+pwqq1*fXqq)/fXq $ FRML Ipw31 pw31 = (pwa1*fXa+pwnf1*fXnf+pwnn1*fXnn+pwnb1*fXnb+pwnm1*fXnm +pwnt1*fXnt+pwnk1*fXnk+pwnq1*fXnq+pwb1*fXb+pwqh1*fXqh +pwqt1*fXqt+pwqq1*fXqq)/fX3 $ FRML Ipw231 pw231 = (pwa1*fXa+pwng1*fXng+pwne1*fXne+pwnf1*fXnf+pwnn1*fXnn +pwnb1*fXnb+pwnm1*fXnm+pwnt1*fXnt+pwnk1*fXnk+pwnq1*fXnq +pwb1*fXb+pwqh1*fXqh+pwqs1*fXqs+pwqt1*fXqt+pwqf1*fXqf +pwqq1*fXqq)/fX23 $ FRML Ipwp1 pwp1 = (pwa1*fXa+pwe1*fXe+pwng1*fXng+pwne1*fXne+pwnf1*fXnf+pwnn1*fXnn +pwnb1*fXnb+pwnm1*fXnm+pwnt1*fXnt+pwnk1*fXnk+pwnq1*fXnq +pwb1*fXb+pwqh1*fXqh+pwqs1*fXqs+pwqt1*fXqt+pwqf1*fXqf +pwqq1*fXqq+pwh1*fXh)/fXp $ FRML Ipw1 pw1 = (pwa1*fXa+pwe1*fXe+pwng1*fXng+pwne1*fXne+pwnf1*fXnf+pwnn1*fXnn +pwnb1*fXnb+pwnm1*fXnm+pwnt1*fXnt+pwnk1*fXnk+pwnq1*fXnq+pwb1*fXb +pwqh1*fXqh+pwqs1*fXqs+pwqt1*fXqt+pwqf1*fXqf+pwqq1*fXqq+pwh1*fXh +pwo1*fXo)/fX $ () () PROFITRATER () FRML Ibpra1 bpra1 = 1 - pwa1/pxa $ FRML Ibpre1 bpre1 = 1 - pwe1/pxe $ FRML Ibprng1 bprng1 = 1 - pwng1/pxng $ FRML Ibprne1 bprne1 = 1 - pwne1/pxne $ FRML Ibprnf1 bprnf1 = 1 - pwnf1/pxnf $ FRML Ibprnn1 bprnn1 = 1 - pwnn1/pxnn $ FRML Ibprnb1 bprnb1 = 1 - pwnb1/pxnb $ FRML Ibprnm1 bprnm1 = 1 - pwnm1/pxnm $ FRML Ibprnt1 bprnt1 = 1 - pwnt1/pxnt $ FRML Ibprnk1 bprnk1 = 1 - pwnk1/pxnk $ FRML Ibprnq1 bprnq1 = 1 - pwnq1/pxnq $ FRML Ibprb1 bprb1 = 1 - pwb1/pxb $ FRML Ibprqh1 bprqh1 = 1 - pwqh1/pxqh $ FRML Ibprqs1 bprqs1 = 1 - pwqs1/pxqs $ FRML Ibprqt1 bprqt1 = 1 - pwqt1/pxqt $ FRML Ibprqf1 bprqf1 = 1 - pwqf1/pxqf $ FRML Ibprqq1 bprqq1 = 1 - pwqq1/pxqq $ FRML Ibprh1 bprh1 = 1 - pwh1/pxh $ FRML Ibpro1 bpro1 = 1 - pwo1/pxo $ FRML Ibprq1 bprq1 = 1 - pwq1/pxq $ FRML Ibprn1 bprn1 = 1 - pwn1/pxn $ FRML Ibpr31 bpr31 = 1 - pw31/px3 $ FRML Ibpr231 bpr231 = 1 - pw231/px23 $ FRML Ibprp1 bprp1 = 1 - pwp1/pxp $ FRML Ibpr1 bpr1 = 1 - pw1/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(Cp4xh1-Jcp4xh1) - ( 0.357954*(ydphk2-Ydphk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +0.175511*(Ydpsk2-Ydpsk2(-1)) /(Ydphk2(-1)+Ydpsk2(-1)) +0.077816*Dlog(Wcp3(-1)) -0.600497*Dlog(pcp4xhv1)+0.106991*Dlog(pch1) -0.302352*log(Cp4xh1(-1)/Cp4xhw(-1)) -0.052315*(D72-D72(-1)) +log(Cp4xh1(-1)/pcp4xhv1(-1)) +log(pcp4xhv1) ) $ FRML YJDUuxa JDUuxa = Uuxa - (-0.37229*Dif(Q1/U1564) + uuxa(-1)/u1529(-1)) *u1529*(1-d7184) $ () FRML YJRQmf JRQmf = Qmf/exp((log(Qmf(-1)*(1-d7194)+d7194)+bqmf*dlog(Ul))) - 1 $ () FRML YJRUak JRUak = Uak/exp((log(Uak(-1)*(1-d7193)+d7193)+buak*dlog(Ul))) - 1 $ FRML YJRQmf JRQmf = (Qmf+d7194) /((1+bqmf*(Ul/Ul(-1)-1)*(1-d7194(-1)))*(Qmf(-1)+d7194(-1)))-1 $ FRML YJRUak JRUak = (Uak+d7193) /((1+buak*(Ul/Ul(-1)-1)*(1-d7193(-1)))*(Uak(-1)+d7193(-1)))-1 $ FRML YJDUefw JDUefw = Uefw-(Uefe + euefyl*((Yduef*(1-d7199)+d7199) /((Ydua+d99(-1))*(1-d7199)+d7199)-kuef)) $ FRML YJDUef JDUef = Uef - (dif(Uefe)+ euefys*((Yduef*(1-d7199)+d7199) /((Ydua+d99(-1))*(1-d7199)+d7199) -kuef) +0.25*(uefw(-1)-uef(-1))+Uef(-1)) $ FRML YZUef ZUef = Uef $ FRML YZUwxa ZUwxa = Uwxa $ FRML YUwxa Ur = Uwxa - ( Uuxa+Uak+Urev+Usxa+Usb+Umf+Uef+Ufox+Ukxa -(Ur1+Ur2)) $ FRML YJRPXQF JRpxqf =exp((log(pxqf)-log(pxqf(-1)))-(log(pxqf(-1))-log( pxqf(-2)))-(0.32156*((log(pwqfwv1)-log(pwqfwv1(-1)))- (log(pwqfwv1(-1))-log(pwqfwv1(-2))))-0.23509*((log( pxqf(-1))-log(pxqf(-2)))-(log(pwqfw1(-1))-log(pwqfw1(-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 $