FRML _DJ_ TIPHP =TIFP_CF_H+TIPPHPB+TISP+TIDMP+TILD+JTIPHP$ FRML JLED JTIPHP =TIPHP-(TIFP_CF_H+TIPPHPB+TISP+TIDMP+TILD)$ FRML _DJ_ TPPUN =TYPSHL-TBHSL+TYPSHK-TBHSK+TPHHLU-TPHHLI+TPHHKU-TPHHKI+TPATPU-TPATPI+TPSPU-TPSPI+ TPDMPU-TPDMPI+TPLDU-TPLDI+JTPPUN$ FRML JLED JTPPUN =TPPUN-(TYPSHL-TBHSL+TYPSHK-TBHSK+TPHHLU-TPHHLI+TPHHKU-TPHHKI+TPATPU-TPATPI+TPSPU- TPSPI+TPDMPU-TPDMPI+TPLDU-TPLDI)$ FRML _DJ_ YDPL1 =YDP-TIPHP+SDR+TPPUN-YFH-(IV-IVO1)+JYDPL1$ FRML JLED JYDPL1 =YDPL1-(YDP-TIPHP+SDR+TPPUN-YFH-(IV-IVO1))$ FRML _DJ_ YDPSK2 =YDP-(YDPH1+TBHSP-TYPSHP)-(YFH-KYRP2*0.82*YFH)+JYDPSK2$ FRML JLED JYDPSK2 =YDPSK2-(YDP-(YDPH1+TBHSP-TYPSHP)-(YFH-KYRP2*0.82*YFH))$ FRML _DJ_ YDPHK2 =(YDPH1+TBHSP-TYPSHP)-TIPHP+SDR+TPPUN-KYRP2*0.82*YFH+JYDPHK2$ FRML JLED JYDPHK2 =YDPHK2-((YDPH1+TBHSP-TYPSHP)-TIPHP+SDR+TPPUN-KYRP2*0.82*YFH)$ FRML _GJRD FCH =((FCH(-1)*(0.5*FKBH(-1)+0.5*FKBH)/(0.5*FKBH(-2)+0.5*FKBH(-1)))*(1.0+JRFCH))*(1.0- DFCH)+DFCH*ZFCH$ FRML JLED JRFCH =FCH/(FCH(-1)*(0.5*FKBH(-1)+0.5*FKBH)/(0.5*FKBH(-2)+0.5*FKBH(-1)))-1.0$ FRML EXO ZFCH =FCH$ FRML _GJRD FCHL =((FCHL(-1)*(0.5*FKBHL(-1)+0.5*FKBHL)/(0.5*FKBHL(-2)+0.5*FKBHL(-1)))*(1.0+JRFCHL))*(1.0 -DFCHL)+DFCHL*ZFCHL$ FRML JLED JRFCHL =FCHL/(FCHL(-1)*(0.5*FKBHL(-1)+0.5*FKBHL)/(0.5*FKBHL(-2)+0.5*FKBHL(-1)))-1.0$ FRML EXO ZFCHL =FCHL$ FRML _I FVH =FVEH+FVMH$ FRML _I PVH =VH/FVH$ FRML _D FCHE =(((0.5*FKBHE(-1)+0.5*FKBHE)/(0.5*FKBH(-1)+0.5*FKBH))*(FVH*PVH(-1)+FCH*PCH(-1)-AHCH* FCH*PXH(-1))+YCBHE(-1)*(0.5*FKBHE(-1)+0.5*FKBHE)/(0.5*FKBHE(-2)+0.5* FKBHE(-1)))/PCHE(-1)$ FRML _DJRD YCBHE =(((PHK/PIBH)*(INVBHE+(KNBHE(-1)+0.5*INBHE)*((1.-TSUIH)*IWBZ-0.50*RPIBHE))+(TSUIH* YRPHS+SSYEJ+SIQEJH*KNBHE(-2)/KNBH(-2)))*(1.0+JRYCBHE))*(1.0-DYCBHE)+ DYCBHE*ZYCBHE$ FRML JLED JRYCBHE =YCBHE/((PHK/PIBH)*(INVBHE+(KNBHE(-1)+0.5*INBHE)*((1.-TSUIH)*IWBZ-0.50*RPIBHE))+( TSUIH*YRPHS+SSYEJ+SIQEJH*KNBHE(-2)/KNBH(-2)))-1.0$ FRML EXO ZYCBHE =YCBHE$ FRML _D UIBHE =YCBHE/(0.5*FKBHE(-1)+0.5*FKBHE)$ FRML _D CHE =((0.5*FKBHE(-1)+0.5*FKBHE)/(0.5*FKBH(-1)+0.5*FKBH))*(VH+(PCH-AHCH*PXH)*FCH)+YCBHE$ FRML _D PCHE =CHE/FCHE$ FRML _GJ_D PCHL =(PCHL(-1)*PCH/PCH(-1)+JPCHL)*(1.0-DPCHL)+DPCHL*ZPCHL$ FRML JLED JPCHL =PCHL-(PCHL(-1)*PCH/PCH(-1))$ FRML EXO ZPCHL =PCHL$ FRML _I CHU =FCHL*PCHL+FCHE*PCHE$ FRML _D PCHU =PCHU(-1)*CHU/(PCHL(-1)*FCHL+PCHE(-1)*FCHE)$ FRML _I FCHU =CHU/PCHU$ FRML _I PCPUXH =PCPUXH(-1)*CPUXH/(PCBU(-1)*FCBU+PCE(-1)*FCE+PCF(-1)*FCF+PCG(-1)*FCG+PCI(-1)*FCI+PCK(-1) *FCK+PCN(-1)*FCN+PCS(-1)*FCS+PCV(-1)*FCV+PCT(-1)*FCT-PET(-1)*FET)$ FRML _D CPU =CPUXH+CHU$ FRML _D PCPU =PCPU(-1)*CPU/(FCP*PCP(-1)-FCB*PCB(-1)+FCBU*PCBU(-1)-FCH*PCH(-1)+FCHU*PCHU(-1))$ FRML _DJRDFZ CPUXHW =((EXP(0.872167*LOG(YDPL1/PCPU)+(1.-0.872167)*LOG(WCP(-1)/PCPU)-0.300000*LOG(PCPUXH/ PCPU)-0.292620+LOG(PCPUXH)))*(1.0+JRCPUXHW))*(1.0-DCPUXHW)+DCPUXHW* ZCPUXHW$ FRML JLED JRCPUXHW =CPUXHW/(EXP(0.872167*LOG(YDPL1/PCPU)+(1.-0.872167)*LOG(WCP(-1)/PCPU)-0.300000*LOG( PCPUXH/PCPU)-0.292620+LOG(PCPUXH)))-1.0$ FRML EXO ZCPUXHW =CPUXHW$ FRML _S___FZ CPUXH =(1.-DFCP)*(EXP(0.365845*(LOG(YDPHK2)-LOG(YDPHK2(-1)))+0.097410*(LOG(WCP(-1))-LOG(WCP(-2) ))-0.531462*(LOG(PCPUXH)-LOG(PCPUXH(-1)))+0.077129*(LOG(PCHU)-LOG( PCHU(-1)))-0.347112*LOG(CPUXH(-1)/CPUXHW(-1))+LOG(CPUXH(-1)/PCPUXH(-1) )+LOG(PCPUXH)+JRCPUXH)+JCPUXH)+DFCP*(ZFCP*PCP-FCB*PCB+FCBU*PCBU-FCH* PCH)$ FRML _I PCGBK1 =PCGBK1(-1)*(FCG*PCG+FCBU*PCBU+FCK*PCK)/(FCG*PCG(-1)+FCBU*PCBU(-1)+FCK*PCK(-1))$ FRML _D FCFM =4.29538+0.53173*(FCF(-1)-0.25*ET(-1)/PCF(-1))/U(-1)$ FRML _D FCNM =0.50202+0.87205*(FCN(-1)-0.14*ET(-1)/PCN(-1))/U(-1)$ FRML _D FCIM =1.91020+0.61714*(FCI(-1)-0.05*ET(-1)/PCI(-1))/U(-1)$ FRML _D FCEM =0.45553+0.74439*FCE(-1)/U(-1)+0.0025527*FROS$ FRML _D FCGBK1M =1.27052+0.76342*(FCGBK1(-1)-0.13*ET(-1)/PCGBK1(-1))/U(-1)$ FRML _D FCVM =-0.34689+0.94651*(FCV(-1)-0.05*ET(-1)/PCV(-1))/U(-1)$ FRML _D FCSM =1.50159+0.83117*(FCS(-1)-0.38*ET(-1)/PCS(-1))/U(-1)-0.44662*(1.-D4781)$ FRML _D FCTM =0.065455+0.68346*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.076643/(1.-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761-DFCV*0.098149 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCF)*U+0.25*ET/PCF+JFCF)* (1.0-DFCF)+DFCF*ZFCF$ FRML JLED JFCF =FCF-((FCFM+(0.076643/(1.-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761- DFCV*0.098149-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCF)*U+0.25* ET/PCF)$ FRML EXO ZFCF =FCF$ FRML _SJ_D FCN =((FCNM+(0.030000/(1.-DFCF*0.076643-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761-DFCV*0.098149 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCN)*U+0.14*ET/PCN+JFCN)* (1.0-DFCN)+DFCN*ZFCN$ FRML JLED JFCN =FCN-((FCNM+(0.030000/(1.-DFCF*0.076643-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761- DFCV*0.098149-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCN)*U+0.14* ET/PCN)$ FRML EXO ZFCN =FCN$ FRML _SJ_D FCI =((FCIM+(0.22154/(1.-DFCF*0.076643-DFCN*0.030000-DFCE*0.072550-DFCGBK1*0.14761-DFCV*0.098149 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCI)*U+0.05*ET/PCI+JFCI)* (1.0-DFCI)+DFCI*ZFCI$ FRML JLED JFCI =FCI-((FCIM+(0.22154/(1.-DFCF*0.076643-DFCN*0.030000-DFCE*0.072550-DFCGBK1*0.14761- DFCV*0.098149-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCI)*U+0.05* ET/PCI)$ FRML EXO ZFCI =FCI$ FRML _SJ_D FCE =((FCEM+(0.072550/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCGBK1*0.14761-DFCV*0.098149 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCE)*U+JFCE)*(1.0-DFCE)+ DFCE*ZFCE$ FRML JLED JFCE =FCE-((FCEM+(0.072550/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCGBK1*0.14761- DFCV*0.098149-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCE)*U)$ FRML EXO ZFCE =FCE$ FRML _SJ_D FCGBK1 =((FCGBK1M+(0.14761/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCV*0.098149 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCGBK1)*U+0.13*ET/PCGBK1+ JFCGBK1)*(1.0-DFCGBK1)+DFCGBK1*ZFCGBK1$ FRML JLED JFCGBK1 =FCGBK1-((FCGBK1M+(0.14761/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550- DFCV*0.098149-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCGBK1)*U+0.13 *ET/PCGBK1)$ FRML EXO ZFCGBK1 =FCGBK1$ FRML _SJ_D FCV =((FCVM+(0.098149/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761 -DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCV)*U+0.05*ET/PCV+JFCV)* (1.0-DFCV)+DFCV*ZFCV$ FRML JLED JFCV =FCV-((FCVM+(0.098149/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550- DFCGBK1*0.14761-DFCS*0.24976-DFCT*0.103748))*(CPUXH/U-CZM)/PCV)*U+0.05 *ET/PCV)$ FRML EXO ZFCV =FCV$ FRML _SJ_D FCS =((FCSM+(0.24976/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761 -DFCV*0.098149-DFCT*0.103748))*(CPUXH/U-CZM)/PCS)*U+0.38*ET/PCS+JFCS) *(1.0-DFCS)+DFCS*ZFCS$ FRML JLED JFCS =FCS-((FCSM+(0.24976/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550- DFCGBK1*0.14761-DFCV*0.098149-DFCT*0.103748))*(CPUXH/U-CZM)/PCS)*U+0.38 *ET/PCS)$ FRML EXO ZFCS =FCS$ FRML _SJ_D FCT =((FCTM+(0.103748/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550-DFCGBK1*0.14761 -DFCV*0.098149-DFCS*0.24976))*(CPUXH/U-CZM)/PCT)*U+JFCT)*(1.0-DFCT)+ DFCT*ZFCT$ FRML JLED JFCT =FCT-((FCTM+(0.103748/(1.-DFCF*0.076643-DFCN*0.030000-DFCI*0.22154-DFCE*0.072550- DFCGBK1*0.14761-DFCV*0.098149-DFCS*0.24976))*(CPUXH/U-CZM)/PCT)*U)$ FRML EXO ZFCT =FCT$ FRML _DJ_ WYCB =(YDPL1**0.87)*(WCP(-1)**0.13)+JWYCB$ FRML JLED JWYCB =WYCB-((YDPL1**0.87)*(WCP(-1)**0.13))$ FRML _DJRD RPCBE =((0.4*(PM7B/PM7B(-1)-1.)+(1.-0.4)*RPCBE(-1))*(1.0+JRRPCBE))*(1.0-DRPCBE)+DRPCBE* ZRPCBE$ FRML JLED JRRPCBE =RPCBE/(0.4*(PM7B/PM7B(-1)-1.)+(1.-0.4)*RPCBE(-1))-1.0$ FRML EXO ZRPCBE =RPCBE$ FRML _I FCBU =CBU/PCBU$ FRML _DJRD CBU =((INVCB+(KNCB(-1)+0.5*INCB)*((IWLO*(1.-TSUIH))-0.5*RPCBE)+SDV)*(1.0+JRCBU))*(1.0- DCBU)+DCBU*ZCBU$ FRML JLED JRCBU =CBU/(INVCB+(KNCB(-1)+0.5*INCB)*((IWLO*(1.-TSUIH))-0.5*RPCBE)+SDV)-1.0$ FRML EXO ZCBU =CBU$ FRML _D UCB1 =CBU/(0.5*FKCB(-1)+0.5*FKCB)$ FRML _DJRD FKCBW =((EXP((-3.31864)+1.08648*LOG(WYCB/PCPU)+0.423715/(1.+(LOG(WYCB/PCPU)/12.87)**(-110.))+ (-0.498319)*LOG(UCB1/PCPU)+(-0.014903)*D94))*(1.0+JRFKCBW))*(1.0- DFKCBW)+DFKCBW*ZFKCBW$ FRML JLED JRFKCBW =FKCBW/(EXP((-3.31864)+1.08648*LOG(WYCB/PCPU)+0.423715/(1.+(LOG(WYCB/PCPU)/12.87)**(-110. ))+(-0.498319)*LOG(UCB1/PCPU)+(-0.014903)*D94))-1.0$ FRML EXO ZFKCBW =FKCBW$ FRML _SJRD FKCB =((EXP(LOG(FKCB(-1))+0.188352*(LOG(WYCB/PCPU)-LOG(WYCB(-1)/PCPU(-1)))+(-0.05)*(LOG( UCB1/PCPU)-LOG(UCB1(-1)/PCPU(-1)))+(-0.014903)*(D94-D94(-1))+(-0.199952 )*(LOG(FKCB(-1))-LOG(FKCBW(-1)))+0.4*(LOG(FKCB(-1))-LOG(FKCB(-2)))))* (1.0+JRFKCB))*(1.0-DFKCB)+DFKCB*ZFKCB$ FRML JLED JRFKCB =FKCB/(EXP(LOG(FKCB(-1))+0.188352*(LOG(WYCB/PCPU)-LOG(WYCB(-1)/PCPU(-1)))+(-0.05)*(LOG (UCB1/PCPU)-LOG(UCB1(-1)/PCPU(-1)))+(-0.014903)*(D94-D94(-1))+(-0.199952 )*(LOG(FKCB(-1))-LOG(FKCBW(-1)))+0.4*(LOG(FKCB(-1))-LOG(FKCB(-2)))))- 1.0$ FRML EXO ZFKCB =FKCB$ FRML _D PCBU =UCB1/0.10990$ FRML _SJRD NKCB =((EXP(LOG(NKCB(-1))+0.83196*(LOG(FKCB)-LOG(FKCB(-1)))-0.00021*(TID-1957.)))*(1.0+ JRNKCB))*(1.0-DNKCB)+DNKCB*ZNKCB$ FRML JLED JRNKCB =NKCB/(EXP(LOG(NKCB(-1))+0.83196*(LOG(FKCB)-LOG(FKCB(-1)))-0.00021*(TID-1957.)))-1.0$ FRML EXO ZNKCB =NKCB$ FRML _I FCB =KFCB*(((FKCB)-(FKCB(-1)))+BIVCB*FKCB(-1))$ FRML _GJ_D OKNCB =((PCB/PCB(-1)-1.)*(KNCB(-1)+0.5*INCB)+JOKNCB)*(1.0-DOKNCB)+DOKNCB*ZOKNCB$ FRML JLED JOKNCB =OKNCB-((PCB/PCB(-1)-1.)*(KNCB(-1)+0.5*INCB))$ FRML EXO ZOKNCB =OKNCB$ FRML _D CB =PCB*FCB$ FRML _GJRD INVCB =(((PCB/(0.5*PCB(-1)+0.5*PCB))*BINVCB*KNCB(-1))*(1.0+JRINVCB))*(1.0-DINVCB)+DINVCB* ZINVCB$ FRML JLED JRINVCB =INVCB/((PCB/(0.5*PCB(-1)+0.5*PCB))*BINVCB*KNCB(-1))-1.0$ FRML EXO ZINVCB =INVCB$ FRML _D INCB =CB-INVCB$ FRML _I KNCB =KNCB(-1)+INCB+OKNCB$ FRML _D CGK =FCGBK1*PCGBK1-PCBU*FCBU$ 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)))*(1.0-DPCGK)+DPCGK*ZPCGK$ FRML EXO ZPCGK =PCGK$ FRML _SJRD FCGW =((EXP(LOG(CGK/PCGK)-0.604368*LOG(PCG/PCGK)-(1.-0.604368)*LOG(DTFCG)+0.604368*LOG(0.382311 )))*(1.0+JRFCGW))*(1.0-DFCGW)+DFCGW*ZFCGW$ FRML JLED JRFCGW =FCGW/(EXP(LOG(CGK/PCGK)-0.604368*LOG(PCG/PCGK)-(1.-0.604368)*LOG(DTFCG)+0.604368*LOG( 0.382311)))-1.0$ FRML EXO ZFCGW =FCGW$ FRML _SJRD FCG =((EXP(LOG(FCG(-1))+(LOG(CGK/PCGK)-LOG(CGK(-1)/PCGK(-1)))-0.256071*(LOG(PCG/PCGK)-LOG( PCG(-1)/PCGK(-1)))+0.330319*(1.-0.604368)*(LOG(DTFCG)-LOG(DTFCG(-1))) +0.8*(LOG(NKCB)-LOG(NKCB(-1)))+0.330319*(-LOG(FCG(-1))+LOG(FCGW(-1))) ))*(1.0+JRFCG))*(1.0-DFCG)+DFCG*ZFCG$ FRML JLED JRFCG =FCG/(EXP(LOG(FCG(-1))+(LOG(CGK/PCGK)-LOG(CGK(-1)/PCGK(-1)))-0.256071*(LOG(PCG/PCGK)-LOG (PCG(-1)/PCGK(-1)))+0.330319*(1.-0.604368)*(LOG(DTFCG)-LOG(DTFCG(-1)) )+0.8*(LOG(NKCB)-LOG(NKCB(-1)))+0.330319*(-LOG(FCG(-1))+LOG(FCGW(-1)) )))-1.0$ FRML EXO ZFCG =FCG$ FRML _I FCK =(CGK-FCG*PCG)/PCK$ FRML _I FCP =(FCH*PCH(-1)+FCF*PCF(-1)+FCN*PCN(-1)+FCI*PCI(-1)+FCE*PCE(-1)+FCG*PCG(-1)+FCB*PCB(-1)+ FCK*PCK(-1)+FCV*PCV(-1)+FCS*PCS(-1)+FCT*PCT(-1)-FET*PET(-1))/PCP(-1)$ 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 _I CPDK =FCF*PCF+FCN*PCN+FCI*PCI+FCE*PCE+FCG*PCG+FCB*PCB+FCV*PCV+FCH*PCH+FCK*PCK+FCS*PCS$ FRML _I FCPDK =(FCF*PCF(-1)+FCN*PCN(-1)+FCI*PCI(-1)+FCE*PCE(-1)+FCG*PCG(-1)+FCB*PCB(-1)+FCV*PCV(-1)+ FCH*PCH(-1)+FCK*PCK(-1)+FCS*PCS(-1))/PCPDK(-1)$ FRML _I PCPDK =CPDK/FCPDK$ FRML _D KNMP =KNMA+KNME+KNMB+KNMH+KNMNG+KNMNE+KNMNF+KNMNN+KNMNB+KNMNM+KNMNT+KNMNK+KNMNQ+KNMQH+ KNMQS+KNMQT+KNMQF+KNMQQ$ FRML _D KNBP =KNBA+KNBE+KNBB+KNBNG+KNBNE+KNBNF+KNBNN+KNBNB+KNBNM+KNBNT+KNBNK+KNBNQ+KNBQH+KNBQS+ KNBQT+KNBQF+KNBQQ$ FRML _D WP =WPHPK+WPHPL+WPSPL+WPSPK+WATP+WDMP+WSP+WLD$ FRML _D KWPS =(1.+IWBZ*(1.-0.8*TSDR*BSDR))**12./(1.+IWBZ*(1.-(TSS0+TSSP0+TSS1+TSSP1)))**12.$ FRML _DJ__F WCP =KNBHL+PHK*KNBHE/PIBH+KNCB+WN_H+WN_CR+WN_CF+KNMP+KNBP-WP+((WPHPK+WPSPK)*(1.-TSDP)+(WP- WPHPK-WPSPK)*(1.-TSS0-TSSP0-TSS1-TSSP1))*KWPS+JWCP$ FRML JLED JWCP =WCP-(KNBHL+PHK*KNBHE/PIBH+KNCB+WN_H+WN_CR+WN_CF+KNMP+KNBP-WP+((WPHPK+WPSPK)*(1.-TSDP) +(WP-WPHPK-WPSPK)*(1.-TSS0-TSSP0-TSS1-TSSP1))*KWPS)$ FRML _KJ_ PHV =(0.5*PHK+0.5*PHK(-1))*KPHV+JPHV$ FRML JLED JPHV =PHV-((0.5*PHK+0.5*PHK(-1))*KPHV)$ FRML _DJ_D RPIBHE =(0.75*RPIBHE(-1)+0.25*(PIBH/PIBH(-1)-1.)+JRPIBHE)*(1.0-DRPIBHE)+DRPIBHE*ZRPIBHE$ FRML JLED JRPIBHE =RPIBHE-(0.75*RPIBHE(-1)+0.25*(PIBH/PIBH(-1)-1.))$ FRML EXO ZRPIBHE =RPIBHE$ FRML _DJRD FKBHW =((U*EXP(1.0000*LOG(CPUXH/(U*PCPUXH))+0.214899/(1.+(CPU/(U*PCPU)/EXP(4.3))**(-25.))-0.30000 *LOG(PCHE/PCPUXH)-0.025500*BAFD+1.56692))*(1.0+JRFKBHW))*(1.0-DFKBHW) +DFKBHW*ZFKBHW$ FRML JLED JRFKBHW =FKBHW/(U*EXP(1.0000*LOG(CPUXH/(U*PCPUXH))+0.214899/(1.+(CPU/(U*PCPU)/EXP(4.3))**(-25.) )-0.30000*LOG(PCHE/PCPUXH)-0.025500*BAFD+1.56692))-1.0$ FRML EXO ZFKBHW =FKBHW$ FRML _SJRD PHK =((EXP(LOG(PHK(-1))+1.11319*(LOG((CPUXH/PCPUXH)/FKBH)-LOG((CPUXH(-1)/PCPUXH(-1))/FKBH(-1) ))-0.439594*(LOG(PCHE/PHK)-LOG(PCHE(-1)/PHK(-1)))+(LOG(PCPUXH)-LOG( PCPUXH(-1)))-1.04680*LOG(FKBH(-1)/FKBHW(-1))))*(1.0+JRPHK))*(1.0- DPHK)+DPHK*ZPHK$ FRML JLED JRPHK =PHK/(EXP(LOG(PHK(-1))+1.11319*(LOG((CPUXH/PCPUXH)/FKBH)-LOG((CPUXH(-1)/PCPUXH(-1))/ FKBH(-1)))-0.439594*(LOG(PCHE/PHK)-LOG(PCHE(-1)/PHK(-1)))+(LOG( PCPUXH)-LOG(PCPUXH(-1)))-1.04680*LOG(FKBH(-1)/FKBHW(-1))))-1.0$ FRML EXO ZPHK =PHK$ FRML _KJ_D PHGK =(PHK*KPHGK+JPHGK)*(1.0-DPHGK)+DPHGK*ZPHGK$ FRML JLED JPHGK =PHGK-(PHK*KPHGK)$ FRML EXO ZPHGK =PHGK$ FRML _SJRD FKBH =((EXP(LOG(FKBH(-1))+0.3*0.025549*(LOG(PHK/(0.8*PIBH+0.2*PHGK))-LOG(PHK(-1)/(0.8*PIBH(-1) +0.2*PHGK(-1))))+0.025549*LOG(PHK(-1)/(0.8*PIBH(-1)+0.2*PHGK(-1)))+2.91208 *NBS/FKBH(-1)+0.035436*LOG(FKBHW(-1)/FKBH(-1))+0.010998-0.6*(0.3*0.025549 *(LOG(PHK(-1)/(0.8*PIBH(-1)+0.2*PHGK(-1)))-LOG(PHK(-2)/(0.8*PIBH(-2)+ 0.2*PHGK(-2))))+0.025549*LOG(PHK(-2)/(0.8*PIBH(-2)+0.2*PHGK(-2)))+2.91208 *NBS(-1)/FKBH(-2)+0.035436*LOG(FKBHW(-2)/FKBH(-2))+0.010998-(LOG( FKBH(-1))-LOG(FKBH(-2))))))*(1.0+JRFKBH))*(1.0-DFKBH)+DFKBH*ZFKBH$ FRML JLED JRFKBH =FKBH/(EXP(LOG(FKBH(-1))+0.3*0.025549*(LOG(PHK/(0.8*PIBH+0.2*PHGK))-LOG(PHK(-1)/(0.8* PIBH(-1)+0.2*PHGK(-1))))+0.025549*LOG(PHK(-1)/(0.8*PIBH(-1)+0.2*PHGK(-1) ))+2.91208*NBS/FKBH(-1)+0.035436*LOG(FKBHW(-1)/FKBH(-1))+0.010998-0.6 *(0.3*0.025549*(LOG(PHK(-1)/(0.8*PIBH(-1)+0.2*PHGK(-1)))-LOG(PHK(-2)/ (0.8*PIBH(-2)+0.2*PHGK(-2))))+0.025549*LOG(PHK(-2)/(0.8*PIBH(-2)+0.2* PHGK(-2)))+2.91208*NBS(-1)/FKBH(-2)+0.035436*LOG(FKBHW(-2)/FKBH(-2))+ 0.010998-(LOG(FKBH(-1))-LOG(FKBH(-2))))))-1.0$ FRML EXO ZFKBH =FKBH$ FRML _I FIBH =KFIBH*(((FKBH)-(FKBH(-1)))+BIVBH*FKBH(-1))$ FRML _GJ_D OKNBH =((PIBH/PIBH(-1)-1.)*(KNBH(-1)+0.5*INBH)+JOKNBH)*(1.0-DOKNBH)+DOKNBH*ZOKNBH$ FRML JLED JOKNBH =OKNBH-((PIBH/PIBH(-1)-1.)*(KNBH(-1)+0.5*INBH))$ FRML EXO ZOKNBH =OKNBH$ FRML _D IBH =PIBH*FIBH$ FRML _GJRD INVBH =(((PIBH/(0.5*PIBH(-1)+0.5*PIBH))*BINVBH*KNBH(-1))*(1.0+JRINVBH))*(1.0-DINVBH)+DINVBH* ZINVBH$ FRML JLED JRINVBH =INVBH/((PIBH/(0.5*PIBH(-1)+0.5*PIBH))*BINVBH*KNBH(-1))-1.0$ FRML EXO ZINVBH =INVBH$ FRML _D INBH =IBH-INVBH$ FRML _I KNBH =KNBH(-1)+INBH+OKNBH$ FRML _GJRD FIBHL =((1.6*NBS+JFIBHL)*(1.0+JRFIBHL))*(1.0-DFIBHL)+DFIBHL*ZFIBHL$ FRML JLED JRFIBHL =FIBHL/(1.6*NBS+JFIBHL)-1.0$ FRML EXO ZFIBHL =FIBHL$ FRML _I IBHE =IBH-PIBH*FIBHL$ FRML _I FKBHL =FKBHL(-1)+FIBHL/KFIBH-BIVBH*FKBHL(-1)$ FRML _I FKBHE =FKBH-FKBHL$ FRML _GJ_D OKNBHE =((PIBH/PIBH(-1)-1.)*(KNBHE(-1)+0.5*INBHE)+JOKNBHE)*(1.0-DOKNBHE)+DOKNBHE*ZOKNBHE$ FRML JLED JOKNBHE =OKNBHE-((PIBH/PIBH(-1)-1.)*(KNBHE(-1)+0.5*INBHE))$ FRML EXO ZOKNBHE =OKNBHE$ FRML _GJRD INVBHE =(((PIBH/(0.5*PIBH(-1)+0.5*PIBH))*BINVBH*KNBHE(-1))*(1.0+JRINVBHE))*(1.0-DINVBHE)+ DINVBHE*ZINVBHE$ FRML JLED JRINVBHE =INVBHE/((PIBH/(0.5*PIBH(-1)+0.5*PIBH))*BINVBH*KNBHE(-1))-1.0$ FRML EXO ZINVBHE =INVBHE$ FRML _D INBHE =IBHE-INVBHE$ FRML _I KNBHE =KNBHE(-1)+INBHE+OKNBHE$ FRML _I KNBHL =KNBH-KNBHE$ FRML _DJ_D TSDSU1 =(BSDS*TSDS1+(1.-BSDS)*KTSDS*TSDS1+JTSDSU1)*(1.0-DTSDSU1)+DTSDSU1*ZTSDSU1$ FRML JLED JTSDSU1 =TSDSU1-(BSDS*TSDS1+(1.-BSDS)*KTSDS*TSDS1)$ FRML EXO ZTSDSU1 =TSDSU1$ FRML _DJ_D IWBZSU =(((1.-TSDSU1)*IWBZ-D8291*(PTTY1/PTTY1(-1)-1.))/(1.+D8291*(PTTY1/PTTY1(-1)-1.))+ JIWBZSU)*(1.0-DIWBZSU)+DIWBZSU*ZIWBZSU$ FRML JLED JIWBZSU =IWBZSU-(((1.-TSDSU1)*IWBZ-D8291*(PTTY1/PTTY1(-1)-1.))/(1.+D8291*(PTTY1/PTTY1(-1)-1.)) )$ FRML EXO ZIWBZSU =IWBZSU$ FRML _DJ_ BIVMU =BIVMP0+BIVMP*(1.-BIVMP1)/(BIVMP+IWBZSU)+JBIVMU$ FRML JLED JBIVMU =BIVMU-(BIVMP0+BIVMP*(1.-BIVMP1)/(BIVMP+IWBZSU))$ FRML _DJ_ BIVBU =BIVBP0+BIVBP*(BIVBPW-BIVBP1)/(BIVBP+IWBZSU)+JBIVBU$ FRML JLED JBIVBU =BIVBU-(BIVBP0+BIVBP*(BIVBPW-BIVBP1)/(BIVBP+IWBZSU))$ FRML _I FIMP =(FIMA*PIMA(-1)+FIME*PIME(-1)+FIMB*PIMB(-1)+FIMH*PIMH(-1)+FIMNG*PIMNG(-1)+FIMNE*PIMNE(-1) +FIMNF*PIMNF(-1)+FIMNN*PIMNN(-1)+FIMNB*PIMNB(-1)+FIMNM*PIMNM(-1)+ FIMNT*PIMNT(-1)+FIMNK*PIMNK(-1)+FIMNQ*PIMNQ(-1)+FIMQH*PIMQH(-1)+ FIMQS*PIMQS(-1)+FIMQT*PIMQT(-1)+FIMQF*PIMQF(-1)+FIMQQ*PIMQQ(-1))/ PIMP(-1)$ FRML _I INVMP =INVMA+INVME+INVMB+INVMH+INVMNG+INVMNE+INVMNF+INVMNN+INVMNB+INVMNM+INVMNT+INVMNK+ INVMNQ+INVMQH+INVMQS+INVMQT+INVMQF+INVMQQ$ FRML _I FIBP =(FIBA*PIBA(-1)+FIBE*PIBE(-1)+FIBB*PIBB(-1)+FIBNG*PIBNG(-1)+FIBNE*PIBNE(-1)+FIBNF* PIBNF(-1)+FIBNN*PIBNN(-1)+FIBNB*PIBNB(-1)+FIBNM*PIBNM(-1)+FIBNT* PIBNT(-1)+FIBNK*PIBNK(-1)+FIBNQ*PIBNQ(-1)+FIBQH*PIBQH(-1)+FIBQS* PIBQS(-1)+FIBQT*PIBQT(-1)+FIBQF*PIBQF(-1)+FIBQQ*PIBQQ(-1))/PIBP(-1)$ FRML _I INVBP =INVBA+INVBE+INVBB+INVBNG+INVBNE+INVBNF+INVBNN+INVBNB+INVBNM+INVBNT+INVBNK+INVBNQ+ INVBQH+INVBQS+INVBQT+INVBQF+INVBQQ$ FRML _K FIBO11 =FIBO*KFIBO11$ FRML _I IBO11 =FIBO11*PIBO11$ FRML _K FIMO11 =FIMO*KFIMO11$ FRML _I IMO11 =FIMO11*PIMO11$ FRML _G IO11 =IMO11+IBO11$ FRML _K FIO1 =(FIMO11*PIMO11(-1)+FIBO11*PIBO11(-1)-TKOUBI*(PIBO11(-1)/PIBO11)*KFIO1)/PIO1(-1)$ FRML _I IO1 =IO11-TKOUBI$ FRML _I PIO1 =IO1/FIO1$ FRML _K FIBO1 =KFIBO1*FIBO11$ FRML _K PIBO1 =KPIBO2*PIBO11$ FRML _K IVO1 =(INVMO+INVBO)*KIVO1$ FRML _K IPH =KIPH*(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 _K FIMK =FIMP*KFIMK$ FRML _K PIMK =PIMP*KPIMK$ FRML _I IM =PIMP11*FIMP11+PIMO11*FIMO11$ FRML _I FIM =(FIMP*PIMP(-1)+FIMO*PIMO(-1)+FIMK*PIMK(-1))/PIM(-1)$ FRML _I PIM =(PIMP11*FIMP11+PIMO11*FIMO11)/FIM$ FRML _I IB =PIBP11*FIBP11+PIBO11*FIBO11+PIBH*FIBH$ FRML _I FIB =(FIBP*PIBP(-1)+FIBO*PIBO(-1)+FIBH*PIBH(-1))/PIB(-1)$ FRML _I PIB =(PIBP11*FIBP11+PIBH*FIBH+PIBO11*FIBO11)/FIB$ FRML _I FIMP11 =(FIM*PIM(-1)-FIMO11*PIMO11(-1))/PIMP11(-1)$ FRML _I FIBP11 =(FIB*PIB(-1)-FIBO11*PIBO11(-1)-FIBH*PIBH(-1))/PIBP11(-1)$ FRML _I I =FIMP11*PIMP11+FIMO11*PIMO11+FIBP11*PIBP11+FIBO11*PIBO11+FIBH*PIBH+FIT*PIT+FIL*PIL$ FRML _K IV =(INVBO+INVMO+INVBH+INVBP+INVMP)*KIV$ FRML _S FILA =(1.-DFIL)*(0.20394*(0.75*(((FXA)-(FXA(-1)))-((FILA)-(FILA(-1))))+(1.-0.75)*(((FXA(-1) )-(FXA(-2)))-((FILA(-1))-(FILA(-2)))))+0.66667*(HOSTKOR-0.5*HOSTKOR(-1) -0.5*HOSTKOR(-2))+JFILA)+DFIL*ZFILA$ FRML _S FILE =(1.-DFIL)*(0.05217*(0.75*(((FXE)-(FXE(-1)))-((FILE)-(FILE(-1))))+(1.-0.75)*(((FXE(-1) )-(FXE(-2)))-((FILE(-1))-(FILE(-2)))))+JFILE)+DFIL*ZFILE$ FRML _G FILNG =(1.-DFIL)*(BNGIL*(((FXNG)-(FXNG(-1)))-((FILNG)-(FILNG(-1))))+JFILNG)+DFIL*ZFILNG$ FRML _S FILNE =(1.-DFIL)*(0.03845*(0.00*(((FXNE)-(FXNE(-1)))-((FILNE)-(FILNE(-1))))+(1.-0.00)*((( FXNE(-1))-(FXNE(-2)))-((FILNE(-1))-(FILNE(-2)))))+JFILNE)+DFIL* ZFILNE$ FRML _G FILNF =(1.-DFIL)*(BNFIL*(((FXNF)-(FXNF(-1)))-((FILNF)-(FILNF(-1))))+JFILNF)+DFIL*ZFILNF$ FRML _S FILNN =(1.-DFIL)*(0.37875*(0.75*(((FXNN)-(FXNN(-1)))-((FILNN)-(FILNN(-1))))+(1.-0.75)*((( FXNN(-1))-(FXNN(-2)))-((FILNN(-1))-(FILNN(-2)))))+JFILNN)+DFIL* ZFILNN$ FRML _S FILNB =(1.-DFIL)*(0.19120*(0.75*(((FXNB)-(FXNB(-1)))-((FILNB)-(FILNB(-1))))+(1.-0.75)*((( FXNB(-1))-(FXNB(-2)))-((FILNB(-1))-(FILNB(-2)))))+JFILNB)+DFIL* ZFILNB$ FRML _S FILNM =(1.-DFIL)*(0.18587*(0.00*(((FXNM)-(FXNM(-1)))-((FILNM)-(FILNM(-1))))+(1.-0.00)*((( FXNM(-1))-(FXNM(-2)))-((FILNM(-1))-(FILNM(-2)))))+JFILNM)+DFIL* ZFILNM$ FRML _G FILNT =(1.-DFIL)*(BNTIL*(((FXNT)-(FXNT(-1)))-((FILNT)-(FILNT(-1))))+JFILNT)+DFIL*ZFILNT$ FRML _S FILNK =(1.-DFIL)*(0.14686*(0.25*(((FXNK)-(FXNK(-1)))-((FILNK)-(FILNK(-1))))+(1.-0.25)*((( FXNK(-1))-(FXNK(-2)))-((FILNK(-1))-(FILNK(-2)))))+JFILNK)+DFIL* ZFILNK$ FRML _S FILNQ =(1.-DFIL)*(0.14348*(0.50*(((FXNQ)-(FXNQ(-1)))-((FILNQ)-(FILNQ(-1))))+(1.-0.50)*((( FXNQ(-1))-(FXNQ(-2)))-((FILNQ(-1))-(FILNQ(-2)))))+JFILNQ)+DFIL* ZFILNQ$ FRML _S FILQH =(1.-DFIL)*(0.01967*(0.50*(((FXQH)-(FXQH(-1)))-((FILQH)-(FILQH(-1))))+(1.-0.50)*((( FXQH(-1))-(FXQH(-2)))-((FILQH(-1))-(FILQH(-2)))))+JFILQH)+DFIL* ZFILQH$ FRML _S FILQQ =(1.-DFIL)*(0.00920*(0.50*(((FXQQ)-(FXQQ(-1)))-((FILQQ)-(FILQQ(-1))))+(1.-0.50)*((( FXQQ(-1))-(FXQQ(-2)))-((FILQQ(-1))-(FILQQ(-2)))))+JFILQQ)+DFIL* ZFILQQ$ FRML _S FILM0 =(1.-DFIL)*(0.05276*(((FM0)-(FM0(-1)))-((FILM0)-(FILM0(-1))))+JFILM0)+DFIL*ZFILM0$ FRML _G FILM1 =(1.-DFIL)*(BM1IL*(((FM1)-(FM1(-1)))-((FILM1)-(FILM1(-1))))+JFILM1)+DFIL*ZFILM1$ FRML _S FILM2 =(1.-DFIL)*(0.06441*(0.00*(((FM2)-(FM2(-1)))-((FILM2)-(FILM2(-1))))+(1.-0.00)*(((FM2(-1) )-(FM2(-2)))-((FILM2(-1))-(FILM2(-2)))))+JFILM2)+DFIL*ZFILM2$ FRML _S FILM3K =(1.-DFIL)*(0.41176*(0.00*(((FM3K)-(FM3K(-1)))-((FILM3K)-(FILM3K(-1))))+(1.-0.00)*((( FM3K(-1))-(FM3K(-2)))-((FILM3K(-1))-(FILM3K(-2)))))+JFILM3K)+DFIL* ZFILM3K$ FRML _S FILM3R =(1.-DFIL)*(0.05948*(0.00*(((FM3R)-(FM3R(-1)))-((FILM3R)-(FILM3R(-1))))+(1.-0.00)*((( FM3R(-1))-(FM3R(-2)))-((FILM3R(-1))-(FILM3R(-2)))))+JFILM3R)+DFIL* ZFILM3R$ FRML _S FILM3Q =(1.-DFIL)*(0.30000*(((FM3Q(-1))-(FM3Q(-2)))-((FILM3Q(-1))-(FILM3Q(-2))))+JFILM3Q)+ DFIL*ZFILM3Q$ FRML _S FILM5 =(1.-DFIL)*(0.13059*(0.50*(((FM5)-(FM5(-1)))-((FILM5)-(FILM5(-1))))+(1.-0.50)*(((FM5(-1) )-(FM5(-2)))-((FILM5(-1))-(FILM5(-2)))))+JFILM5)+DFIL*ZFILM5$ FRML _S FILM6M =(1.-DFIL)*(0.26917*(0.75*(((FM6M)-(FM6M(-1)))-((FILM6M)-(FILM6M(-1))))+(1.-0.75)*((( FM6M(-1))-(FM6M(-2)))-((FILM6M(-1))-(FILM6M(-2)))))+JFILM6M)+DFIL* ZFILM6M$ FRML _S FILM6Q =(1.-DFIL)*(0.12061*((((FM6Q)-(FM6Q(-1)))-((FILM6Q)-(FILM6Q(-1)))))+JFILM6Q)+DFIL* ZFILM6Q$ FRML _S FILM7B =(1.-DFIL)*(0.19654*(0.25*(((FM7B)-(FM7B(-1)))-((FILM7B)-(FILM7B(-1))))+(1.-0.25)*((( FM7B(-1))-(FM7B(-2)))-((FILM7B(-1))-(FILM7B(-2)))))+JFILM7B)+DFIL* ZFILM7B$ FRML _S FILM7Y =(1.-DFIL)*(0.00848*((((FM7Y)-(FM7Y(-1)))-((FILM7Y)-(FILM7Y(-1)))))+JFILM7Y)+DFIL* ZFILM7Y$ FRML _S FILM7Q =(1.-DFIL)*(0.10938*(((FM7Q)-(FM7Q(-1)))-((FILM7Q)-(FILM7Q(-1))))+JFILM7Q)+DFIL* ZFILM7Q$ FRML _S FILM8 =(1.-DFIL)*(0.11208*(0.75*(((FM8)-(FM8(-1)))-((FILM8)-(FILM8(-1))))+(1.-0.75)*(((FM8(-1) )-(FM8(-2)))-((FILM8(-1))-(FILM8(-2)))))+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$ 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))))*(1.0+JRFE0))*(1.0-DFE0)+DFE0*ZFE0$ FRML JLED JRFE0 =FE0/(FE0(-1)*((FAE0+FNFE0)/(FAE0(-1)+FNFE0(-1))))-1.0$ FRML EXO ZFE0 =FE0$ FRML _GJRD FE0K =((FE0-0.33333*(HOSTKOR+HOSTKOR(-1)+HOSTKOR(-2)))*(1.0+JRFE0K))*(1.0-DFE0K)+DFE0K* ZFE0K$ FRML JLED JRFE0K =FE0K/(FE0-0.33333*(HOSTKOR+HOSTKOR(-1)+HOSTKOR(-2)))-1.0$ FRML EXO ZFE0K =FE0K$ FRML _GJRD FE1 =((EXP(LOG(FE1(-1))+(LOG(FE0K)-LOG(FE0K(-1)))))*(1.0+JRFE1))*(1.0-DFE1)+DFE1*ZFE1$ FRML JLED JRFE1 =FE1/(EXP(LOG(FE1(-1))+(LOG(FE0K)-LOG(FE0K(-1)))))-1.0$ FRML EXO ZFE1 =FE1$ FRML _DJRD FE2W =((EXP(KFE2W+LOG(FEE2)*(1.-0.1992*DDEU)+ELPFE2*LOG(PE2/PEE2)))*(1.0+JRFE2W))*(1.0- DFE2W)+DFE2W*ZFE2W$ FRML JLED JRFE2W =FE2W/(EXP(KFE2W+LOG(FEE2)*(1.-0.1992*DDEU)+ELPFE2*LOG(PE2/PEE2)))-1.0$ FRML EXO ZFE2W =FE2W$ FRML _DJRD FE5W =((EXP(KFE5W+LOG(FEE5)*(1.-0.4742*DDEU)+ELPFE5*LOG(PE5/PEE5)))*(1.0+JRFE5W))*(1.0- DFE5W)+DFE5W*ZFE5W$ FRML JLED JRFE5W =FE5W/(EXP(KFE5W+LOG(FEE5)*(1.-0.4742*DDEU)+ELPFE5*LOG(PE5/PEE5)))-1.0$ FRML EXO ZFE5W =FE5W$ FRML _DJRD FE6W =((EXP(KFE6W+LOG(FEE6)*(1.-0.2998*DDEU)+ELPFE6*LOG(PE6/PEE6)))*(1.0+JRFE6W))*(1.0- DFE6W)+DFE6W*ZFE6W$ FRML JLED JRFE6W =FE6W/(EXP(KFE6W+LOG(FEE6)*(1.-0.2998*DDEU)+ELPFE6*LOG(PE6/PEE6)))-1.0$ FRML EXO ZFE6W =FE6W$ FRML _DJRD FE7QW =((EXP(KFE7QW+LOG(FEE7Q)*(1.-0.0000*DDEU)+ELPFE7Q*LOG(PE7Q/PEE7Q)))*(1.0+JRFE7QW))*(1.0 -DFE7QW)+DFE7QW*ZFE7QW$ FRML JLED JRFE7QW =FE7QW/(EXP(KFE7QW+LOG(FEE7Q)*(1.-0.0000*DDEU)+ELPFE7Q*LOG(PE7Q/PEE7Q)))-1.0$ FRML EXO ZFE7QW =FE7QW$ FRML _DJRD FE8W =((EXP(KFE8W+LOG(FEE8)*(1.-0.5179*DDEU)+ELPFE8*LOG(PE8/PEE8)))*(1.0+JRFE8W))*(1.0- DFE8W)+DFE8W*ZFE8W$ FRML JLED JRFE8W =FE8W/(EXP(KFE8W+LOG(FEE8)*(1.-0.5179*DDEU)+ELPFE8*LOG(PE8/PEE8)))-1.0$ FRML EXO ZFE8W =FE8W$ FRML _DJRD FETW =((EXP(KFETW+LOG(FEET)*(1.-0.0000*DDEU)+ELPFET*LOG(PET/PEET)+DTFETW))*(1.0+JRFETW))*(1.0 -DFETW)+DFETW*ZFETW$ FRML JLED JRFETW =FETW/(EXP(KFETW+LOG(FEET)*(1.-0.0000*DDEU)+ELPFET*LOG(PET/PEET)+DTFETW))-1.0$ FRML EXO ZFETW =FETW$ FRML _GJ_D FESQW =(EXP(LOG(FEESQ)+ELPFESQ*LOG(PESQ/PEESQ))+JFESQW)*(1.0-DFESQW)+DFESQW*ZFESQW$ FRML JLED JFESQW =FESQW-(EXP(LOG(FEESQ)+ELPFESQ*LOG(PESQ/PEESQ)))$ FRML EXO ZFESQW =FESQW$ FRML _SJRD FE2 =((EXP(LOG(FE2(-1))+EKYFE2*(LOG(FEE2)-LOG(FEE2(-1)))+EKPFE2*(LOG(PE2/PEE2)-LOG(PE2(-1) /PEE2(-1)))-TFE2*LOG((FE2(-1)*(1.-AM2E2(-1)))/FE2W(-1))-(LOG(1.- AM2E2)-LOG(1.-AM2E2(-1)))))*(1.0+JRFE2))*(1.0-DFE2)+DFE2*ZFE2$ FRML JLED JRFE2 =FE2/(EXP(LOG(FE2(-1))+EKYFE2*(LOG(FEE2)-LOG(FEE2(-1)))+EKPFE2*(LOG(PE2/PEE2)-LOG(PE2(-1) /PEE2(-1)))-TFE2*LOG((FE2(-1)*(1.-AM2E2(-1)))/FE2W(-1))-(LOG(1.- AM2E2)-LOG(1.-AM2E2(-1)))))-1.0$ FRML EXO ZFE2 =FE2$ FRML _SJRD FE5 =((EXP(LOG(FE5(-1))+EKYFE5*(LOG(FEE5)-LOG(FEE5(-1)))+EKPFE5*(LOG(PE5/PEE5)-LOG(PE5(-1) /PEE5(-1)))-0.0781*(DDEU-DDEU(-1))-TFE5*LOG(FE5(-1)/FE5W(-1))))*(1.0+ JRFE5))*(1.0-DFE5)+DFE5*ZFE5$ FRML JLED JRFE5 =FE5/(EXP(LOG(FE5(-1))+EKYFE5*(LOG(FEE5)-LOG(FEE5(-1)))+EKPFE5*(LOG(PE5/PEE5)-LOG(PE5(-1) /PEE5(-1)))-0.0781*(DDEU-DDEU(-1))-TFE5*LOG(FE5(-1)/FE5W(-1))))-1.0$ FRML EXO ZFE5 =FE5$ FRML _SJRD FE6 =((EXP(LOG(FE6(-1))+EKYFE6*(LOG(FEE6)-LOG(FEE6(-1)))+EKPFE6*(LOG(PE6/PEE6)-LOG(PE6(-1) /PEE6(-1)))-0.0499*(DDEU-DDEU(-1))-TFE6*LOG(FE6(-1)/FE6W(-1))))*(1.0+ JRFE6))*(1.0-DFE6)+DFE6*ZFE6$ FRML JLED JRFE6 =FE6/(EXP(LOG(FE6(-1))+EKYFE6*(LOG(FEE6)-LOG(FEE6(-1)))+EKPFE6*(LOG(PE6/PEE6)-LOG(PE6(-1) /PEE6(-1)))-0.0499*(DDEU-DDEU(-1))-TFE6*LOG(FE6(-1)/FE6W(-1))))-1.0$ FRML EXO ZFE6 =FE6$ FRML _SJRD FE7Q =((EXP(LOG(FE7Q(-1))+EKYFE7Q*(LOG(FEE7Q)-LOG(FEE7Q(-1)))+EKPFE7Q*(LOG(PE7Q/PEE7Q)-LOG( PE7Q(-1)/PEE7Q(-1)))-0.0000*(DDEU-DDEU(-1))-TFE7Q*LOG(FE7Q(-1)/FE7QW(-1) )))*(1.0+JRFE7Q))*(1.0-DFE7Q)+DFE7Q*ZFE7Q$ FRML JLED JRFE7Q =FE7Q/(EXP(LOG(FE7Q(-1))+EKYFE7Q*(LOG(FEE7Q)-LOG(FEE7Q(-1)))+EKPFE7Q*(LOG(PE7Q/PEE7Q)- LOG(PE7Q(-1)/PEE7Q(-1)))-0.0000*(DDEU-DDEU(-1))-TFE7Q*LOG(FE7Q(-1)/ FE7QW(-1))))-1.0$ FRML EXO ZFE7Q =FE7Q$ FRML _SJRD FE8 =((EXP(LOG(FE8(-1))+EKYFE8*(LOG(FEE8)-LOG(FEE8(-1)))+EKPFE8*(LOG(PE8/PEE8)-LOG(PE8(-1) /PEE8(-1)))-0.1277*(DDEU-DDEU(-1))-TFE8*LOG(FE8(-1)/FE8W(-1))))*(1.0+ JRFE8))*(1.0-DFE8)+DFE8*ZFE8$ FRML JLED JRFE8 =FE8/(EXP(LOG(FE8(-1))+EKYFE8*(LOG(FEE8)-LOG(FEE8(-1)))+EKPFE8*(LOG(PE8/PEE8)-LOG(PE8(-1) /PEE8(-1)))-0.1277*(DDEU-DDEU(-1))-TFE8*LOG(FE8(-1)/FE8W(-1))))-1.0$ FRML EXO ZFE8 =FE8$ FRML _SJRD FET =((EXP(LOG(FET(-1))+EKYFET*(LOG(FEET)-LOG(FEET(-1)))+EKPFET*(LOG(PET/PEET)-LOG(PET(-1) /PEET(-1)))-TFET*LOG(FET(-1)/FETW(-1))))*(1.0+JRFET))*(1.0-DFET)+ DFET*ZFET$ FRML JLED JRFET =FET/(EXP(LOG(FET(-1))+EKYFET*(LOG(FEET)-LOG(FEET(-1)))+EKPFET*(LOG(PET/PEET)-LOG(PET(-1) /PEET(-1)))-TFET*LOG(FET(-1)/FETW(-1))))-1.0$ FRML EXO ZFET =FET$ FRML _GJRD FESQ =((EXP(LOG(FESQ(-1))+EKYFESQ*(LOG(FEESQ)-LOG(FEESQ(-1)))+EKPFESQ*(LOG(PESQ/PEESQ)-LOG( PESQ(-1)/PEESQ(-1)))-TFESQ*LOG(FESQ(-1)/FESQW(-1))))*(1.0+JRFESQ))*(1.0 -DFESQ)+DFESQ*ZFESQ$ FRML JLED JRFESQ =FESQ/(EXP(LOG(FESQ(-1))+EKYFESQ*(LOG(FEESQ)-LOG(FEESQ(-1)))+EKPFESQ*(LOG(PESQ/PEESQ)- LOG(PESQ(-1)/PEESQ(-1)))-TFESQ*LOG(FESQ(-1)/FESQW(-1))))-1.0$ FRML EXO ZFESQ =FESQ$ FRML _GJ_D FE7Y =(0.1*FE7Q+JFE7Y)*(1.0-DFE7Y)+DFE7Y*ZFE7Y$ FRML JLED JFE7Y =FE7Y-(0.1*FE7Q)$ FRML EXO ZFE7Y =FE7Y$ FRML _I FEV =(FE0*PE0(-1)+FE1*PE1(-1)+FE2*PE2(-1)+FE3*PE3(-1)+FE5*PE5(-1)+FE6*PE6(-1)+FE7Y*PE7Y(-1) +FE7Q*PE7Q(-1)+FE8*PE8(-1))/PEV(-1)$ FRML _I FES =FESS+FESQ$ FRML _I FE =(FEV*PEV(-1)+FES*PES(-1)+FET*PET(-1))/PE(-1)$ 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)$ 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)$ FRML _DJRD FMZ0W =((EXP(9.060624+LOG(FAM0)-0.136857*LOG(PXM0)+1.76221/(1.+(1.-0.073909)**(TID-1992.13+1. ))))*(1.0+JRFMZ0W))*(1.0-DFMZ0W)+DFMZ0W*ZFMZ0W$ FRML JLED JRFMZ0W =FMZ0W/(EXP(9.060624+LOG(FAM0)-0.136857*LOG(PXM0)+1.76221/(1.+(1.-0.073909)**(TID-1992.13 +1.))))-1.0$ FRML EXO ZFMZ0W =FMZ0W$ FRML _SJRD FMZ0 =((EXP(LOG(FMZ0(-1))+1.8388*(LOG(FAM0)-LOG(FAM0(-1)))-0.64001*LOG(FMZ0(-1)/FMZ0W(-1))) )*(1.0+JRFMZ0))*(1.0-DFMZ0)+DFMZ0*ZFMZ0$ FRML JLED JRFMZ0 =FMZ0/(EXP(LOG(FMZ0(-1))+1.8388*(LOG(FAM0)-LOG(FAM0(-1)))-0.64001*LOG(FMZ0(-1)/FMZ0W(-1) )))-1.0$ FRML EXO ZFMZ0 =FMZ0$ FRML _D FMU0 =AM0O*FXO+AM0IT*FIT+FILM0+AM0E0*FE0$ FRML _I FM0 =FMZ0+FMU0$ FRML _DJRD FMZ1W =((EXP(8.266337+LOG(FAM1)-1.032064*LOG(PXM1)))*(1.0+JRFMZ1W))*(1.0-DFMZ1W)+DFMZ1W* ZFMZ1W$ FRML JLED JRFMZ1W =FMZ1W/(EXP(8.266337+LOG(FAM1)-1.032064*LOG(PXM1)))-1.0$ FRML EXO ZFMZ1W =FMZ1W$ FRML _SJRD FMZ1 =((EXP(LOG(FMZ1(-1))+0.674657*(LOG(FAM1)-LOG(FAM1(-1)))-1.032064*(LOG(PXM1)-LOG(PXM1(-1) ))-0.56293*LOG(FMZ1(-1)/FMZ1W(-1))))*(1.0+JRFMZ1))*(1.0-DFMZ1)+DFMZ1* ZFMZ1$ FRML JLED JRFMZ1 =FMZ1/(EXP(LOG(FMZ1(-1))+0.674657*(LOG(FAM1)-LOG(FAM1(-1)))-1.032064*(LOG(PXM1)-LOG( PXM1(-1)))-0.56293*LOG(FMZ1(-1)/FMZ1W(-1))))-1.0$ FRML EXO ZFMZ1 =FMZ1$ FRML _D FMU1 =AM1O*FXO+FILM1+AM1E1*FE1$ FRML _I FM1 =FMZ1+FMU1$ FRML _DJRD FMZ2W =((EXP(9.424215+LOG(FAM2)-0.269263*LOG(PXM2)-0.207473/(1.+(1.-0.466889)**(TID-1973.+1.) )))*(1.0+JRFMZ2W))*(1.0-DFMZ2W)+DFMZ2W*ZFMZ2W$ FRML JLED JRFMZ2W =FMZ2W/(EXP(9.424215+LOG(FAM2)-0.269263*LOG(PXM2)-0.207473/(1.+(1.-0.466889)**(TID-1973. +1.))))-1.0$ FRML EXO ZFMZ2W =FMZ2W$ FRML _SJRD FMZ2 =((EXP(LOG(FMZ2(-1))+1.268333*(LOG(FAM2)-LOG(FAM2(-1)))-0.269263*(LOG(PXM2)-LOG(PXM2(-1) ))-0.243853*LOG(FMZ2(-1)/FMZ2W(-1))))*(1.0+JRFMZ2))*(1.0-DFMZ2)+ DFMZ2*ZFMZ2$ FRML JLED JRFMZ2 =FMZ2/(EXP(LOG(FMZ2(-1))+1.268333*(LOG(FAM2)-LOG(FAM2(-1)))-0.269263*(LOG(PXM2)-LOG( PXM2(-1)))-0.243853*LOG(FMZ2(-1)/FMZ2W(-1))))-1.0$ FRML EXO ZFMZ2 =FMZ2$ 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))*(1.0+JRFMZ3Q))*(1.0-DFMZ3Q)+DFMZ3Q*ZFMZ3Q$ FRML JLED JRFMZ3Q =FMZ3Q/(FMZ3Q(-1)*FAM3Q/FAM3Q(-1))-1.0$ FRML EXO ZFMZ3Q =FMZ3Q$ FRML _D FMU3Q =AM3QE*FXE+AM3QNG*FXNG+AM3QNE*FXNE+AM3QO*FXO+FILM3Q+AM3QE3*FE3$ FRML _I FM3Q =FMZ3Q+FMU3Q$ FRML _DJRD FMZ5W =((EXP(9.141759+LOG(FAM5)-0.38519*LOG(PXM5)+1.106572/(1.+(1.-0.157452)**(TID-1963.+1.)) ))*(1.0+JRFMZ5W))*(1.0-DFMZ5W)+DFMZ5W*ZFMZ5W$ FRML JLED JRFMZ5W =FMZ5W/(EXP(9.141759+LOG(FAM5)-0.38519*LOG(PXM5)+1.106572/(1.+(1.-0.157452)**(TID-1963. +1.))))-1.0$ FRML EXO ZFMZ5W =FMZ5W$ FRML _SJRD FMZ5 =((EXP(LOG(FMZ5(-1))+1.0601*(LOG(FAM5)-LOG(FAM5(-1)))-0.08346*(LOG(PXM5)-LOG(PXM5(-1)) )-0.51383*LOG(FMZ5(-1)/FMZ5W(-1))))*(1.0+JRFMZ5))*(1.0-DFMZ5)+DFMZ5* ZFMZ5$ FRML JLED JRFMZ5 =FMZ5/(EXP(LOG(FMZ5(-1))+1.0601*(LOG(FAM5)-LOG(FAM5(-1)))-0.08346*(LOG(PXM5)-LOG(PXM5(-1) ))-0.51383*LOG(FMZ5(-1)/FMZ5W(-1))))-1.0$ FRML EXO ZFMZ5 =FMZ5$ FRML _D FMU5 =AM5O*FXO+FILM5+AM5E5*FE5$ FRML _I FM5 =FMZ5+FMU5$ FRML _SJRD FMZ6M =((FMZ6M(-1)*FAM6M/FAM6M(-1))*(1.0+JRFMZ6M))*(1.0-DFMZ6M)+DFMZ6M*ZFMZ6M$ FRML JLED JRFMZ6M =FMZ6M/(FMZ6M(-1)*FAM6M/FAM6M(-1))-1.0$ FRML EXO ZFMZ6M =FMZ6M$ FRML _D FMU6M =AM6MO*FXO+FILM6M+AM6ME6*FE6$ FRML _I FM6M =FMZ6M+FMU6M$ FRML _DJRD FMZ6QW =((EXP(10.63639+LOG(FAM6Q)-1.409363*LOG(PXM6Q)-0.52219/(1.+(1.-0.278192)**(TID-1988.24+ 1.))))*(1.0+JRFMZ6QW))*(1.0-DFMZ6QW)+DFMZ6QW*ZFMZ6QW$ FRML JLED JRFMZ6QW =FMZ6QW/(EXP(10.63639+LOG(FAM6Q)-1.409363*LOG(PXM6Q)-0.52219/(1.+(1.-0.278192)**(TID-1988.24 +1.))))-1.0$ FRML EXO ZFMZ6QW =FMZ6QW$ FRML _SJRD FMZ6Q =((EXP(LOG(FMZ6Q(-1))+1.55432*(LOG(FAM6Q)-LOG(FAM6Q(-1)))-0.41699*(LOG(PXM6Q)-LOG( PXM6Q(-1)))-0.42339*LOG(FMZ6Q(-1)/FMZ6QW(-1))))*(1.0+JRFMZ6Q))*(1.0- DFMZ6Q)+DFMZ6Q*ZFMZ6Q$ FRML JLED JRFMZ6Q =FMZ6Q/(EXP(LOG(FMZ6Q(-1))+1.55432*(LOG(FAM6Q)-LOG(FAM6Q(-1)))-0.41699*(LOG(PXM6Q)-LOG (PXM6Q(-1)))-0.42339*LOG(FMZ6Q(-1)/FMZ6QW(-1))))-1.0$ FRML EXO ZFMZ6Q =FMZ6Q$ 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+JFM7YIM)*(1.0-DFM7YIM)+DFM7YIM*ZFM7YIM$ FRML JLED JFM7YIM =FM7YIM-(KFM7YIM*FIMQS)$ FRML EXO ZFM7YIM =FM7YIM$ FRML _I FM7Y =AM7YNT*FXNT+AM7YQT*FXQT+AM7YCV*FCV+AM7YO*FXO+AM7YIM*FIM+FILM7Y+AM7YE7Y*FE7Y$ FRML _DJRD FMZ7QW =((EXP(10.924983+LOG(FAM7Q)-0.920163*LOG(PXM7Q)+0.292032/(1.+(1.-0.658099)**(TID-1967.25 +1.))))*(1.0+JRFMZ7QW))*(1.0-DFMZ7QW)+DFMZ7QW*ZFMZ7QW$ FRML JLED JRFMZ7QW =FMZ7QW/(EXP(10.924983+LOG(FAM7Q)-0.920163*LOG(PXM7Q)+0.292032/(1.+(1.-0.658099)**(TID- 1967.25+1.))))-1.0$ FRML EXO ZFMZ7QW =FMZ7QW$ FRML _SJRD FMZ7Q =((EXP(LOG(FMZ7Q(-1))+1.099355*(LOG(FAM7Q)-LOG(FAM7Q(-1)))-0.920163*(LOG(PXM7Q)-LOG( PXM7Q(-1)))-0.456745*LOG(FMZ7Q(-1)/FMZ7QW(-1))))*(1.0+JRFMZ7Q))*(1.0- DFMZ7Q)+DFMZ7Q*ZFMZ7Q$ FRML JLED JRFMZ7Q =FMZ7Q/(EXP(LOG(FMZ7Q(-1))+1.099355*(LOG(FAM7Q)-LOG(FAM7Q(-1)))-0.920163*(LOG(PXM7Q)-LOG (PXM7Q(-1)))-0.456745*LOG(FMZ7Q(-1)/FMZ7QW(-1))))-1.0$ FRML EXO ZFMZ7Q =FMZ7Q$ FRML _D FMU7Q =AM7QE*FXE+AM7QO*FXO+FILM7Q+AM7QE7Q*FE7Q$ FRML _I FM7Q =FMZ7Q+FMU7Q$ FRML _DJRD FMZ8W =((EXP(9.462498+LOG(FAM8)-1.182543*LOG(PXM8)+0.977406/(1.+(1.-0.199539)**(TID-1965.+1.) )))*(1.0+JRFMZ8W))*(1.0-DFMZ8W)+DFMZ8W*ZFMZ8W$ FRML JLED JRFMZ8W =FMZ8W/(EXP(9.462498+LOG(FAM8)-1.182543*LOG(PXM8)+0.977406/(1.+(1.-0.199539)**(TID-1965. +1.))))-1.0$ FRML EXO ZFMZ8W =FMZ8W$ FRML _SJRD FMZ8 =((EXP(LOG(FMZ8(-1))+1.32999*(LOG(FAM8)-LOG(FAM8(-1)))-1.182543*(LOG(PXM8)-LOG(PXM8(-1) ))-0.387577*LOG(FMZ8(-1)/FMZ8W(-1))))*(1.0+JRFMZ8))*(1.0-DFMZ8)+ DFMZ8*ZFMZ8$ FRML JLED JRFMZ8 =FMZ8/(EXP(LOG(FMZ8(-1))+1.32999*(LOG(FAM8)-LOG(FAM8(-1)))-1.182543*(LOG(PXM8)-LOG( PXM8(-1)))-0.387577*LOG(FMZ8(-1)/FMZ8W(-1))))-1.0$ FRML EXO ZFMZ8 =FMZ8$ FRML _D FMU8 =AM8O*FXO+FILM8+AM8E8*FE8$ FRML _I FM8 =FMZ8+FMU8$ FRML _I FMV =(FM0*PM0(-1)+FM1*PM1(-1)+FM2*PM2(-1)+FM3R*PM3R(-1)+FM3K*PM3K(-1)+FM3Q*PM3Q(-1)+FM5* PM5(-1)+FM6M*PM6M(-1)+FM6Q*PM6Q(-1)+FM7B*PM7B(-1)+FM7Y*PM7Y(-1)+FM7Q* PM7Q(-1)+FM8*PM8(-1))/PMV(-1)$ 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*PMV(-1)+FMS*PMS(-1)+FMT*PMT(-1))/PM(-1)$ 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)$ 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)$ 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$ 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$ 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$ 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$ 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))+JDAOCS$ FRML JLED JDAOCS =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$ FRML _GJRD FXAW =((EXP(LOG(FXAE)+ELPFXA*LOG((PNE0/PWAW1)*KFXA)))*(1.0+JRFXAW))*(1.0-DFXAW)+DFXAW* ZFXAW$ FRML JLED JRFXAW =FXAW/(EXP(LOG(FXAE)+ELPFXA*LOG((PNE0/PWAW1)*KFXA)))-1.0$ FRML EXO ZFXAW =FXAW$ FRML _GJRD FXA =((EXP(LOG(FXA(-1))+(LOG(FXAE)-LOG(FXAE(-1)))+EKPFXA*(LOG((PNE0/PWAW1)*KFXA)-LOG(( PNE0(-1)/PWAW1(-1))*KFXA(-1)))-TFXA*LOG(FXA(-1)/FXAW(-1))))*(1.0+ JRFXA))*(1.0-DFXA)+DFXA*ZFXA$ FRML JLED JRFXA =FXA/(EXP(LOG(FXA(-1))+(LOG(FXAE)-LOG(FXAE(-1)))+EKPFXA*(LOG((PNE0/PWAW1)*KFXA)-LOG(( PNE0(-1)/PWAW1(-1))*KFXA(-1)))-TFXA*LOG(FXA(-1)/FXAW(-1))))-1.0$ FRML EXO ZFXA =FXA$ FRML _GJRD FXNF =((EXP(LOG(FXNF(-1))+(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))))*(1.0+JRFXNF))*(1.0- DFXNF)+DFXNF*ZFXNF$ FRML JLED JRFXNF =FXNF/(EXP(LOG(FXNF(-1))+(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))))-1.0$ FRML EXO ZFXNF =FXNF$ 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 _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 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$ 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$ FRML _I FXN =(PXNG(-1)*FXNG+PXNE(-1)*FXNE+PXNF(-1)*FXNF+PXNN(-1)*FXNN+PXNB(-1)*FXNB+PXNM(-1)*FXNM+ PXNT(-1)*FXNT+PXNK(-1)*FXNK+PXNQ(-1)*FXNQ)/PXN(-1)$ FRML _DJ_D PKLEA1 =(1.*((LA1/DTHQA1)/(104.44016/0.95452))**(0.5*((104.44016*154.69100)/(0.+104.44016*154.69100 +0.08629*117304.000+1.56259*2584.15928)+(LA1*HQA1)/(0.+LA1*HQA1+UIMA* FKMA+PVEA*FVEA)))*((UIMA/DTFKMA1)/(0.08629/0.78915))**(0.5*((0.08629*117304.000 )/(0.+104.44016*154.69100+0.08629*117304.000+1.56259*2584.15928)+( UIMA*FKMA)/(0.+LA1*HQA1+UIMA*FKMA+PVEA*FVEA)))*((PVEA/DTFVEA1)/(1.56259 /1.00000))**(0.5*((1.56259*2584.15928)/(0.+104.44016*154.69100+0.08629 *117304.000+1.56259*2584.15928)+(PVEA*FVEA)/(0.+LA1*HQA1+UIMA*FKMA+ PVEA*FVEA)))+JPKLEA1)*(1.0-DPKLEA1)+DPKLEA1*ZPKLEA1$ FRML JLED JPKLEA1 =PKLEA1-(1.*((LA1/DTHQA1)/(104.44016/0.95452))**(0.5*((104.44016*154.69100)/(0.+104.44016 *154.69100+0.08629*117304.000+1.56259*2584.15928)+(LA1*HQA1)/(0.+LA1* HQA1+UIMA*FKMA+PVEA*FVEA)))*((UIMA/DTFKMA1)/(0.08629/0.78915))**(0.5*( (0.08629*117304.000)/(0.+104.44016*154.69100+0.08629*117304.000+1.56259 *2584.15928)+(UIMA*FKMA)/(0.+LA1*HQA1+UIMA*FKMA+PVEA*FVEA)))*((PVEA/ DTFVEA1)/(1.56259/1.00000))**(0.5*((1.56259*2584.15928)/(0.+104.44016* 154.69100+0.08629*117304.000+1.56259*2584.15928)+(PVEA*FVEA)/(0.+LA1* HQA1+UIMA*FKMA+PVEA*FVEA))))$ FRML EXO ZPKLEA1 =PKLEA1$ FRML _DJ_D PKLEB1 =(1.*((LB1/DTHQB1)/(181.38849/1.04385))**(0.5*((181.38849*290.47600)/(0.+181.38849*290.47600 +0.12309*50487.0000+1.94664*1278.68650)+(LB1*HQB1)/(0.+LB1*HQB1+UIMB* FKMB+PVEB*FVEB)))*((UIMB/DTFKMB1)/(0.12309/0.98825))**(0.5*((0.12309*50487.0000 )/(0.+181.38849*290.47600+0.12309*50487.0000+1.94664*1278.68650)+( UIMB*FKMB)/(0.+LB1*HQB1+UIMB*FKMB+PVEB*FVEB)))*((PVEB/DTFVEB1)/(1.94664 /1.00000))**(0.5*((1.94664*1278.68650)/(0.+181.38849*290.47600+0.12309 *50487.0000+1.94664*1278.68650)+(PVEB*FVEB)/(0.+LB1*HQB1+UIMB*FKMB+ PVEB*FVEB)))+JPKLEB1)*(1.0-DPKLEB1)+DPKLEB1*ZPKLEB1$ FRML JLED JPKLEB1 =PKLEB1-(1.*((LB1/DTHQB1)/(181.38849/1.04385))**(0.5*((181.38849*290.47600)/(0.+181.38849 *290.47600+0.12309*50487.0000+1.94664*1278.68650)+(LB1*HQB1)/(0.+LB1* HQB1+UIMB*FKMB+PVEB*FVEB)))*((UIMB/DTFKMB1)/(0.12309/0.98825))**(0.5*( (0.12309*50487.0000)/(0.+181.38849*290.47600+0.12309*50487.0000+1.94664 *1278.68650)+(UIMB*FKMB)/(0.+LB1*HQB1+UIMB*FKMB+PVEB*FVEB)))*((PVEB/ DTFVEB1)/(1.94664/1.00000))**(0.5*((1.94664*1278.68650)/(0.+181.38849* 290.47600+0.12309*50487.0000+1.94664*1278.68650)+(PVEB*FVEB)/(0.+LB1* HQB1+UIMB*FKMB+PVEB*FVEB))))$ FRML EXO ZPKLEB1 =PKLEB1$ FRML _DJ_D PKLENB1 =(1.*((LNB1/DTHQNB1)/(162.41229/0.95442))**(0.5*((162.41229*53.66100)/(0.+162.41229*53.66100 +0.09428*26209.8529+1.26658*1201.95793)+(LNB1*HQNB1)/(0.+LNB1*HQNB1+ UIMNB*FKMNB+PVENB*FVENB)))*((UIMNB/DTFKMNB1)/(0.09428/0.94818))**(0.5* ((0.09428*26209.8529)/(0.+162.41229*53.66100+0.09428*26209.8529+1.26658 *1201.95793)+(UIMNB*FKMNB)/(0.+LNB1*HQNB1+UIMNB*FKMNB+PVENB*FVENB)))* ((PVENB/DTFVENB1)/(1.26658/1.00000))**(0.5*((1.26658*1201.95793)/(0.+162.41229 *53.66100+0.09428*26209.8529+1.26658*1201.95793)+(PVENB*FVENB)/(0.+ LNB1*HQNB1+UIMNB*FKMNB+PVENB*FVENB)))+JPKLENB1)*(1.0-DPKLENB1)+ DPKLENB1*ZPKLENB1$ FRML JLED JPKLENB1 =PKLENB1-(1.*((LNB1/DTHQNB1)/(162.41229/0.95442))**(0.5*((162.41229*53.66100)/(0.+162.41229 *53.66100+0.09428*26209.8529+1.26658*1201.95793)+(LNB1*HQNB1)/(0.+ LNB1*HQNB1+UIMNB*FKMNB+PVENB*FVENB)))*((UIMNB/DTFKMNB1)/(0.09428/0.94818 ))**(0.5*((0.09428*26209.8529)/(0.+162.41229*53.66100+0.09428*26209.8529 +1.26658*1201.95793)+(UIMNB*FKMNB)/(0.+LNB1*HQNB1+UIMNB*FKMNB+PVENB* FVENB)))*((PVENB/DTFVENB1)/(1.26658/1.00000))**(0.5*((1.26658*1201.95793 )/(0.+162.41229*53.66100+0.09428*26209.8529+1.26658*1201.95793)+( PVENB*FVENB)/(0.+LNB1*HQNB1+UIMNB*FKMNB+PVENB*FVENB))))$ FRML EXO ZPKLENB1 =PKLENB1$ FRML _DJ_D PKLENF1 =(1.*((LNF1/DTHQNF1)/(165.90667/0.92234))**(0.5*((165.90667*108.41100)/(0.+165.90667*108.41100 +0.09601*54689.8082+1.25514*1513.05388)+(LNF1*HQNF1)/(0.+LNF1*HQNF1+ UIMNF*FKMNF+PVENF*FVENF)))*((UIMNF/DTFKMNF1)/(0.09601/0.92847))**(0.5* ((0.09601*54689.8082)/(0.+165.90667*108.41100+0.09601*54689.8082+1.25514 *1513.05388)+(UIMNF*FKMNF)/(0.+LNF1*HQNF1+UIMNF*FKMNF+PVENF*FVENF)))* ((PVENF/DTFVENF1)/(1.25514/1.00000))**(0.5*((1.25514*1513.05388)/(0.+165.90667 *108.41100+0.09601*54689.8082+1.25514*1513.05388)+(PVENF*FVENF)/(0.+ LNF1*HQNF1+UIMNF*FKMNF+PVENF*FVENF)))+JPKLENF1)*(1.0-DPKLENF1)+ DPKLENF1*ZPKLENF1$ FRML JLED JPKLENF1 =PKLENF1-(1.*((LNF1/DTHQNF1)/(165.90667/0.92234))**(0.5*((165.90667*108.41100)/(0.+165.90667 *108.41100+0.09601*54689.8082+1.25514*1513.05388)+(LNF1*HQNF1)/(0.+ LNF1*HQNF1+UIMNF*FKMNF+PVENF*FVENF)))*((UIMNF/DTFKMNF1)/(0.09601/0.92847 ))**(0.5*((0.09601*54689.8082)/(0.+165.90667*108.41100+0.09601*54689.8082 +1.25514*1513.05388)+(UIMNF*FKMNF)/(0.+LNF1*HQNF1+UIMNF*FKMNF+PVENF* FVENF)))*((PVENF/DTFVENF1)/(1.25514/1.00000))**(0.5*((1.25514*1513.05388 )/(0.+165.90667*108.41100+0.09601*54689.8082+1.25514*1513.05388)+( PVENF*FVENF)/(0.+LNF1*HQNF1+UIMNF*FKMNF+PVENF*FVENF))))$ FRML EXO ZPKLENF1 =PKLENF1$ FRML _DJ_D PKLENK1 =(1.*((LNK1/DTHQNK1)/(187.76461/0.90088))**(0.5*((187.76461*90.40800)/(0.+187.76461*90.40800 +0.09090*61857.6260+1.28091*1551.04310)+(LNK1*HQNK1)/(0.+LNK1*HQNK1+ UIMNK*FKMNK+PVENK*FVENK)))*((UIMNK/DTFKMNK1)/(0.09090/0.82161))**(0.5* ((0.09090*61857.6260)/(0.+187.76461*90.40800+0.09090*61857.6260+1.28091 *1551.04310)+(UIMNK*FKMNK)/(0.+LNK1*HQNK1+UIMNK*FKMNK+PVENK*FVENK)))* ((PVENK/DTFVENK1)/(1.28091/1.00000))**(0.5*((1.28091*1551.04310)/(0.+187.76461 *90.40800+0.09090*61857.6260+1.28091*1551.04310)+(PVENK*FVENK)/(0.+ LNK1*HQNK1+UIMNK*FKMNK+PVENK*FVENK)))+JPKLENK1)*(1.0-DPKLENK1)+ DPKLENK1*ZPKLENK1$ FRML JLED JPKLENK1 =PKLENK1-(1.*((LNK1/DTHQNK1)/(187.76461/0.90088))**(0.5*((187.76461*90.40800)/(0.+187.76461 *90.40800+0.09090*61857.6260+1.28091*1551.04310)+(LNK1*HQNK1)/(0.+ LNK1*HQNK1+UIMNK*FKMNK+PVENK*FVENK)))*((UIMNK/DTFKMNK1)/(0.09090/0.82161 ))**(0.5*((0.09090*61857.6260)/(0.+187.76461*90.40800+0.09090*61857.6260 +1.28091*1551.04310)+(UIMNK*FKMNK)/(0.+LNK1*HQNK1+UIMNK*FKMNK+PVENK* FVENK)))*((PVENK/DTFVENK1)/(1.28091/1.00000))**(0.5*((1.28091*1551.04310 )/(0.+187.76461*90.40800+0.09090*61857.6260+1.28091*1551.04310)+( PVENK*FVENK)/(0.+LNK1*HQNK1+UIMNK*FKMNK+PVENK*FVENK))))$ FRML EXO ZPKLENK1 =PKLENK1$ FRML _DJ_D PKLENM1 =(1.*((LNM1/DTHQNM1)/(170.68751/0.88328))**(0.5*((170.68751*285.85100)/(0.+170.68751*285.85100 +0.10983*89217.0000+1.42094*1629.34711)+(LNM1*HQNM1)/(0.+LNM1*HQNM1+ UIMNM*FKMNM+PVENM*FVENM)))*((UIMNM/DTFKMNM1)/(0.10983/0.94814))**(0.5* ((0.10983*89217.0000)/(0.+170.68751*285.85100+0.10983*89217.0000+1.42094 *1629.34711)+(UIMNM*FKMNM)/(0.+LNM1*HQNM1+UIMNM*FKMNM+PVENM*FVENM)))* ((PVENM/DTFVENM1)/(1.42094/1.00000))**(0.5*((1.42094*1629.34711)/(0.+170.68751 *285.85100+0.10983*89217.0000+1.42094*1629.34711)+(PVENM*FVENM)/(0.+ LNM1*HQNM1+UIMNM*FKMNM+PVENM*FVENM)))+JPKLENM1)*(1.0-DPKLENM1)+ DPKLENM1*ZPKLENM1$ FRML JLED JPKLENM1 =PKLENM1-(1.*((LNM1/DTHQNM1)/(170.68751/0.88328))**(0.5*((170.68751*285.85100)/(0.+170.68751 *285.85100+0.10983*89217.0000+1.42094*1629.34711)+(LNM1*HQNM1)/(0.+ LNM1*HQNM1+UIMNM*FKMNM+PVENM*FVENM)))*((UIMNM/DTFKMNM1)/(0.10983/0.94814 ))**(0.5*((0.10983*89217.0000)/(0.+170.68751*285.85100+0.10983*89217.0000 +1.42094*1629.34711)+(UIMNM*FKMNM)/(0.+LNM1*HQNM1+UIMNM*FKMNM+PVENM* FVENM)))*((PVENM/DTFVENM1)/(1.42094/1.00000))**(0.5*((1.42094*1629.34711 )/(0.+170.68751*285.85100+0.10983*89217.0000+1.42094*1629.34711)+( PVENM*FVENM)/(0.+LNM1*HQNM1+UIMNM*FKMNM+PVENM*FVENM))))$ FRML EXO ZPKLENM1 =PKLENM1$ FRML _DJ_D PKLENN1 =(1.*((LNN1/DTHQNN1)/(197.19230/1.07765))**(0.5*((197.19230*12.18000)/(0.+197.19230*12.18000 +0.09985*5894.19180+1.56411*156.87409)+(LNN1*HQNN1)/(0.+LNN1*HQNN1+ UIMNN*FKMNN+PVENN*FVENN)))*((UIMNN/DTFKMNN1)/(0.09985/1.11404))**(0.5* ((0.09985*5894.19180)/(0.+197.19230*12.18000+0.09985*5894.19180+1.56411 *156.87409)+(UIMNN*FKMNN)/(0.+LNN1*HQNN1+UIMNN*FKMNN+PVENN*FVENN)))*( (PVENN/DTFVENN1)/(1.56411/1.00000))**(0.5*((1.56411*156.87409)/(0.+197.19230 *12.18000+0.09985*5894.19180+1.56411*156.87409)+(PVENN*FVENN)/(0.+ LNN1*HQNN1+UIMNN*FKMNN+PVENN*FVENN)))+JPKLENN1)*(1.0-DPKLENN1)+ DPKLENN1*ZPKLENN1$ FRML JLED JPKLENN1 =PKLENN1-(1.*((LNN1/DTHQNN1)/(197.19230/1.07765))**(0.5*((197.19230*12.18000)/(0.+197.19230 *12.18000+0.09985*5894.19180+1.56411*156.87409)+(LNN1*HQNN1)/(0.+ LNN1*HQNN1+UIMNN*FKMNN+PVENN*FVENN)))*((UIMNN/DTFKMNN1)/(0.09985/1.11404 ))**(0.5*((0.09985*5894.19180)/(0.+197.19230*12.18000+0.09985*5894.19180 +1.56411*156.87409)+(UIMNN*FKMNN)/(0.+LNN1*HQNN1+UIMNN*FKMNN+PVENN* FVENN)))*((PVENN/DTFVENN1)/(1.56411/1.00000))**(0.5*((1.56411*156.87409 )/(0.+197.19230*12.18000+0.09985*5894.19180+1.56411*156.87409)+( PVENN*FVENN)/(0.+LNN1*HQNN1+UIMNN*FKMNN+PVENN*FVENN))))$ FRML EXO ZPKLENN1 =PKLENN1$ FRML _DJ_D PKLENQ1 =(1.*((LNQ1/DTHQNQ1)/(166.26571/0.91237))**(0.5*((166.26571*153.12400)/(0.+166.26571*153.12400 +0.10915*60642.4102+1.29330*1106.46935)+(LNQ1*HQNQ1)/(0.+LNQ1*HQNQ1+ UIMNQ*FKMNQ+PVENQ*FVENQ)))*((UIMNQ/DTFKMNQ1)/(0.10915/0.98489))**(0.5* ((0.10915*60642.4102)/(0.+166.26571*153.12400+0.10915*60642.4102+1.29330 *1106.46935)+(UIMNQ*FKMNQ)/(0.+LNQ1*HQNQ1+UIMNQ*FKMNQ+PVENQ*FVENQ)))* ((PVENQ/DTFVENQ1)/(1.29330/1.00000))**(0.5*((1.29330*1106.46935)/(0.+166.26571 *153.12400+0.10915*60642.4102+1.29330*1106.46935)+(PVENQ*FVENQ)/(0.+ LNQ1*HQNQ1+UIMNQ*FKMNQ+PVENQ*FVENQ)))+JPKLENQ1)*(1.0-DPKLENQ1)+ DPKLENQ1*ZPKLENQ1$ FRML JLED JPKLENQ1 =PKLENQ1-(1.*((LNQ1/DTHQNQ1)/(166.26571/0.91237))**(0.5*((166.26571*153.12400)/(0.+166.26571 *153.12400+0.10915*60642.4102+1.29330*1106.46935)+(LNQ1*HQNQ1)/(0.+ LNQ1*HQNQ1+UIMNQ*FKMNQ+PVENQ*FVENQ)))*((UIMNQ/DTFKMNQ1)/(0.10915/0.98489 ))**(0.5*((0.10915*60642.4102)/(0.+166.26571*153.12400+0.10915*60642.4102 +1.29330*1106.46935)+(UIMNQ*FKMNQ)/(0.+LNQ1*HQNQ1+UIMNQ*FKMNQ+PVENQ* FVENQ)))*((PVENQ/DTFVENQ1)/(1.29330/1.00000))**(0.5*((1.29330*1106.46935 )/(0.+166.26571*153.12400+0.10915*60642.4102+1.29330*1106.46935)+( PVENQ*FVENQ)/(0.+LNQ1*HQNQ1+UIMNQ*FKMNQ+PVENQ*FVENQ))))$ FRML EXO ZPKLENQ1 =PKLENQ1$ FRML _DJ_D PKLENT1 =(1.*((LNT1/DTHQNT1)/(169.92736/0.83290))**(0.5*((169.92736*27.73400)/(0.+169.92736*27.73400 +0.12861*6482.00000+1.51526*129.30427)+(LNT1*HQNT1)/(0.+LNT1*HQNT1+ UIMNT*FKMNT+PVENT*FVENT)))*((UIMNT/DTFKMNT1)/(0.12861/1.35506))**(0.5* ((0.12861*6482.00000)/(0.+169.92736*27.73400+0.12861*6482.00000+1.51526 *129.30427)+(UIMNT*FKMNT)/(0.+LNT1*HQNT1+UIMNT*FKMNT+PVENT*FVENT)))*( (PVENT/DTFVENT1)/(1.51526/1.00000))**(0.5*((1.51526*129.30427)/(0.+169.92736 *27.73400+0.12861*6482.00000+1.51526*129.30427)+(PVENT*FVENT)/(0.+ LNT1*HQNT1+UIMNT*FKMNT+PVENT*FVENT)))+JPKLENT1)*(1.0-DPKLENT1)+ DPKLENT1*ZPKLENT1$ FRML JLED JPKLENT1 =PKLENT1-(1.*((LNT1/DTHQNT1)/(169.92736/0.83290))**(0.5*((169.92736*27.73400)/(0.+169.92736 *27.73400+0.12861*6482.00000+1.51526*129.30427)+(LNT1*HQNT1)/(0.+ LNT1*HQNT1+UIMNT*FKMNT+PVENT*FVENT)))*((UIMNT/DTFKMNT1)/(0.12861/1.35506 ))**(0.5*((0.12861*6482.00000)/(0.+169.92736*27.73400+0.12861*6482.00000 +1.51526*129.30427)+(UIMNT*FKMNT)/(0.+LNT1*HQNT1+UIMNT*FKMNT+PVENT* FVENT)))*((PVENT/DTFVENT1)/(1.51526/1.00000))**(0.5*((1.51526*129.30427 )/(0.+169.92736*27.73400+0.12861*6482.00000+1.51526*129.30427)+( PVENT*FVENT)/(0.+LNT1*HQNT1+UIMNT*FKMNT+PVENT*FVENT))))$ FRML EXO ZPKLENT1 =PKLENT1$ FRML _DJ_D PKLEQF1 =(1.*((LQF1/DTHQQF1)/(276.98400/0.87736))**(0.5*((276.98400*118.43400)/(0.+276.98400*118.43400 +0.14457*38047.0000+2.28060*220.01185)+(LQF1*HQQF1)/(0.+LQF1*HQQF1+ UIMQF*FKMQF+PVEQF*FVEQF)))*((UIMQF/DTFKMQF1)/(0.14457/0.97222))**(0.5* ((0.14457*38047.0000)/(0.+276.98400*118.43400+0.14457*38047.0000+2.28060 *220.01185)+(UIMQF*FKMQF)/(0.+LQF1*HQQF1+UIMQF*FKMQF+PVEQF*FVEQF)))*( (PVEQF/DTFVEQF1)/(2.28060/1.00000))**(0.5*((2.28060*220.01185)/(0.+276.98400 *118.43400+0.14457*38047.0000+2.28060*220.01185)+(PVEQF*FVEQF)/(0.+ LQF1*HQQF1+UIMQF*FKMQF+PVEQF*FVEQF)))+JPKLEQF1)*(1.0-DPKLEQF1)+ DPKLEQF1*ZPKLEQF1$ FRML JLED JPKLEQF1 =PKLEQF1-(1.*((LQF1/DTHQQF1)/(276.98400/0.87736))**(0.5*((276.98400*118.43400)/(0.+276.98400 *118.43400+0.14457*38047.0000+2.28060*220.01185)+(LQF1*HQQF1)/(0.+ LQF1*HQQF1+UIMQF*FKMQF+PVEQF*FVEQF)))*((UIMQF/DTFKMQF1)/(0.14457/0.97222 ))**(0.5*((0.14457*38047.0000)/(0.+276.98400*118.43400+0.14457*38047.0000 +2.28060*220.01185)+(UIMQF*FKMQF)/(0.+LQF1*HQQF1+UIMQF*FKMQF+PVEQF* FVEQF)))*((PVEQF/DTFVEQF1)/(2.28060/1.00000))**(0.5*((2.28060*220.01185 )/(0.+276.98400*118.43400+0.14457*38047.0000+2.28060*220.01185)+( PVEQF*FVEQF)/(0.+LQF1*HQQF1+UIMQF*FKMQF+PVEQF*FVEQF))))$ FRML EXO ZPKLEQF1 =PKLEQF1$ FRML _DJ_D PKLEQH1 =(1.*((LQH1/DTHQQH1)/(170.36054/0.91451))**(0.5*((170.36054*614.19700)/(0.+170.36054*614.19700 +0.12108*159317.910+1.66875*2820.83949)+(LQH1*HQQH1)/(0.+LQH1*HQQH1+ UIMQH*FKMQH+PVEQH*FVEQH)))*((UIMQH/DTFKMQH1)/(0.12108/0.87662))**(0.5* ((0.12108*159317.910)/(0.+170.36054*614.19700+0.12108*159317.910+1.66875 *2820.83949)+(UIMQH*FKMQH)/(0.+LQH1*HQQH1+UIMQH*FKMQH+PVEQH*FVEQH)))* ((PVEQH/DTFVEQH1)/(1.66875/1.00000))**(0.5*((1.66875*2820.83949)/(0.+170.36054 *614.19700+0.12108*159317.910+1.66875*2820.83949)+(PVEQH*FVEQH)/(0.+ LQH1*HQQH1+UIMQH*FKMQH+PVEQH*FVEQH)))+JPKLEQH1)*(1.0-DPKLEQH1)+ DPKLEQH1*ZPKLEQH1$ FRML JLED JPKLEQH1 =PKLEQH1-(1.*((LQH1/DTHQQH1)/(170.36054/0.91451))**(0.5*((170.36054*614.19700)/(0.+170.36054 *614.19700+0.12108*159317.910+1.66875*2820.83949)+(LQH1*HQQH1)/(0.+ LQH1*HQQH1+UIMQH*FKMQH+PVEQH*FVEQH)))*((UIMQH/DTFKMQH1)/(0.12108/0.87662 ))**(0.5*((0.12108*159317.910)/(0.+170.36054*614.19700+0.12108*159317.910 +1.66875*2820.83949)+(UIMQH*FKMQH)/(0.+LQH1*HQQH1+UIMQH*FKMQH+PVEQH* FVEQH)))*((PVEQH/DTFVEQH1)/(1.66875/1.00000))**(0.5*((1.66875*2820.83949 )/(0.+170.36054*614.19700+0.12108*159317.910+1.66875*2820.83949)+( PVEQH*FVEQH)/(0.+LQH1*HQQH1+UIMQH*FKMQH+PVEQH*FVEQH))))$ FRML EXO ZPKLEQH1 =PKLEQH1$ FRML _DJ_D PKLEQQ1 =(1.*((LQQ1/DTHQQQ1)/(156.83078/1.00166))**(0.5*((156.83078*847.56500)/(0.+156.83078*847.56500 +0.14822*218851.557+1.75618*2839.88622)+(LQQ1*HQQQ1)/(0.+LQQ1*HQQQ1+ UIMQQ*FKMQQ+PVEQQ*FVEQQ)))*((UIMQQ/DTFKMQQ1)/(0.14822/1.10704))**(0.5* ((0.14822*218851.557)/(0.+156.83078*847.56500+0.14822*218851.557+1.75618 *2839.88622)+(UIMQQ*FKMQQ)/(0.+LQQ1*HQQQ1+UIMQQ*FKMQQ+PVEQQ*FVEQQ)))* ((PVEQQ/DTFVEQQ1)/(1.75618/1.00000))**(0.5*((1.75618*2839.88622)/(0.+156.83078 *847.56500+0.14822*218851.557+1.75618*2839.88622)+(PVEQQ*FVEQQ)/(0.+ LQQ1*HQQQ1+UIMQQ*FKMQQ+PVEQQ*FVEQQ)))+JPKLEQQ1)*(1.0-DPKLEQQ1)+ DPKLEQQ1*ZPKLEQQ1$ FRML JLED JPKLEQQ1 =PKLEQQ1-(1.*((LQQ1/DTHQQQ1)/(156.83078/1.00166))**(0.5*((156.83078*847.56500)/(0.+156.83078 *847.56500+0.14822*218851.557+1.75618*2839.88622)+(LQQ1*HQQQ1)/(0.+ LQQ1*HQQQ1+UIMQQ*FKMQQ+PVEQQ*FVEQQ)))*((UIMQQ/DTFKMQQ1)/(0.14822/1.10704 ))**(0.5*((0.14822*218851.557)/(0.+156.83078*847.56500+0.14822*218851.557 +1.75618*2839.88622)+(UIMQQ*FKMQQ)/(0.+LQQ1*HQQQ1+UIMQQ*FKMQQ+PVEQQ* FVEQQ)))*((PVEQQ/DTFVEQQ1)/(1.75618/1.00000))**(0.5*((1.75618*2839.88622 )/(0.+156.83078*847.56500+0.14822*218851.557+1.75618*2839.88622)+( PVEQQ*FVEQQ)/(0.+LQQ1*HQQQ1+UIMQQ*FKMQQ+PVEQQ*FVEQQ))))$ FRML EXO ZPKLEQQ1 =PKLEQQ1$ FRML _DJ_D PKLEQT1 =(1.*((LQT1/DTHQQT1)/(164.94231/0.87338))**(0.5*((164.94231*292.31200)/(0.+164.94231*292.31200 +0.10905*162944.000+1.82889*4391.98215)+(LQT1*HQQT1)/(0.+LQT1*HQQT1+ UIMQT*FKMQT+PVEQT*FVEQT)))*((UIMQT/DTFKMQT1)/(0.10905/1.01709))**(0.5* ((0.10905*162944.000)/(0.+164.94231*292.31200+0.10905*162944.000+1.82889 *4391.98215)+(UIMQT*FKMQT)/(0.+LQT1*HQQT1+UIMQT*FKMQT+PVEQT*FVEQT)))* ((PVEQT/DTFVEQT1)/(1.82889/1.00000))**(0.5*((1.82889*4391.98215)/(0.+164.94231 *292.31200+0.10905*162944.000+1.82889*4391.98215)+(PVEQT*FVEQT)/(0.+ LQT1*HQQT1+UIMQT*FKMQT+PVEQT*FVEQT)))+JPKLEQT1)*(1.0-DPKLEQT1)+ DPKLEQT1*ZPKLEQT1$ FRML JLED JPKLEQT1 =PKLEQT1-(1.*((LQT1/DTHQQT1)/(164.94231/0.87338))**(0.5*((164.94231*292.31200)/(0.+164.94231 *292.31200+0.10905*162944.000+1.82889*4391.98215)+(LQT1*HQQT1)/(0.+ LQT1*HQQT1+UIMQT*FKMQT+PVEQT*FVEQT)))*((UIMQT/DTFKMQT1)/(0.10905/1.01709 ))**(0.5*((0.10905*162944.000)/(0.+164.94231*292.31200+0.10905*162944.000 +1.82889*4391.98215)+(UIMQT*FKMQT)/(0.+LQT1*HQQT1+UIMQT*FKMQT+PVEQT* FVEQT)))*((PVEQT/DTFVEQT1)/(1.82889/1.00000))**(0.5*((1.82889*4391.98215 )/(0.+164.94231*292.31200+0.10905*162944.000+1.82889*4391.98215)+( PVEQT*FVEQT)/(0.+LQT1*HQQT1+UIMQT*FKMQT+PVEQT*FVEQT))))$ FRML EXO ZPKLEQT1 =PKLEQT1$ FRML _DJ_D PKLEO1 =(1.*((LO1/DTHQO1)/(183.20104/1.00000))**(0.5*((183.20104*1151.78800)/(0.+183.20104*1151.78800 +0.12287*83544.0000+2.28103*2848.34508)+(LO1*HQO2)/(0.+LO1*HQO2+UIMO* FKMO+PVEO*FVEO)))*((UIMO/DTFKMO1)/(0.12287/1.00000))**(0.5*((0.12287*83544.0000 )/(0.+183.20104*1151.78800+0.12287*83544.0000+2.28103*2848.34508)+( UIMO*FKMO)/(0.+LO1*HQO2+UIMO*FKMO+PVEO*FVEO)))*((PVEO/DTFVEO1)/(2.28103 /1.00000))**(0.5*((2.28103*2848.34508)/(0.+183.20104*1151.78800+0.12287 *83544.0000+2.28103*2848.34508)+(PVEO*FVEO)/(0.+LO1*HQO2+UIMO*FKMO+ PVEO*FVEO)))+JPKLEO1)*(1.0-DPKLEO1)+DPKLEO1*ZPKLEO1$ FRML JLED JPKLEO1 =PKLEO1-(1.*((LO1/DTHQO1)/(183.20104/1.00000))**(0.5*((183.20104*1151.78800)/(0.+183.20104 *1151.78800+0.12287*83544.0000+2.28103*2848.34508)+(LO1*HQO2)/(0.+ LO1*HQO2+UIMO*FKMO+PVEO*FVEO)))*((UIMO/DTFKMO1)/(0.12287/1.00000))**(0.5 *((0.12287*83544.0000)/(0.+183.20104*1151.78800+0.12287*83544.0000+2.28103 *2848.34508)+(UIMO*FKMO)/(0.+LO1*HQO2+UIMO*FKMO+PVEO*FVEO)))*((PVEO/ DTFVEO1)/(2.28103/1.00000))**(0.5*((2.28103*2848.34508)/(0.+183.20104* 1151.78800+0.12287*83544.0000+2.28103*2848.34508)+(PVEO*FVEO)/(0.+ LO1*HQO2+UIMO*FKMO+PVEO*FVEO))))$ FRML EXO ZPKLEO1 =PKLEO1$ FRML _GJRDF FVENG =((EXP(LOG(FVENG(-1))+(LOG(FXNG)-LOG(FXNG(-1)))-(LOG(DTFVENG)-LOG(DTFVENG(-1)))))*(1.0 +JRFVENG))*(1.0-DFVENG)+DFVENG*ZFVENG$ FRML JLED JRFVENG =FVENG/(EXP(LOG(FVENG(-1))+(LOG(FXNG)-LOG(FXNG(-1)))-(LOG(DTFVENG)-LOG(DTFVENG(-1))))) -1.0$ FRML EXO ZFVENG =FVENG$ FRML _GJRDF FVEH =((EXP(LOG(FVEH(-1))+(LOG(FXH)-LOG(FXH(-1)))-(LOG(DTFVEH)-LOG(DTFVEH(-1)))))*(1.0+ JRFVEH))*(1.0-DFVEH)+DFVEH*ZFVEH$ FRML JLED JRFVEH =FVEH/(EXP(LOG(FVEH(-1))+(LOG(FXH)-LOG(FXH(-1)))-(LOG(DTFVEH)-LOG(DTFVEH(-1)))))-1.0$ FRML EXO ZFVEH =FVEH$ FRML _GJRDF FVEQS =((EXP(LOG(FVEQS(-1))+(LOG(FXQS)-LOG(FXQS(-1)))-(LOG(DTFVEQS)-LOG(DTFVEQS(-1)))))*(1.0 +JRFVEQS))*(1.0-DFVEQS)+DFVEQS*ZFVEQS$ FRML JLED JRFVEQS =FVEQS/(EXP(LOG(FVEQS(-1))+(LOG(FXQS)-LOG(FXQS(-1)))-(LOG(DTFVEQS)-LOG(DTFVEQS(-1))))) -1.0$ FRML EXO ZFVEQS =FVEQS$ FRML _DJRD FVEAW1 =((EXP(LOG(FXA-HOSTKOR)-0.32205*LOG(PVEA/PKLEA1)-(1.-0.32205)*LOG(DTFVEA1)-3.14486+0.00000 *FROS+0.00000*D7092))*(1.0+JRFVEAW1))*(1.0-DFVEAW1)+DFVEAW1*ZFVEAW1$ FRML JLED JRFVEAW1 =FVEAW1/(EXP(LOG(FXA-HOSTKOR)-0.32205*LOG(PVEA/PKLEA1)-(1.-0.32205)*LOG(DTFVEA1)-3.14486 +0.00000*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVEAW1 =FVEAW1$ FRML _SJRD FVEA =((EXP(LOG(FVEAW1)))*(1.0+JRFVEA))*(1.0-DFVEA)+DFVEA*ZFVEA$ FRML JLED JRFVEA =FVEA/(EXP(LOG(FVEAW1)))-1.0$ FRML EXO ZFVEA =FVEA$ FRML _DJRD FVENFW1 =((EXP(LOG(FXNF)-0.23218*LOG(PVENF/PKLENF1)-(1.-0.23218)*LOG(DTFVENF1)-4.03877+0.00000 *FROS+0.00000*D7092))*(1.0+JRFVENFW1))*(1.0-DFVENFW1)+DFVENFW1* ZFVENFW1$ FRML JLED JRFVENFW1 =FVENFW1/(EXP(LOG(FXNF)-0.23218*LOG(PVENF/PKLENF1)-(1.-0.23218)*LOG(DTFVENF1)-4.03877+ 0.00000*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVENFW1 =FVENFW1$ FRML _SJRD FVENF =((EXP(LOG(FVENF(-1))+0.10000*(LOG(FXNF)-LOG(FXNF(-1)))+0.90000*(-0.23218)*(LOG(PVENF/ PKLENF1)-LOG(PVENF(-1)/PKLENF1(-1)))+0.00000*((FROS)-(FROS(-1)))+0.00000 *((D7092)-(D7092(-1)))-0.44054*(1.-0.23218)*(LOG(DTFVENF1)-LOG( DTFVENF1(-1)))-0.44054*(LOG(FVENF(-1)/FVENFW1(-1)))))*(1.0+JRFVENF))* (1.0-DFVENF)+DFVENF*ZFVENF$ FRML JLED JRFVENF =FVENF/(EXP(LOG(FVENF(-1))+0.10000*(LOG(FXNF)-LOG(FXNF(-1)))+0.90000*(-0.23218)*(LOG( PVENF/PKLENF1)-LOG(PVENF(-1)/PKLENF1(-1)))+0.00000*((FROS)-(FROS(-1)) )+0.00000*((D7092)-(D7092(-1)))-0.44054*(1.-0.23218)*(LOG(DTFVENF1)-LOG (DTFVENF1(-1)))-0.44054*(LOG(FVENF(-1)/FVENFW1(-1)))))-1.0$ FRML EXO ZFVENF =FVENF$ FRML _DJRD FVENNW1 =((EXP(LOG(FXNN)-0.478218*LOG(PVENN/PKLENN1)-(1.-0.478218)*LOG(DTFVENN1)-3.98524-0.000429716 *FROS-0.175747*D7092))*(1.0+JRFVENNW1))*(1.0-DFVENNW1)+DFVENNW1* ZFVENNW1$ FRML JLED JRFVENNW1 =FVENNW1/(EXP(LOG(FXNN)-0.478218*LOG(PVENN/PKLENN1)-(1.-0.478218)*LOG(DTFVENN1)-3.98524 -0.000429716*FROS-0.175747*D7092))-1.0$ FRML EXO ZFVENNW1 =FVENNW1$ FRML _SJRD FVENN =((EXP(LOG(FVENNW1)))*(1.0+JRFVENN))*(1.0-DFVENN)+DFVENN*ZFVENN$ FRML JLED JRFVENN =FVENN/(EXP(LOG(FVENNW1)))-1.0$ FRML EXO ZFVENN =FVENN$ FRML _DJRD FVENBW1 =((EXP(LOG(FXNB)-0.20000*LOG(PVENB/PKLENB1)-(1.-0.20000)*LOG(DTFVENB1)-3.15130+0.0011598 *FROS+0.00000*D7092))*(1.0+JRFVENBW1))*(1.0-DFVENBW1)+DFVENBW1* ZFVENBW1$ FRML JLED JRFVENBW1 =FVENBW1/(EXP(LOG(FXNB)-0.20000*LOG(PVENB/PKLENB1)-(1.-0.20000)*LOG(DTFVENB1)-3.15130+ 0.0011598*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVENBW1 =FVENBW1$ FRML _SJRD FVENB =((EXP(LOG(FVENB(-1))+0.58800*(LOG(FXNB)-LOG(FXNB(-1)))+0.10000*(-0.20000)*(LOG(PVENB/ PKLENB1)-LOG(PVENB(-1)/PKLENB1(-1)))+0.0011598*((FROS)-(FROS(-1)))+0.00000 *((D7092)-(D7092(-1)))-0.59048*(1.-0.20000)*(LOG(DTFVENB1)-LOG( DTFVENB1(-1)))-0.59048*(LOG(FVENB(-1)/FVENBW1(-1)))))*(1.0+JRFVENB))* (1.0-DFVENB)+DFVENB*ZFVENB$ FRML JLED JRFVENB =FVENB/(EXP(LOG(FVENB(-1))+0.58800*(LOG(FXNB)-LOG(FXNB(-1)))+0.10000*(-0.20000)*(LOG( PVENB/PKLENB1)-LOG(PVENB(-1)/PKLENB1(-1)))+0.0011598*((FROS)-(FROS(-1) ))+0.00000*((D7092)-(D7092(-1)))-0.59048*(1.-0.20000)*(LOG(DTFVENB1)- LOG(DTFVENB1(-1)))-0.59048*(LOG(FVENB(-1)/FVENBW1(-1)))))-1.0$ FRML EXO ZFVENB =FVENB$ FRML _DJRD FVENMW1 =((EXP(LOG(FXNM)-0.064866*LOG(PVENM/PKLENM1)-(1.-0.064866)*LOG(DTFVENM1)-4.60101+0.0017468 *FROS+0.00000*D7092))*(1.0+JRFVENMW1))*(1.0-DFVENMW1)+DFVENMW1* ZFVENMW1$ FRML JLED JRFVENMW1 =FVENMW1/(EXP(LOG(FXNM)-0.064866*LOG(PVENM/PKLENM1)-(1.-0.064866)*LOG(DTFVENM1)-4.60101 +0.0017468*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVENMW1 =FVENMW1$ FRML _SJRD FVENM =((EXP(LOG(FVENM(-1))+0.61167*(LOG(FXNM)-LOG(FXNM(-1)))+0.10000*(-0.064866)*(LOG( PVENM/PKLENM1)-LOG(PVENM(-1)/PKLENM1(-1)))+0.0017468*((FROS)-(FROS(-1) ))+0.00000*((D7092)-(D7092(-1)))-0.58080*(1.-0.064866)*(LOG(DTFVENM1) -LOG(DTFVENM1(-1)))-0.58080*(LOG(FVENM(-1)/FVENMW1(-1)))))*(1.0+ JRFVENM))*(1.0-DFVENM)+DFVENM*ZFVENM$ FRML JLED JRFVENM =FVENM/(EXP(LOG(FVENM(-1))+0.61167*(LOG(FXNM)-LOG(FXNM(-1)))+0.10000*(-0.064866)*(LOG( PVENM/PKLENM1)-LOG(PVENM(-1)/PKLENM1(-1)))+0.0017468*((FROS)-(FROS(-1) ))+0.00000*((D7092)-(D7092(-1)))-0.58080*(1.-0.064866)*(LOG(DTFVENM1) -LOG(DTFVENM1(-1)))-0.58080*(LOG(FVENM(-1)/FVENMW1(-1)))))-1.0$ FRML EXO ZFVENM =FVENM$ FRML _DJRD FVENTW1 =((EXP(LOG(FXNT)-0.18589*LOG(PVENT/PKLENT1)-(1.-0.18589)*LOG(DTFVENT1)-4.91781+0.0023120 *FROS+0.19706*D7092))*(1.0+JRFVENTW1))*(1.0-DFVENTW1)+DFVENTW1* ZFVENTW1$ FRML JLED JRFVENTW1 =FVENTW1/(EXP(LOG(FXNT)-0.18589*LOG(PVENT/PKLENT1)-(1.-0.18589)*LOG(DTFVENT1)-4.91781+ 0.0023120*FROS+0.19706*D7092))-1.0$ FRML EXO ZFVENTW1 =FVENTW1$ FRML _SJRD FVENT =((EXP(LOG(FVENTW1)))*(1.0+JRFVENT))*(1.0-DFVENT)+DFVENT*ZFVENT$ FRML JLED JRFVENT =FVENT/(EXP(LOG(FVENTW1)))-1.0$ FRML EXO ZFVENT =FVENT$ FRML _DJRD FVENKW1 =((EXP(LOG(FXNK)-0.25371*LOG(PVENK/PKLENK1)-(1.-0.25371)*LOG(DTFVENK1)-3.79615-0.00035053 *FROS+0.29301*D7377))*(1.0+JRFVENKW1))*(1.0-DFVENKW1)+DFVENKW1* ZFVENKW1$ FRML JLED JRFVENKW1 =FVENKW1/(EXP(LOG(FXNK)-0.25371*LOG(PVENK/PKLENK1)-(1.-0.25371)*LOG(DTFVENK1)-3.79615- 0.00035053*FROS+0.29301*D7377))-1.0$ FRML EXO ZFVENKW1 =FVENKW1$ FRML _SJRD FVENK =((EXP(LOG(FVENKW1)))*(1.0+JRFVENK))*(1.0-DFVENK)+DFVENK*ZFVENK$ FRML JLED JRFVENK =FVENK/(EXP(LOG(FVENKW1)))-1.0$ FRML EXO ZFVENK =FVENK$ FRML _DJRD FVENQW1 =((EXP(LOG(FXNQ)-0.14575*LOG(PVENQ/PKLENQ1)-(1.-0.14575)*LOG(DTFVENQ1)-4.48329+0.0017148 *FROS+0.00000*D7092))*(1.0+JRFVENQW1))*(1.0-DFVENQW1)+DFVENQW1* ZFVENQW1$ FRML JLED JRFVENQW1 =FVENQW1/(EXP(LOG(FXNQ)-0.14575*LOG(PVENQ/PKLENQ1)-(1.-0.14575)*LOG(DTFVENQ1)-4.48329+ 0.0017148*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVENQW1 =FVENQW1$ FRML _SJRD FVENQ =((EXP(LOG(FVENQ(-1))+0.59627*(LOG(FXNQ)-LOG(FXNQ(-1)))+0.90000*(-0.14575)*(LOG(PVENQ/ PKLENQ1)-LOG(PVENQ(-1)/PKLENQ1(-1)))+0.0017148*((FROS)-(FROS(-1)))+0.00000 *((D7092)-(D7092(-1)))-0.73857*(1.-0.14575)*(LOG(DTFVENQ1)-LOG( DTFVENQ1(-1)))-0.73857*(LOG(FVENQ(-1)/FVENQW1(-1)))))*(1.0+JRFVENQ))* (1.0-DFVENQ)+DFVENQ*ZFVENQ$ FRML JLED JRFVENQ =FVENQ/(EXP(LOG(FVENQ(-1))+0.59627*(LOG(FXNQ)-LOG(FXNQ(-1)))+0.90000*(-0.14575)*(LOG( PVENQ/PKLENQ1)-LOG(PVENQ(-1)/PKLENQ1(-1)))+0.0017148*((FROS)-(FROS(-1) ))+0.00000*((D7092)-(D7092(-1)))-0.73857*(1.-0.14575)*(LOG(DTFVENQ1)- LOG(DTFVENQ1(-1)))-0.73857*(LOG(FVENQ(-1)/FVENQW1(-1)))))-1.0$ FRML EXO ZFVENQ =FVENQ$ FRML _DJRD FVEBW1 =((EXP(LOG(FXB)-0.15547*LOG(PVEB/PKLEB1)-(1.-0.15547)*LOG(DTFVEB1)-4.71091+0.00010498* FROS+0.27141*D7092))*(1.0+JRFVEBW1))*(1.0-DFVEBW1)+DFVEBW1*ZFVEBW1$ FRML JLED JRFVEBW1 =FVEBW1/(EXP(LOG(FXB)-0.15547*LOG(PVEB/PKLEB1)-(1.-0.15547)*LOG(DTFVEB1)-4.71091+0.00010498 *FROS+0.27141*D7092))-1.0$ FRML EXO ZFVEBW1 =FVEBW1$ FRML _SJRD FVEB =((EXP(LOG(FVEB(-1))+0.71401*(LOG(FXB)-LOG(FXB(-1)))+0.90000*(-0.15547)*(LOG(PVEB/ PKLEB1)-LOG(PVEB(-1)/PKLEB1(-1)))+0.00010498*((FROS)-(FROS(-1)))+0.27141 *((D7092)-(D7092(-1)))-0.65345*(1.-0.15547)*(LOG(DTFVEB1)-LOG( DTFVEB1(-1)))-0.65345*(LOG(FVEB(-1)/FVEBW1(-1)))))*(1.0+JRFVEB))*(1.0 -DFVEB)+DFVEB*ZFVEB$ FRML JLED JRFVEB =FVEB/(EXP(LOG(FVEB(-1))+0.71401*(LOG(FXB)-LOG(FXB(-1)))+0.90000*(-0.15547)*(LOG(PVEB/ PKLEB1)-LOG(PVEB(-1)/PKLEB1(-1)))+0.00010498*((FROS)-(FROS(-1)))+0.27141 *((D7092)-(D7092(-1)))-0.65345*(1.-0.15547)*(LOG(DTFVEB1)-LOG( DTFVEB1(-1)))-0.65345*(LOG(FVEB(-1)/FVEBW1(-1)))))-1.0$ FRML EXO ZFVEB =FVEB$ FRML _DJRD FVEOW1 =((EXP(LOG(FXO)-0.20056*LOG(PVEO/PKLEO1)-(1.-0.20056)*LOG(DTFVEO1)-4.55744+0.00037315* FROS+0.30219*D7092))*(1.0+JRFVEOW1))*(1.0-DFVEOW1)+DFVEOW1*ZFVEOW1$ FRML JLED JRFVEOW1 =FVEOW1/(EXP(LOG(FXO)-0.20056*LOG(PVEO/PKLEO1)-(1.-0.20056)*LOG(DTFVEO1)-4.55744+0.00037315 *FROS+0.30219*D7092))-1.0$ FRML EXO ZFVEOW1 =FVEOW1$ FRML _SJRD FVEO =((EXP(LOG(FVEO(-1))+0.90000*(LOG(FXO)-LOG(FXO(-1)))+0.66658*(-0.20056)*(LOG(PVEO/ PKLEO1)-LOG(PVEO(-1)/PKLEO1(-1)))+0.00037315*((FROS)-(FROS(-1)))+0.30219 *((D7092)-(D7092(-1)))-0.83159*(1.-0.20056)*(LOG(DTFVEO1)-LOG( DTFVEO1(-1)))-0.83159*(LOG(FVEO(-1)/FVEOW1(-1)))))*(1.0+JRFVEO))*(1.0 -DFVEO)+DFVEO*ZFVEO$ FRML JLED JRFVEO =FVEO/(EXP(LOG(FVEO(-1))+0.90000*(LOG(FXO)-LOG(FXO(-1)))+0.66658*(-0.20056)*(LOG(PVEO/ PKLEO1)-LOG(PVEO(-1)/PKLEO1(-1)))+0.00037315*((FROS)-(FROS(-1)))+0.30219 *((D7092)-(D7092(-1)))-0.83159*(1.-0.20056)*(LOG(DTFVEO1)-LOG( DTFVEO1(-1)))-0.83159*(LOG(FVEO(-1)/FVEOW1(-1)))))-1.0$ FRML EXO ZFVEO =FVEO$ FRML _DJRD FVEQHW1 =((EXP(LOG(FXQH)-0.10000*LOG(PVEQH/PKLEQH1)-(1.-0.10000)*LOG(DTFVEQH1)-4.20802+0.00098639 *FROS+0.13877*D7092))*(1.0+JRFVEQHW1))*(1.0-DFVEQHW1)+DFVEQHW1* ZFVEQHW1$ FRML JLED JRFVEQHW1 =FVEQHW1/(EXP(LOG(FXQH)-0.10000*LOG(PVEQH/PKLEQH1)-(1.-0.10000)*LOG(DTFVEQH1)-4.20802+ 0.00098639*FROS+0.13877*D7092))-1.0$ FRML EXO ZFVEQHW1 =FVEQHW1$ FRML _SJRD FVEQH =((EXP(LOG(FVEQH(-1))+0.38486*(LOG(FXQH)-LOG(FXQH(-1)))+0.10000*(-0.10000)*(LOG(PVEQH/ PKLEQH1)-LOG(PVEQH(-1)/PKLEQH1(-1)))+0.00098639*((FROS)-(FROS(-1)))+0.13877 *((D7092)-(D7092(-1)))-0.40787*(1.-0.10000)*(LOG(DTFVEQH1)-LOG( DTFVEQH1(-1)))-0.40787*(LOG(FVEQH(-1)/FVEQHW1(-1)))))*(1.0+JRFVEQH))* (1.0-DFVEQH)+DFVEQH*ZFVEQH$ FRML JLED JRFVEQH =FVEQH/(EXP(LOG(FVEQH(-1))+0.38486*(LOG(FXQH)-LOG(FXQH(-1)))+0.10000*(-0.10000)*(LOG( PVEQH/PKLEQH1)-LOG(PVEQH(-1)/PKLEQH1(-1)))+0.00098639*((FROS)-(FROS(-1) ))+0.13877*((D7092)-(D7092(-1)))-0.40787*(1.-0.10000)*(LOG(DTFVEQH1)- LOG(DTFVEQH1(-1)))-0.40787*(LOG(FVEQH(-1)/FVEQHW1(-1)))))-1.0$ FRML EXO ZFVEQH =FVEQH$ FRML _DJRD FVEQTW1 =((EXP(LOG(FXQT)-0.13907*LOG(PVEQT/PKLEQT1)-(1.-0.13907)*LOG(DTFVEQT1)-3.39540+0.0012293 *FROS+0.077685*D7092))*(1.0+JRFVEQTW1))*(1.0-DFVEQTW1)+DFVEQTW1* ZFVEQTW1$ FRML JLED JRFVEQTW1 =FVEQTW1/(EXP(LOG(FXQT)-0.13907*LOG(PVEQT/PKLEQT1)-(1.-0.13907)*LOG(DTFVEQT1)-3.39540+ 0.0012293*FROS+0.077685*D7092))-1.0$ FRML EXO ZFVEQTW1 =FVEQTW1$ FRML _SJRD FVEQT =((EXP(LOG(FVEQTW1)))*(1.0+JRFVEQT))*(1.0-DFVEQT)+DFVEQT*ZFVEQT$ FRML JLED JRFVEQT =FVEQT/(EXP(LOG(FVEQTW1)))-1.0$ FRML EXO ZFVEQT =FVEQT$ FRML _DJRD FVEQFW1 =((EXP(LOG(FXQF)-0.10000*LOG(PVEQF/PKLEQF1)-(1.-0.10000)*LOG(DTFVEQF1)-5.49518+0.00000 *FROS+0.00000*D7092))*(1.0+JRFVEQFW1))*(1.0-DFVEQFW1)+DFVEQFW1* ZFVEQFW1$ FRML JLED JRFVEQFW1 =FVEQFW1/(EXP(LOG(FXQF)-0.10000*LOG(PVEQF/PKLEQF1)-(1.-0.10000)*LOG(DTFVEQF1)-5.49518+ 0.00000*FROS+0.00000*D7092))-1.0$ FRML EXO ZFVEQFW1 =FVEQFW1$ FRML _SJRD FVEQF =((EXP(LOG(FVEQF(-1))+1.31887*(LOG(FXQF)-LOG(FXQF(-1)))+0.10000*(-0.10000)*(LOG(PVEQF/ PKLEQF1)-LOG(PVEQF(-1)/PKLEQF1(-1)))+0.00000*((FROS)-(FROS(-1)))+0.00000 *((D7092)-(D7092(-1)))-0.30789*(1.-0.10000)*(LOG(DTFVEQF1)-LOG( DTFVEQF1(-1)))-0.30789*(LOG(FVEQF(-1)/FVEQFW1(-1)))))*(1.0+JRFVEQF))* (1.0-DFVEQF)+DFVEQF*ZFVEQF$ FRML JLED JRFVEQF =FVEQF/(EXP(LOG(FVEQF(-1))+1.31887*(LOG(FXQF)-LOG(FXQF(-1)))+0.10000*(-0.10000)*(LOG( PVEQF/PKLEQF1)-LOG(PVEQF(-1)/PKLEQF1(-1)))+0.00000*((FROS)-(FROS(-1)) )+0.00000*((D7092)-(D7092(-1)))-0.30789*(1.-0.10000)*(LOG(DTFVEQF1)-LOG (DTFVEQF1(-1)))-0.30789*(LOG(FVEQF(-1)/FVEQFW1(-1)))))-1.0$ FRML EXO ZFVEQF =FVEQF$ FRML _DJRD FVEQQW1 =((EXP(LOG(FXQQ)-0.17368*LOG(PVEQQ/PKLEQQ1)-(1.-0.17368)*LOG(DTFVEQQ1)-4.72113+0.0014587 *FROS+0.27116*D7092))*(1.0+JRFVEQQW1))*(1.0-DFVEQQW1)+DFVEQQW1* ZFVEQQW1$ FRML JLED JRFVEQQW1 =FVEQQW1/(EXP(LOG(FXQQ)-0.17368*LOG(PVEQQ/PKLEQQ1)-(1.-0.17368)*LOG(DTFVEQQ1)-4.72113+ 0.0014587*FROS+0.27116*D7092))-1.0$ FRML EXO ZFVEQQW1 =FVEQQW1$ FRML _SJRD FVEQQ =((EXP(LOG(FVEQQW1)))*(1.0+JRFVEQQ))*(1.0-DFVEQQ)+DFVEQQ*ZFVEQQ$ FRML JLED JRFVEQQ =FVEQQ/(EXP(LOG(FVEQQW1)))-1.0$ FRML EXO ZFVEQQ =FVEQQ$ FRML _GJRDF FVMA =((EXP(LOG(FVMA(-1))+(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))))*(1.0+JRFVMA))*(1.0- DFVMA)+DFVMA*ZFVMA$ FRML JLED JRFVMA =FVMA/(EXP(LOG(FVMA(-1))+(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))))-1.0$ FRML EXO ZFVMA =FVMA$ FRML _GJRDF FVME =((EXP(LOG(FVME(-1))+(LOG(FXE)-LOG(FXE(-1)))))*(1.0+JRFVME))*(1.0-DFVME)+DFVME*ZFVME$ FRML JLED JRFVME =FVME/(EXP(LOG(FVME(-1))+(LOG(FXE)-LOG(FXE(-1)))))-1.0$ FRML EXO ZFVME =FVME$ FRML _GJRDF FVMNG =((EXP(LOG(FVMNG(-1))+(LOG(FXNG)-LOG(FXNG(-1)))))*(1.0+JRFVMNG))*(1.0-DFVMNG)+DFVMNG* ZFVMNG$ FRML JLED JRFVMNG =FVMNG/(EXP(LOG(FVMNG(-1))+(LOG(FXNG)-LOG(FXNG(-1)))))-1.0$ FRML EXO ZFVMNG =FVMNG$ FRML _GJRDF FVMNF =((EXP(LOG(FVMNF(-1))+(LOG(FXNF)-LOG(FXNF(-1)))))*(1.0+JRFVMNF))*(1.0-DFVMNF)+DFVMNF* ZFVMNF$ FRML JLED JRFVMNF =FVMNF/(EXP(LOG(FVMNF(-1))+(LOG(FXNF)-LOG(FXNF(-1)))))-1.0$ FRML EXO ZFVMNF =FVMNF$ FRML _GJRDF FVMNN =((EXP(LOG(FVMNN(-1))+(LOG(FXNN)-LOG(FXNN(-1)))))*(1.0+JRFVMNN))*(1.0-DFVMNN)+DFVMNN* ZFVMNN$ FRML JLED JRFVMNN =FVMNN/(EXP(LOG(FVMNN(-1))+(LOG(FXNN)-LOG(FXNN(-1)))))-1.0$ FRML EXO ZFVMNN =FVMNN$ FRML _GJRDF FVMNB =((EXP(LOG(FVMNB(-1))+(LOG(FXNB)-LOG(FXNB(-1)))))*(1.0+JRFVMNB))*(1.0-DFVMNB)+DFVMNB* ZFVMNB$ FRML JLED JRFVMNB =FVMNB/(EXP(LOG(FVMNB(-1))+(LOG(FXNB)-LOG(FXNB(-1)))))-1.0$ FRML EXO ZFVMNB =FVMNB$ FRML _GJRDF FVMNM =((EXP(LOG(FVMNM(-1))+(LOG(FXNM)-LOG(FXNM(-1)))))*(1.0+JRFVMNM))*(1.0-DFVMNM)+DFVMNM* ZFVMNM$ FRML JLED JRFVMNM =FVMNM/(EXP(LOG(FVMNM(-1))+(LOG(FXNM)-LOG(FXNM(-1)))))-1.0$ FRML EXO ZFVMNM =FVMNM$ FRML _GJRDF FVMNT =((EXP(LOG(FVMNT(-1))+(LOG(FXNT)-LOG(FXNT(-1)))))*(1.0+JRFVMNT))*(1.0-DFVMNT)+DFVMNT* ZFVMNT$ FRML JLED JRFVMNT =FVMNT/(EXP(LOG(FVMNT(-1))+(LOG(FXNT)-LOG(FXNT(-1)))))-1.0$ FRML EXO ZFVMNT =FVMNT$ FRML _GJRDF FVMNK =((EXP(LOG(FVMNK(-1))+(LOG(FXNK)-LOG(FXNK(-1)))))*(1.0+JRFVMNK))*(1.0-DFVMNK)+DFVMNK* ZFVMNK$ FRML JLED JRFVMNK =FVMNK/(EXP(LOG(FVMNK(-1))+(LOG(FXNK)-LOG(FXNK(-1)))))-1.0$ FRML EXO ZFVMNK =FVMNK$ FRML _GJRDF FVMNQ =((EXP(LOG(FVMNQ(-1))+(LOG(FXNQ)-LOG(FXNQ(-1)))))*(1.0+JRFVMNQ))*(1.0-DFVMNQ)+DFVMNQ* ZFVMNQ$ FRML JLED JRFVMNQ =FVMNQ/(EXP(LOG(FVMNQ(-1))+(LOG(FXNQ)-LOG(FXNQ(-1)))))-1.0$ FRML EXO ZFVMNQ =FVMNQ$ FRML _GJRDF FVMB =((EXP(LOG(FVMB(-1))+(LOG(FXB)-LOG(FXB(-1)))))*(1.0+JRFVMB))*(1.0-DFVMB)+DFVMB*ZFVMB$ FRML JLED JRFVMB =FVMB/(EXP(LOG(FVMB(-1))+(LOG(FXB)-LOG(FXB(-1)))))-1.0$ FRML EXO ZFVMB =FVMB$ FRML _GJRDF FVMQH =((EXP(LOG(FVMQH(-1))+(LOG(FXQH)-LOG(FXQH(-1)))))*(1.0+JRFVMQH))*(1.0-DFVMQH)+DFVMQH* ZFVMQH$ FRML JLED JRFVMQH =FVMQH/(EXP(LOG(FVMQH(-1))+(LOG(FXQH)-LOG(FXQH(-1)))))-1.0$ FRML EXO ZFVMQH =FVMQH$ FRML _GJRDF FVMQS =((EXP(LOG(FVMQS(-1))+(LOG(FXQS)-LOG(FXQS(-1)))))*(1.0+JRFVMQS))*(1.0-DFVMQS)+DFVMQS* ZFVMQS$ FRML JLED JRFVMQS =FVMQS/(EXP(LOG(FVMQS(-1))+(LOG(FXQS)-LOG(FXQS(-1)))))-1.0$ FRML EXO ZFVMQS =FVMQS$ FRML _GJRDF FVMQT =((EXP(LOG(FVMQT(-1))+(LOG(FXQT)-LOG(FXQT(-1)))))*(1.0+JRFVMQT))*(1.0-DFVMQT)+DFVMQT* ZFVMQT$ FRML JLED JRFVMQT =FVMQT/(EXP(LOG(FVMQT(-1))+(LOG(FXQT)-LOG(FXQT(-1)))))-1.0$ FRML EXO ZFVMQT =FVMQT$ FRML _GJRDF FVMQF =((EXP(LOG(FVMQF(-1))+(LOG(FXQF)-LOG(FXQF(-1)))))*(1.0+JRFVMQF))*(1.0-DFVMQF)+DFVMQF* ZFVMQF$ FRML JLED JRFVMQF =FVMQF/(EXP(LOG(FVMQF(-1))+(LOG(FXQF)-LOG(FXQF(-1)))))-1.0$ FRML EXO ZFVMQF =FVMQF$ FRML _GJRDF FVMQQ =((EXP(LOG(FVMQQ(-1))+(LOG(FXQQ)-LOG(FXQQ(-1)))))*(1.0+JRFVMQQ))*(1.0-DFVMQQ)+DFVMQQ* ZFVMQQ$ FRML JLED JRFVMQQ =FVMQQ/(EXP(LOG(FVMQQ(-1))+(LOG(FXQQ)-LOG(FXQQ(-1)))))-1.0$ FRML EXO ZFVMQQ =FVMQQ$ FRML _GJRDF FVMH =((EXP(LOG(FVMH(-1))+(LOG(FXH)-LOG(FXH(-1)))))*(1.0+JRFVMH))*(1.0-DFVMH)+DFVMH*ZFVMH$ FRML JLED JRFVMH =FVMH/(EXP(LOG(FVMH(-1))+(LOG(FXH)-LOG(FXH(-1)))))-1.0$ FRML EXO ZFVMH =FVMH$ FRML _GJRDF FVMO =((FVMO(-1)*FYFO/FYFO(-1)+FVMOX+JDFVMO)*(1.0+JRFVMO))*(1.0-DFVMO)+DFVMO*ZFVMO$ FRML JLED JRFVMO =FVMO/(FVMO(-1)*FYFO/FYFO(-1)+FVMOX+JDFVMO)-1.0$ FRML EXO ZFVMO =FVMO$ 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$ FRML _I FYFA =(FXA*PXA(-1)-(FVMA+FVEA)*VA(-1)/(FVMA(-1)+FVEA(-1)))/PYFA(-1)$ FRML _I FYFE =(FXE*PXE(-1)-(FVME+FVEE)*VE(-1)/(FVME(-1)+FVEE(-1)))/PYFE(-1)$ FRML _I FYFNG =(FXNG*PXNG(-1)-(FVMNG+FVENG)*VNG(-1)/(FVMNG(-1)+FVENG(-1)))/PYFNG(-1)$ FRML _I FYFNE =(FXNE*PXNE(-1)-(FVMNE+FVENE)*VNE(-1)/(FVMNE(-1)+FVENE(-1)))/PYFNE(-1)$ FRML _I FYFNF =(FXNF*PXNF(-1)-(FVMNF+FVENF)*VNF(-1)/(FVMNF(-1)+FVENF(-1)))/PYFNF(-1)$ FRML _I FYFNN =(FXNN*PXNN(-1)-(FVMNN+FVENN)*VNN(-1)/(FVMNN(-1)+FVENN(-1)))/PYFNN(-1)$ FRML _I FYFNB =(FXNB*PXNB(-1)-(FVMNB+FVENB)*VNB(-1)/(FVMNB(-1)+FVENB(-1)))/PYFNB(-1)$ FRML _I FYFNM =(FXNM*PXNM(-1)-(FVMNM+FVENM)*VNM(-1)/(FVMNM(-1)+FVENM(-1)))/PYFNM(-1)$ FRML _I FYFNT =(FXNT*PXNT(-1)-(FVMNT+FVENT)*VNT(-1)/(FVMNT(-1)+FVENT(-1)))/PYFNT(-1)$ FRML _I FYFNK =(FXNK*PXNK(-1)-(FVMNK+FVENK)*VNK(-1)/(FVMNK(-1)+FVENK(-1)))/PYFNK(-1)$ FRML _I FYFNQ =(FXNQ*PXNQ(-1)-(FVMNQ+FVENQ)*VNQ(-1)/(FVMNQ(-1)+FVENQ(-1)))/PYFNQ(-1)$ FRML _I FYFB =(FXB*PXB(-1)-(FVMB+FVEB)*VB(-1)/(FVMB(-1)+FVEB(-1)))/PYFB(-1)$ FRML _I FYFQH =(FXQH*PXQH(-1)-(FVMQH+FVEQH)*VQH(-1)/(FVMQH(-1)+FVEQH(-1)))/PYFQH(-1)$ FRML _I FYFQS =(FXQS*PXQS(-1)-(FVMQS+FVEQS)*VQS(-1)/(FVMQS(-1)+FVEQS(-1)))/PYFQS(-1)$ FRML _I FYFQT =(FXQT*PXQT(-1)-(FVMQT+FVEQT)*VQT(-1)/(FVMQT(-1)+FVEQT(-1)))/PYFQT(-1)$ FRML _I FYFQF =(FXQF*PXQF(-1)-(FVMQF+FVEQF)*VQF(-1)/(FVMQF(-1)+FVEQF(-1)))/PYFQF(-1)$ FRML _I FYFQQ =(FXQQ*PXQQ(-1)-(FVMQQ+FVEQQ)*VQQ(-1)/(FVMQQ(-1)+FVEQQ(-1)))/PYFQQ(-1)$ FRML _I FYFH =(FXH*PXH(-1)-(FVMH+FVEH)*VH(-1)/(FVMH(-1)+FVEH(-1)))/PYFH(-1)$ FRML _I FYFN =(FYFNG*PYFNG(-1)+FYFNE*PYFNE(-1)+FYFNF*PYFNF(-1)+FYFNN*PYFNN(-1)+FYFNB*PYFNB(-1)+ FYFNM*PYFNM(-1)+FYFNT*PYFNT(-1)+FYFNK*PYFNK(-1)+FYFNQ*PYFNQ(-1))/ PYFN(-1)$ FRML _I FYF =(FYFA*PYFA(-1)+FYFE*PYFE(-1)+FYFNG*PYFNG(-1)+FYFNE*PYFNE(-1)+FYFNF*PYFNF(-1)+FYFNN* PYFNN(-1)+FYFNB*PYFNB(-1)+FYFNM*PYFNM(-1)+FYFNT*PYFNT(-1)+FYFNK* PYFNK(-1)+FYFNQ*PYFNQ(-1)+FYFB*PYFB(-1)+FYFQH*PYFQH(-1)+FYFQS*PYFQS(-1) +FYFQT*PYFQT(-1)+FYFQF*PYFQF(-1)+FYFQQ*PYFQQ(-1)+FYFH*PYFH(-1)+FYFO* PYFO(-1))/PYF(-1)$ FRML _DJ_D RPIMAE =(0.25*RPIMAE(-1)+0.75*(PIMA/PIMA(-1)-1.)+JRPIMAE)*(1.0-DRPIMAE)+DRPIMAE*ZRPIMAE$ FRML JLED JRPIMAE =RPIMAE-(0.25*RPIMAE(-1)+0.75*(PIMA/PIMA(-1)-1.))$ FRML EXO ZRPIMAE =RPIMAE$ FRML _DJRD YCMA =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMA+(KNMA(-1)+0.5*INMA)*((1.-TSDSU1)*IWLO-0.5* RPIMAE)))*(1.0+JRYCMA))*(1.0-DYCMA)+DYCMA*ZYCMA$ FRML JLED JRYCMA =YCMA/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMA+(KNMA(-1)+0.5*INMA)*((1.-TSDSU1)*IWLO-0.5* RPIMAE)))-1.0$ FRML EXO ZYCMA =YCMA$ FRML _D UIMA =YCMA/(0.5*FKMA(-1)+0.5*FKMA)$ FRML _DJRD FKMAW1 =(((1./DTFKMA1)*0.29543**(0.51000/(1.-0.51000))*(((FXA-HOSTKOR)/68665.63080)/1.09417)*( (((LA1*154.69099)/(UIMA*117304.00000))*(DTFKMA1/DTHQA1))**(1.-0.51000) *((1.-0.29543)/0.29543)**0.51000+1.)**(0.51000/(1.-0.51000))*117304.00000 )*(1.0+JRFKMAW1))*(1.0-DFKMAW1)+DFKMAW1*ZFKMAW1$ FRML JLED JRFKMAW1 =FKMAW1/((1./DTFKMA1)*0.29543**(0.51000/(1.-0.51000))*(((FXA-HOSTKOR)/68665.63080)/1.09417 )*((((LA1*154.69099)/(UIMA*117304.00000))*(DTFKMA1/DTHQA1))**(1.-0.51000 )*((1.-0.29543)/0.29543)**0.51000+1.)**(0.51000/(1.-0.51000))*117304.00000 )-1.0$ FRML EXO ZFKMAW1 =FKMAW1$ FRML _SJRDF FKMA =((EXP(LOG(FKMA(-1))+0.14000*(LOG(FKMAW1)-LOG(FKMAW1(-1)))+0.24105*(LOG(FKMAW1(-1))-LOG (FKMA(-1)))+ROFKMA1*((LOG(FKMA(-1))-LOG(FKMA(-2)))-0.14000*(LOG( FKMAW1(-1))-LOG(FKMAW1(-2)))-0.24105*(LOG(FKMAW1(-2))-LOG(FKMA(-2)))) ))*(1.0+JRFKMA))*(1.0-DFKMA)+DFKMA*ZFKMA$ FRML JLED JRFKMA =FKMA/(EXP(LOG(FKMA(-1))+0.14000*(LOG(FKMAW1)-LOG(FKMAW1(-1)))+0.24105*(LOG(FKMAW1(-1) )-LOG(FKMA(-1)))+ROFKMA1*((LOG(FKMA(-1))-LOG(FKMA(-2)))-0.14000*(LOG( FKMAW1(-1))-LOG(FKMAW1(-2)))-0.24105*(LOG(FKMAW1(-2))-LOG(FKMA(-2)))) ))-1.0$ FRML EXO ZFKMA =FKMA$ FRML _DJRD FKMAK =((FKMA)*(1.0+JRFKMAK))*(1.0-DFKMAK)+DFKMAK*ZFKMAK$ FRML JLED JRFKMAK =FKMAK/(FKMA)-1.0$ FRML EXO ZFKMAK =FKMAK$ FRML _KJRD FIMA =((KFIMA*(((FKMA)-(FKMA(-1)))+BIVMA*FKMA(-1)))*(1.0+JRFIMA))*(1.0-DFIMA)+DFIMA*ZFIMA$ FRML JLED JRFIMA =FIMA/(KFIMA*(((FKMA)-(FKMA(-1)))+BIVMA*FKMA(-1)))-1.0$ FRML EXO ZFIMA =FIMA$ FRML _I IMA =FIMA*PIMA$ FRML _GJ_D OKNMA =((PIMA/PIMA(-1)-1.)*(KNMA(-1)+0.5*INMA)+JOKNMA)*(1.0-DOKNMA)+DOKNMA*ZOKNMA$ FRML JLED JOKNMA =OKNMA-((PIMA/PIMA(-1)-1.)*(KNMA(-1)+0.5*INMA))$ FRML EXO ZOKNMA =OKNMA$ FRML _GJRD INVMA =(((PIMA/(0.5*PIMA(-1)+0.5*PIMA))*BINVMA*KNMA(-1))*(1.0+JRINVMA))*(1.0-DINVMA)+DINVMA* ZINVMA$ FRML JLED JRINVMA =INVMA/((PIMA/(0.5*PIMA(-1)+0.5*PIMA))*BINVMA*KNMA(-1))-1.0$ FRML EXO ZINVMA =INVMA$ FRML _I INMA =IMA-INVMA$ FRML _I KNMA =KNMA(-1)+INMA+OKNMA$ FRML _DJRD HQAN1 =(((1./DTHQA1)*((1./(1.-0.29543))*(((FXA-HOSTKOR)/68665.63080)/1.09417)**(-(1./0.51000- 1.))-(0.29543/(1.-0.29543))*(DTFKMA1*FKMAK/117304.00000)**(-(1./0.51000 -1.)))**(-(1./(1./0.51000-1.)))*154.69099)*(1.0+JRHQAN1))*(1.0-DHQAN1) +DHQAN1*ZHQAN1$ FRML JLED JRHQAN1 =HQAN1/((1./DTHQA1)*((1./(1.-0.29543))*(((FXA-HOSTKOR)/68665.63080)/1.09417)**(-(1./0.51000 -1.))-(0.29543/(1.-0.29543))*(DTFKMA1*FKMAK/117304.00000)**(-(1./0.51000 -1.)))**(-(1./(1./0.51000-1.)))*154.69099)-1.0$ FRML EXO ZHQAN1 =HQAN1$ FRML _SJRDF HQA1 =((EXP(0.44413*(LOG(HQAN1)-LOG(HGA))+LOG(HGA)+(1.-0.44413+(-0.37743))*(LOG(HQAN1(-1))- LOG(HGA(-1)))-(-0.37743)*(LOG(HQAN1(-2))-LOG(HGA(-2)))+ROHQA1*(LOG( HQA1(-1))-(0.44413*(LOG(HQAN1(-1))-LOG(HGA(-1)))+(1.-0.44413+(-0.37743 ))*(LOG(HQAN1(-2))-LOG(HGA(-2)))-(-0.37743)*(LOG(HQAN1(-3))-LOG(HGA(-3) ))+LOG(HGA(-1))))))*(1.0+JRHQA1))*(1.0-DHQA1)+DHQA1*ZHQA1$ FRML JLED JRHQA1 =HQA1/(EXP(0.44413*(LOG(HQAN1)-LOG(HGA))+LOG(HGA)+(1.-0.44413+(-0.37743))*(LOG(HQAN1(-1) )-LOG(HGA(-1)))-(-0.37743)*(LOG(HQAN1(-2))-LOG(HGA(-2)))+ROHQA1*(LOG( HQA1(-1))-(0.44413*(LOG(HQAN1(-1))-LOG(HGA(-1)))+(1.-0.44413+(-0.37743 ))*(LOG(HQAN1(-2))-LOG(HGA(-2)))-(-0.37743)*(LOG(HQAN1(-3))-LOG(HGA(-3) ))+LOG(HGA(-1))))))-1.0$ FRML EXO ZHQA1 =HQA1$ FRML _DJRD QA1 =((HQA1/(BQSA1*HGSA+(1.-BQSA1)*HGWA)*1000.)*(1.0+JRQA1))*(1.0-DQA1)+DQA1*ZQA1$ FRML JLED JRQA1 =QA1/(HQA1/(BQSA1*HGSA+(1.-BQSA1)*HGWA)*1000.)-1.0$ FRML EXO ZQA1 =QA1$ 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.)*(1.0+JRLA1)$ FRML JLED JRLA1 =LA1/((YWA1+SIQAL)/(QWA1*HGWA)*1000.)-1.0$ FRML _DJRD HQAW1 =(((1./DTHQA1)*(1.-0.29543)**(0.51000/(1.-0.51000))*(((FXA-HOSTKOR)/68665.63080)/1.09417 )*((((UIMA*117304.00000)/(LA1*154.69099))*(DTHQA1/DTFKMA1))**(1.-0.51000 )*(0.29543/(1.-0.29543))**0.51000+1.)**(0.51000/(1.-0.51000))*154.69099 )*(1.0+JRHQAW1))*(1.0-DHQAW1)+DHQAW1*ZHQAW1$ FRML JLED JRHQAW1 =HQAW1/((1./DTHQA1)*(1.-0.29543)**(0.51000/(1.-0.51000))*(((FXA-HOSTKOR)/68665.63080)/1.09417 )*((((UIMA*117304.00000)/(LA1*154.69099))*(DTHQA1/DTFKMA1))**(1.-0.51000 )*(0.29543/(1.-0.29543))**0.51000+1.)**(0.51000/(1.-0.51000))*154.69099 )-1.0$ FRML EXO ZHQAW1 =HQAW1$ FRML _DJ_D RPIMNGE =(0.25*RPIMNGE(-1)+0.75*(PIMNG/PIMNG(-1)-1.)+JRPIMNGE)*(1.0-DRPIMNGE)+DRPIMNGE* ZRPIMNGE$ FRML JLED JRPIMNGE =RPIMNGE-(0.25*RPIMNGE(-1)+0.75*(PIMNG/PIMNG(-1)-1.))$ FRML EXO ZRPIMNGE =RPIMNGE$ FRML _DJRD YCMNG =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNG+(KNMNG(-1)+0.5*INMNG)*((1.-TSDSU1)*IWLO-0.5* RPIMNGE)))*(1.0+JRYCMNG))*(1.0-DYCMNG)+DYCMNG*ZYCMNG$ FRML JLED JRYCMNG =YCMNG/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNG+(KNMNG(-1)+0.5*INMNG)*((1.-TSDSU1)*IWLO- 0.5*RPIMNGE)))-1.0$ FRML EXO ZYCMNG =YCMNG$ FRML _D UIMNG =YCMNG/(0.5*FKMNG(-1)+0.5*FKMNG)$ FRML _DJRD FKMNGW1 =(((1./DTFKMNG1)*0.76159**(0.16000/(1.-0.16000))*((FXNG/19023.00000)/0.97537)*((((LNG1* 1.04300)/(UIMNG*13496.00000))*(DTFKMNG1/DTHQNG1))**(1.-0.16000)*((1.-0.76159 )/0.76159)**0.16000+1.)**(0.16000/(1.-0.16000))*13496.00000)*(1.0+ JRFKMNGW1))*(1.0-DFKMNGW1)+DFKMNGW1*ZFKMNGW1$ FRML JLED JRFKMNGW1 =FKMNGW1/((1./DTFKMNG1)*0.76159**(0.16000/(1.-0.16000))*((FXNG/19023.00000)/0.97537)*(( ((LNG1*1.04300)/(UIMNG*13496.00000))*(DTFKMNG1/DTHQNG1))**(1.-0.16000) *((1.-0.76159)/0.76159)**0.16000+1.)**(0.16000/(1.-0.16000))*13496.00000 )-1.0$ FRML EXO ZFKMNGW1 =FKMNGW1$ FRML _SJRDF FKMNG =((EXP(LOG(FKMNG(-1))+0.20*(LOG(FKMNGW1)-LOG(FKMNGW1(-1)))+0.20*(LOG(FKMNGW1(-1))-LOG( FKMNGW1(-2)))+0.20*(LOG(FKMNGW1(-2))-LOG(FKMNGW1(-3)))+0.20*(LOG( FKMNGW1(-3))-LOG(FKMNGW1(-4)))+0.20*(LOG(FKMNGW1(-4))-LOG(FKMNGW1(-5) ))))*(1.0+JRFKMNG))*(1.0-DFKMNG)+DFKMNG*ZFKMNG$ FRML JLED JRFKMNG =FKMNG/(EXP(LOG(FKMNG(-1))+0.20*(LOG(FKMNGW1)-LOG(FKMNGW1(-1)))+0.20*(LOG(FKMNGW1(-1)) -LOG(FKMNGW1(-2)))+0.20*(LOG(FKMNGW1(-2))-LOG(FKMNGW1(-3)))+0.20*(LOG (FKMNGW1(-3))-LOG(FKMNGW1(-4)))+0.20*(LOG(FKMNGW1(-4))-LOG(FKMNGW1(-5) ))))-1.0$ FRML EXO ZFKMNG =FKMNG$ FRML _KJRD FIMNG =((KFIMNG*(((FKMNG)-(FKMNG(-1)))+BIVMNG*FKMNG(-1)))*(1.0+JRFIMNG))*(1.0-DFIMNG)+ DFIMNG*ZFIMNG$ FRML JLED JRFIMNG =FIMNG/(KFIMNG*(((FKMNG)-(FKMNG(-1)))+BIVMNG*FKMNG(-1)))-1.0$ FRML EXO ZFIMNG =FIMNG$ FRML _I IMNG =FIMNG*PIMNG$ FRML _GJ_D OKNMNG =((PIMNG/PIMNG(-1)-1.)*(KNMNG(-1)+0.5*INMNG)+JOKNMNG)*(1.0-DOKNMNG)+DOKNMNG*ZOKNMNG$ FRML JLED JOKNMNG =OKNMNG-((PIMNG/PIMNG(-1)-1.)*(KNMNG(-1)+0.5*INMNG))$ FRML EXO ZOKNMNG =OKNMNG$ FRML _GJRD INVMNG =(((PIMNG/(0.5*PIMNG(-1)+0.5*PIMNG))*BINVMNG*KNMNG(-1))*(1.0+JRINVMNG))*(1.0-DINVMNG)+ DINVMNG*ZINVMNG$ FRML JLED JRINVMNG =INVMNG/((PIMNG/(0.5*PIMNG(-1)+0.5*PIMNG))*BINVMNG*KNMNG(-1))-1.0$ FRML EXO ZINVMNG =INVMNG$ FRML _I INMNG =IMNG-INVMNG$ FRML _I KNMNG =KNMNG(-1)+INMNG+OKNMNG$ FRML _DJRD HQNGW1 =(((1./DTHQNG1)*(1.-0.76159)**(0.16000/(1.-0.16000))*((FXNG/19023.00000)/0.97537)*(((( UIMNG*13496.00000)/(LNG1*1.04300))*(DTHQNG1/DTFKMNG1))**(1.-0.16000)*( 0.76159/(1.-0.76159))**0.16000+1.)**(0.16000/(1.-0.16000))*1.04300)*(1.0 +JRHQNGW1))*(1.0-DHQNGW1)+DHQNGW1*ZHQNGW1$ FRML JLED JRHQNGW1 =HQNGW1/((1./DTHQNG1)*(1.-0.76159)**(0.16000/(1.-0.16000))*((FXNG/19023.00000)/0.97537) *((((UIMNG*13496.00000)/(LNG1*1.04300))*(DTHQNG1/DTFKMNG1))**(1.-0.16000 )*(0.76159/(1.-0.76159))**0.16000+1.)**(0.16000/(1.-0.16000))*1.04300)- 1.0$ FRML EXO ZHQNGW1 =HQNGW1$ FRML _SJRDF HQNG1 =((EXP(LOG(HQNG1(-1))+0.65*((LOG(HQNGW1)-LOG(HQNGW1(-1)))-(LOG(HGNG)-LOG(HGNG(-1))))+( LOG(HGNG)-LOG(HGNG(-1)))+0.20*((LOG(HQNGW1(-1))-LOG(HQNGW1(-2)))-(LOG (HGNG(-1))-LOG(HGNG(-2))))+0.15*((LOG(HQNGW1(-2))-LOG(HQNGW1(-3)))-(LOG (HGNG(-2))-LOG(HGNG(-3))))))*(1.0+JRHQNG1))*(1.0-DHQNG1)+DHQNG1* ZHQNG1$ FRML JLED JRHQNG1 =HQNG1/(EXP(LOG(HQNG1(-1))+0.65*((LOG(HQNGW1)-LOG(HQNGW1(-1)))-(LOG(HGNG)-LOG(HGNG(-1) )))+(LOG(HGNG)-LOG(HGNG(-1)))+0.20*((LOG(HQNGW1(-1))-LOG(HQNGW1(-2))) -(LOG(HGNG(-1))-LOG(HGNG(-2))))+0.15*((LOG(HQNGW1(-2))-LOG(HQNGW1(-3) ))-(LOG(HGNG(-2))-LOG(HGNG(-3))))))-1.0$ FRML EXO ZHQNG1 =HQNG1$ FRML _DJRD QNG1 =((HQNG1/(BQSNG1*HGSNG+(1.-BQSNG1)*HGWNG)*1000.)*(1.0+JRQNG1))*(1.0-DQNG1)+DQNG1* ZQNG1$ FRML JLED JRQNG1 =QNG1/(HQNG1/(BQSNG1*HGSNG+(1.-BQSNG1)*HGWNG)*1000.)-1.0$ FRML EXO ZQNG1 =QNG1$ 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.)*(1.0+JRLNG1)$ FRML JLED JRLNG1 =LNG1/((YWNG1+SIQNGL)/(QWNG1*HGWNG)*1000.)-1.0$ FRML _DJ_D RPIMNFE =(0.25*RPIMNFE(-1)+0.75*(PIMNF/PIMNF(-1)-1.)+JRPIMNFE)*(1.0-DRPIMNFE)+DRPIMNFE* ZRPIMNFE$ FRML JLED JRPIMNFE =RPIMNFE-(0.25*RPIMNFE(-1)+0.75*(PIMNF/PIMNF(-1)-1.))$ FRML EXO ZRPIMNFE =RPIMNFE$ FRML _DJRD YCMNF =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNF+(KNMNF(-1)+0.5*INMNF)*((1.-TSDSU1)*IWLO-0.5* RPIMNFE)))*(1.0+JRYCMNF))*(1.0-DYCMNF)+DYCMNF*ZYCMNF$ FRML JLED JRYCMNF =YCMNF/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNF+(KNMNF(-1)+0.5*INMNF)*((1.-TSDSU1)*IWLO- 0.5*RPIMNFE)))-1.0$ FRML EXO ZYCMNF =YCMNF$ FRML _D UIMNF =YCMNF/(0.5*FKMNF(-1)+0.5*FKMNF)$ FRML _DJRD FKMNFW1 =(((1./DTFKMNF1)*0.26547**(0.39545/(1.-0.39545))*((FXNF/104171.00000)/1.12177)*(((( LNF1*108.41100)/(UIMNF*54689.80859))*(DTFKMNF1/DTHQNF1))**(1.-0.39545) *((1.-0.26547)/0.26547)**0.39545+1.)**(0.39545/(1.-0.39545))*54689.80859 )*(1.0+JRFKMNFW1))*(1.0-DFKMNFW1)+DFKMNFW1*ZFKMNFW1$ FRML JLED JRFKMNFW1 =FKMNFW1/((1./DTFKMNF1)*0.26547**(0.39545/(1.-0.39545))*((FXNF/104171.00000)/1.12177)*( (((LNF1*108.41100)/(UIMNF*54689.80859))*(DTFKMNF1/DTHQNF1))**(1.-0.39545 )*((1.-0.26547)/0.26547)**0.39545+1.)**(0.39545/(1.-0.39545))*54689.80859 )-1.0$ FRML EXO ZFKMNFW1 =FKMNFW1$ FRML _SJRDF FKMNF =((EXP(LOG(FKMNF(-1))+0.15749*(LOG(FKMNFW1)-LOG(FKMNFW1(-1)))+0.19393*(LOG(FKMNFW1(-1) )-LOG(FKMNF(-1)))+ROFKMNF1*((LOG(FKMNF(-1))-LOG(FKMNF(-2)))-0.15749*( LOG(FKMNFW1(-1))-LOG(FKMNFW1(-2)))-0.19393*(LOG(FKMNFW1(-2))-LOG( FKMNF(-2))))))*(1.0+JRFKMNF))*(1.0-DFKMNF)+DFKMNF*ZFKMNF$ FRML JLED JRFKMNF =FKMNF/(EXP(LOG(FKMNF(-1))+0.15749*(LOG(FKMNFW1)-LOG(FKMNFW1(-1)))+0.19393*(LOG( FKMNFW1(-1))-LOG(FKMNF(-1)))+ROFKMNF1*((LOG(FKMNF(-1))-LOG(FKMNF(-2)) )-0.15749*(LOG(FKMNFW1(-1))-LOG(FKMNFW1(-2)))-0.19393*(LOG(FKMNFW1(-2) )-LOG(FKMNF(-2))))))-1.0$ FRML EXO ZFKMNF =FKMNF$ FRML _DJRD FKMNFK =((FKMNF)*(1.0+JRFKMNFK))*(1.0-DFKMNFK)+DFKMNFK*ZFKMNFK$ FRML JLED JRFKMNFK =FKMNFK/(FKMNF)-1.0$ FRML EXO ZFKMNFK =FKMNFK$ FRML _KJRD FIMNF =((KFIMNF*(((FKMNF)-(FKMNF(-1)))+BIVMNF*FKMNF(-1)))*(1.0+JRFIMNF))*(1.0-DFIMNF)+ DFIMNF*ZFIMNF$ FRML JLED JRFIMNF =FIMNF/(KFIMNF*(((FKMNF)-(FKMNF(-1)))+BIVMNF*FKMNF(-1)))-1.0$ FRML EXO ZFIMNF =FIMNF$ FRML _I IMNF =FIMNF*PIMNF$ FRML _GJ_D OKNMNF =((PIMNF/PIMNF(-1)-1.)*(KNMNF(-1)+0.5*INMNF)+JOKNMNF)*(1.0-DOKNMNF)+DOKNMNF*ZOKNMNF$ FRML JLED JOKNMNF =OKNMNF-((PIMNF/PIMNF(-1)-1.)*(KNMNF(-1)+0.5*INMNF))$ FRML EXO ZOKNMNF =OKNMNF$ FRML _GJRD INVMNF =(((PIMNF/(0.5*PIMNF(-1)+0.5*PIMNF))*BINVMNF*KNMNF(-1))*(1.0+JRINVMNF))*(1.0-DINVMNF)+ DINVMNF*ZINVMNF$ FRML JLED JRINVMNF =INVMNF/((PIMNF/(0.5*PIMNF(-1)+0.5*PIMNF))*BINVMNF*KNMNF(-1))-1.0$ FRML EXO ZINVMNF =INVMNF$ FRML _I INMNF =IMNF-INVMNF$ FRML _I KNMNF =KNMNF(-1)+INMNF+OKNMNF$ FRML _DJRD HQNFN1 =(((1./DTHQNF1)*((1./(1.-0.26547))*((FXNF/104171.00000)/1.12177)**(-(1./0.39545-1.))-(0.26547 /(1.-0.26547))*(DTFKMNF1*FKMNFK/54689.80859)**(-(1./0.39545-1.)))**(-(1. /(1./0.39545-1.)))*108.41100)*(1.0+JRHQNFN1))*(1.0-DHQNFN1)+DHQNFN1* ZHQNFN1$ FRML JLED JRHQNFN1 =HQNFN1/((1./DTHQNF1)*((1./(1.-0.26547))*((FXNF/104171.00000)/1.12177)**(-(1./0.39545-1. ))-(0.26547/(1.-0.26547))*(DTFKMNF1*FKMNFK/54689.80859)**(-(1./0.39545 -1.)))**(-(1./(1./0.39545-1.)))*108.41100)-1.0$ FRML EXO ZHQNFN1 =HQNFN1$ FRML _SJRDF HQNF1 =((EXP(0.55635*(LOG(HQNFN1)-LOG(HGNF))+LOG(HGNF)+(1.-0.55635+(-0.37380))*(LOG(HQNFN1(-1) )-LOG(HGNF(-1)))-(-0.37380)*(LOG(HQNFN1(-2))-LOG(HGNF(-2)))+ROHQNF1*( LOG(HQNF1(-1))-(0.55635*(LOG(HQNFN1(-1))-LOG(HGNF(-1)))+(1.-0.55635+( -0.37380))*(LOG(HQNFN1(-2))-LOG(HGNF(-2)))-(-0.37380)*(LOG(HQNFN1(-3) )-LOG(HGNF(-3)))+LOG(HGNF(-1))))))*(1.0+JRHQNF1))*(1.0-DHQNF1)+ DHQNF1*ZHQNF1$ FRML JLED JRHQNF1 =HQNF1/(EXP(0.55635*(LOG(HQNFN1)-LOG(HGNF))+LOG(HGNF)+(1.-0.55635+(-0.37380))*(LOG( HQNFN1(-1))-LOG(HGNF(-1)))-(-0.37380)*(LOG(HQNFN1(-2))-LOG(HGNF(-2))) +ROHQNF1*(LOG(HQNF1(-1))-(0.55635*(LOG(HQNFN1(-1))-LOG(HGNF(-1)))+(1. -0.55635+(-0.37380))*(LOG(HQNFN1(-2))-LOG(HGNF(-2)))-(-0.37380)*(LOG( HQNFN1(-3))-LOG(HGNF(-3)))+LOG(HGNF(-1))))))-1.0$ FRML EXO ZHQNF1 =HQNF1$ FRML _DJRD QNF1 =((HQNF1/(BQSNF1*HGSNF+(1.-BQSNF1)*HGWNF)*1000.)*(1.0+JRQNF1))*(1.0-DQNF1)+DQNF1* ZQNF1$ FRML JLED JRQNF1 =QNF1/(HQNF1/(BQSNF1*HGSNF+(1.-BQSNF1)*HGWNF)*1000.)-1.0$ FRML EXO ZQNF1 =QNF1$ 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.)*(1.0+JRLNF1)$ FRML JLED JRLNF1 =LNF1/((YWNF1+SIQNFL)/(QWNF1*HGWNF)*1000.)-1.0$ FRML _DJRD HQNFW1 =(((1./DTHQNF1)*(1.-0.26547)**(0.39545/(1.-0.39545))*((FXNF/104171.00000)/1.12177)*(((( UIMNF*54689.80859)/(LNF1*108.41100))*(DTHQNF1/DTFKMNF1))**(1.-0.39545) *(0.26547/(1.-0.26547))**0.39545+1.)**(0.39545/(1.-0.39545))*108.41100) *(1.0+JRHQNFW1))*(1.0-DHQNFW1)+DHQNFW1*ZHQNFW1$ FRML JLED JRHQNFW1 =HQNFW1/((1./DTHQNF1)*(1.-0.26547)**(0.39545/(1.-0.39545))*((FXNF/104171.00000)/1.12177 )*((((UIMNF*54689.80859)/(LNF1*108.41100))*(DTHQNF1/DTFKMNF1))**(1.-0.39545 )*(0.26547/(1.-0.26547))**0.39545+1.)**(0.39545/(1.-0.39545))*108.41100 )-1.0$ FRML EXO ZHQNFW1 =HQNFW1$ FRML _DJ_D RPIMNNE =(0.25*RPIMNNE(-1)+0.75*(PIMNN/PIMNN(-1)-1.)+JRPIMNNE)*(1.0-DRPIMNNE)+DRPIMNNE* ZRPIMNNE$ FRML JLED JRPIMNNE =RPIMNNE-(0.25*RPIMNNE(-1)+0.75*(PIMNN/PIMNN(-1)-1.))$ FRML EXO ZRPIMNNE =RPIMNNE$ FRML _DJRD YCMNN =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNN+(KNMNN(-1)+0.5*INMNN)*((1.-TSDSU1)*IWLO-0.5* RPIMNNE)))*(1.0+JRYCMNN))*(1.0-DYCMNN)+DYCMNN*ZYCMNN$ FRML JLED JRYCMNN =YCMNN/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNN+(KNMNN(-1)+0.5*INMNN)*((1.-TSDSU1)*IWLO- 0.5*RPIMNNE)))-1.0$ FRML EXO ZYCMNN =YCMNN$ FRML _D UIMNN =YCMNN/(0.5*FKMNN(-1)+0.5*FKMNN)$ FRML _DJRD FKMNNW1 =(((1./DTFKMNN1)*0.300710**(0.28/(1.-0.28))*((FXNN/12519.00000)/1.06121)*((((LNN1*12.18000 )/(UIMNN*5894.19189))*(DTFKMNN1/DTHQNN1))**(1.-0.28)*((1.-0.300710)/0.300710 )**0.28+1.)**(0.28/(1.-0.28))*5894.19189)*(1.0+JRFKMNNW1))*(1.0- DFKMNNW1)+DFKMNNW1*ZFKMNNW1$ FRML JLED JRFKMNNW1 =FKMNNW1/((1./DTFKMNN1)*0.300710**(0.28/(1.-0.28))*((FXNN/12519.00000)/1.06121)*(((( LNN1*12.18000)/(UIMNN*5894.19189))*(DTFKMNN1/DTHQNN1))**(1.-0.28)*((1. -0.300710)/0.300710)**0.28+1.)**(0.28/(1.-0.28))*5894.19189)-1.0$ FRML EXO ZFKMNNW1 =FKMNNW1$ FRML _SJRDF FKMNN =((EXP(LOG(FKMNN(-1))+0.124791*(LOG(FKMNNW1)-LOG(FKMNNW1(-1)))+0.20*(LOG(FKMNNW1(-1))- LOG(FKMNN(-1)))+ROFKMNN1*((LOG(FKMNN(-1))-LOG(FKMNN(-2)))-0.124791*(LOG (FKMNNW1(-1))-LOG(FKMNNW1(-2)))-0.20*(LOG(FKMNNW1(-2))-LOG(FKMNN(-2)) ))))*(1.0+JRFKMNN))*(1.0-DFKMNN)+DFKMNN*ZFKMNN$ FRML JLED JRFKMNN =FKMNN/(EXP(LOG(FKMNN(-1))+0.124791*(LOG(FKMNNW1)-LOG(FKMNNW1(-1)))+0.20*(LOG(FKMNNW1(-1) )-LOG(FKMNN(-1)))+ROFKMNN1*((LOG(FKMNN(-1))-LOG(FKMNN(-2)))-0.124791* (LOG(FKMNNW1(-1))-LOG(FKMNNW1(-2)))-0.20*(LOG(FKMNNW1(-2))-LOG(FKMNN(-2) )))))-1.0$ FRML EXO ZFKMNN =FKMNN$ FRML _DJRD FKMNNK =((FKMNN)*(1.0+JRFKMNNK))*(1.0-DFKMNNK)+DFKMNNK*ZFKMNNK$ FRML JLED JRFKMNNK =FKMNNK/(FKMNN)-1.0$ FRML EXO ZFKMNNK =FKMNNK$ FRML _KJRD FIMNN =((KFIMNN*(((FKMNN)-(FKMNN(-1)))+BIVMNN*FKMNN(-1)))*(1.0+JRFIMNN))*(1.0-DFIMNN)+ DFIMNN*ZFIMNN$ FRML JLED JRFIMNN =FIMNN/(KFIMNN*(((FKMNN)-(FKMNN(-1)))+BIVMNN*FKMNN(-1)))-1.0$ FRML EXO ZFIMNN =FIMNN$ FRML _I IMNN =FIMNN*PIMNN$ FRML _GJ_D OKNMNN =((PIMNN/PIMNN(-1)-1.)*(KNMNN(-1)+0.5*INMNN)+JOKNMNN)*(1.0-DOKNMNN)+DOKNMNN*ZOKNMNN$ FRML JLED JOKNMNN =OKNMNN-((PIMNN/PIMNN(-1)-1.)*(KNMNN(-1)+0.5*INMNN))$ FRML EXO ZOKNMNN =OKNMNN$ FRML _GJRD INVMNN =(((PIMNN/(0.5*PIMNN(-1)+0.5*PIMNN))*BINVMNN*KNMNN(-1))*(1.0+JRINVMNN))*(1.0-DINVMNN)+ DINVMNN*ZINVMNN$ FRML JLED JRINVMNN =INVMNN/((PIMNN/(0.5*PIMNN(-1)+0.5*PIMNN))*BINVMNN*KNMNN(-1))-1.0$ FRML EXO ZINVMNN =INVMNN$ FRML _I INMNN =IMNN-INVMNN$ FRML _I KNMNN =KNMNN(-1)+INMNN+OKNMNN$ FRML _DJRD HQNNN1 =(((1./DTHQNN1)*((1./(1.-0.300710))*((FXNN/12519.00000)/1.06121)**(-(1./0.28-1.))-(0.300710 /(1.-0.300710))*(DTFKMNN1*FKMNNK/5894.19189)**(-(1./0.28-1.)))**(-(1./( 1./0.28-1.)))*12.18000)*(1.0+JRHQNNN1))*(1.0-DHQNNN1)+DHQNNN1* ZHQNNN1$ FRML JLED JRHQNNN1 =HQNNN1/((1./DTHQNN1)*((1./(1.-0.300710))*((FXNN/12519.00000)/1.06121)**(-(1./0.28-1.)) -(0.300710/(1.-0.300710))*(DTFKMNN1*FKMNNK/5894.19189)**(-(1./0.28-1.) ))**(-(1./(1./0.28-1.)))*12.18000)-1.0$ FRML EXO ZHQNNN1 =HQNNN1$ FRML _SJRDF HQNN1 =((EXP(0.377797*(LOG(HQNNN1)-LOG(HGNN))+LOG(HGNN)+(1.-0.377797+(-0.326448))*(LOG( HQNNN1(-1))-LOG(HGNN(-1)))-(-0.326448)*(LOG(HQNNN1(-2))-LOG(HGNN(-2)) )+ROHQNN1*(LOG(HQNN1(-1))-(0.377797*(LOG(HQNNN1(-1))-LOG(HGNN(-1)))+( 1.-0.377797+(-0.326448))*(LOG(HQNNN1(-2))-LOG(HGNN(-2)))-(-0.326448)* (LOG(HQNNN1(-3))-LOG(HGNN(-3)))+LOG(HGNN(-1))))))*(1.0+JRHQNN1))*(1.0 -DHQNN1)+DHQNN1*ZHQNN1$ FRML JLED JRHQNN1 =HQNN1/(EXP(0.377797*(LOG(HQNNN1)-LOG(HGNN))+LOG(HGNN)+(1.-0.377797+(-0.326448))*(LOG( HQNNN1(-1))-LOG(HGNN(-1)))-(-0.326448)*(LOG(HQNNN1(-2))-LOG(HGNN(-2)) )+ROHQNN1*(LOG(HQNN1(-1))-(0.377797*(LOG(HQNNN1(-1))-LOG(HGNN(-1)))+( 1.-0.377797+(-0.326448))*(LOG(HQNNN1(-2))-LOG(HGNN(-2)))-(-0.326448)* (LOG(HQNNN1(-3))-LOG(HGNN(-3)))+LOG(HGNN(-1))))))-1.0$ FRML EXO ZHQNN1 =HQNN1$ FRML _DJRD QNN1 =((HQNN1/(BQSNN1*HGSNN+(1.-BQSNN1)*HGWNN)*1000.)*(1.0+JRQNN1))*(1.0-DQNN1)+DQNN1* ZQNN1$ FRML JLED JRQNN1 =QNN1/(HQNN1/(BQSNN1*HGSNN+(1.-BQSNN1)*HGWNN)*1000.)-1.0$ FRML EXO ZQNN1 =QNN1$ 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.)*(1.0+JRLNN1)$ FRML JLED JRLNN1 =LNN1/((YWNN1+SIQNNL)/(QWNN1*HGWNN)*1000.)-1.0$ FRML _DJRD HQNNW1 =(((1./DTHQNN1)*(1.-0.300710)**(0.28/(1.-0.28))*((FXNN/12519.00000)/1.06121)*((((UIMNN* 5894.19189)/(LNN1*12.18000))*(DTHQNN1/DTFKMNN1))**(1.-0.28)*(0.300710/ (1.-0.300710))**0.28+1.)**(0.28/(1.-0.28))*12.18000)*(1.0+JRHQNNW1))*(1.0 -DHQNNW1)+DHQNNW1*ZHQNNW1$ FRML JLED JRHQNNW1 =HQNNW1/((1./DTHQNN1)*(1.-0.300710)**(0.28/(1.-0.28))*((FXNN/12519.00000)/1.06121)*(((( UIMNN*5894.19189)/(LNN1*12.18000))*(DTHQNN1/DTFKMNN1))**(1.-0.28)*(0.300710 /(1.-0.300710))**0.28+1.)**(0.28/(1.-0.28))*12.18000)-1.0$ FRML EXO ZHQNNW1 =HQNNW1$ FRML _DJ_D RPIMNBE =(0.25*RPIMNBE(-1)+0.75*(PIMNB/PIMNB(-1)-1.)+JRPIMNBE)*(1.0-DRPIMNBE)+DRPIMNBE* ZRPIMNBE$ FRML JLED JRPIMNBE =RPIMNBE-(0.25*RPIMNBE(-1)+0.75*(PIMNB/PIMNB(-1)-1.))$ FRML EXO ZRPIMNBE =RPIMNBE$ FRML _DJRD YCMNB =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNB+(KNMNB(-1)+0.5*INMNB)*((1.-TSDSU1)*IWLO-0.5* RPIMNBE)))*(1.0+JRYCMNB))*(1.0-DYCMNB)+DYCMNB*ZYCMNB$ FRML JLED JRYCMNB =YCMNB/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNB+(KNMNB(-1)+0.5*INMNB)*((1.-TSDSU1)*IWLO- 0.5*RPIMNBE)))-1.0$ FRML EXO ZYCMNB =YCMNB$ FRML _D UIMNB =YCMNB/(0.5*FKMNB(-1)+0.5*FKMNB)$ FRML _DJRD FKMNBW1 =(((1./DTFKMNB1)*0.27719**(0.32641/(1.-0.32641))*((FXNB/31585.00000)/1.05009)*((((LNB1* 53.66100)/(UIMNB*26209.85352))*(DTFKMNB1/DTHQNB1))**(1.-0.32641)*((1.- 0.27719)/0.27719)**0.32641+1.)**(0.32641/(1.-0.32641))*26209.85352)*(1.0 +JRFKMNBW1))*(1.0-DFKMNBW1)+DFKMNBW1*ZFKMNBW1$ FRML JLED JRFKMNBW1 =FKMNBW1/((1./DTFKMNB1)*0.27719**(0.32641/(1.-0.32641))*((FXNB/31585.00000)/1.05009)*(( ((LNB1*53.66100)/(UIMNB*26209.85352))*(DTFKMNB1/DTHQNB1))**(1.-0.32641 )*((1.-0.27719)/0.27719)**0.32641+1.)**(0.32641/(1.-0.32641))*26209.85352 )-1.0$ FRML EXO ZFKMNBW1 =FKMNBW1$ FRML _SJRDF FKMNB =((EXP(LOG(FKMNB(-1))+0.082781*(LOG(FKMNBW1)-LOG(FKMNBW1(-1)))+0.20000*(LOG(FKMNBW1(-1) )-LOG(FKMNB(-1)))+ROFKMNB1*((LOG(FKMNB(-1))-LOG(FKMNB(-2)))-0.082781* (LOG(FKMNBW1(-1))-LOG(FKMNBW1(-2)))-0.20000*(LOG(FKMNBW1(-2))-LOG( FKMNB(-2))))))*(1.0+JRFKMNB))*(1.0-DFKMNB)+DFKMNB*ZFKMNB$ FRML JLED JRFKMNB =FKMNB/(EXP(LOG(FKMNB(-1))+0.082781*(LOG(FKMNBW1)-LOG(FKMNBW1(-1)))+0.20000*(LOG( FKMNBW1(-1))-LOG(FKMNB(-1)))+ROFKMNB1*((LOG(FKMNB(-1))-LOG(FKMNB(-2)) )-0.082781*(LOG(FKMNBW1(-1))-LOG(FKMNBW1(-2)))-0.20000*(LOG(FKMNBW1(-2) )-LOG(FKMNB(-2))))))-1.0$ FRML EXO ZFKMNB =FKMNB$ FRML _DJRD FKMNBK =((FKMNB)*(1.0+JRFKMNBK))*(1.0-DFKMNBK)+DFKMNBK*ZFKMNBK$ FRML JLED JRFKMNBK =FKMNBK/(FKMNB)-1.0$ FRML EXO ZFKMNBK =FKMNBK$ FRML _KJRD FIMNB =((KFIMNB*(((FKMNB)-(FKMNB(-1)))+BIVMNB*FKMNB(-1)))*(1.0+JRFIMNB))*(1.0-DFIMNB)+ DFIMNB*ZFIMNB$ FRML JLED JRFIMNB =FIMNB/(KFIMNB*(((FKMNB)-(FKMNB(-1)))+BIVMNB*FKMNB(-1)))-1.0$ FRML EXO ZFIMNB =FIMNB$ FRML _I IMNB =FIMNB*PIMNB$ FRML _GJ_D OKNMNB =((PIMNB/PIMNB(-1)-1.)*(KNMNB(-1)+0.5*INMNB)+JOKNMNB)*(1.0-DOKNMNB)+DOKNMNB*ZOKNMNB$ FRML JLED JOKNMNB =OKNMNB-((PIMNB/PIMNB(-1)-1.)*(KNMNB(-1)+0.5*INMNB))$ FRML EXO ZOKNMNB =OKNMNB$ FRML _GJRD INVMNB =(((PIMNB/(0.5*PIMNB(-1)+0.5*PIMNB))*BINVMNB*KNMNB(-1))*(1.0+JRINVMNB))*(1.0-DINVMNB)+ DINVMNB*ZINVMNB$ FRML JLED JRINVMNB =INVMNB/((PIMNB/(0.5*PIMNB(-1)+0.5*PIMNB))*BINVMNB*KNMNB(-1))-1.0$ FRML EXO ZINVMNB =INVMNB$ FRML _I INMNB =IMNB-INVMNB$ FRML _I KNMNB =KNMNB(-1)+INMNB+OKNMNB$ FRML _DJRD HQNBN1 =(((1./DTHQNB1)*((1./(1.-0.27719))*((FXNB/31585.00000)/1.05009)**(-(1./0.32641-1.))-(0.27719 /(1.-0.27719))*(DTFKMNB1*FKMNBK/26209.85352)**(-(1./0.32641-1.)))**(-(1. /(1./0.32641-1.)))*53.66100)*(1.0+JRHQNBN1))*(1.0-DHQNBN1)+DHQNBN1* ZHQNBN1$ FRML JLED JRHQNBN1 =HQNBN1/((1./DTHQNB1)*((1./(1.-0.27719))*((FXNB/31585.00000)/1.05009)**(-(1./0.32641-1. ))-(0.27719/(1.-0.27719))*(DTFKMNB1*FKMNBK/26209.85352)**(-(1./0.32641 -1.)))**(-(1./(1./0.32641-1.)))*53.66100)-1.0$ FRML EXO ZHQNBN1 =HQNBN1$ FRML _SJRDF HQNB1 =((EXP(0.45941*(LOG(HQNBN1)-LOG(HGNB))+LOG(HGNB)+(1.-0.45941+(-0.21547))*(LOG(HQNBN1(-1) )-LOG(HGNB(-1)))-(-0.21547)*(LOG(HQNBN1(-2))-LOG(HGNB(-2)))+ROHQNB1*( LOG(HQNB1(-1))-(0.45941*(LOG(HQNBN1(-1))-LOG(HGNB(-1)))+(1.-0.45941+( -0.21547))*(LOG(HQNBN1(-2))-LOG(HGNB(-2)))-(-0.21547)*(LOG(HQNBN1(-3) )-LOG(HGNB(-3)))+LOG(HGNB(-1))))))*(1.0+JRHQNB1))*(1.0-DHQNB1)+ DHQNB1*ZHQNB1$ FRML JLED JRHQNB1 =HQNB1/(EXP(0.45941*(LOG(HQNBN1)-LOG(HGNB))+LOG(HGNB)+(1.-0.45941+(-0.21547))*(LOG( HQNBN1(-1))-LOG(HGNB(-1)))-(-0.21547)*(LOG(HQNBN1(-2))-LOG(HGNB(-2))) +ROHQNB1*(LOG(HQNB1(-1))-(0.45941*(LOG(HQNBN1(-1))-LOG(HGNB(-1)))+(1. -0.45941+(-0.21547))*(LOG(HQNBN1(-2))-LOG(HGNB(-2)))-(-0.21547)*(LOG( HQNBN1(-3))-LOG(HGNB(-3)))+LOG(HGNB(-1))))))-1.0$ FRML EXO ZHQNB1 =HQNB1$ FRML _DJRD QNB1 =((HQNB1/(BQSNB1*HGSNB+(1.-BQSNB1)*HGWNB)*1000.)*(1.0+JRQNB1))*(1.0-DQNB1)+DQNB1* ZQNB1$ FRML JLED JRQNB1 =QNB1/(HQNB1/(BQSNB1*HGSNB+(1.-BQSNB1)*HGWNB)*1000.)-1.0$ FRML EXO ZQNB1 =QNB1$ 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.)*(1.0+JRLNB1)$ FRML JLED JRLNB1 =LNB1/((YWNB1+SIQNBL)/(QWNB1*HGWNB)*1000.)-1.0$ FRML _DJRD HQNBW1 =(((1./DTHQNB1)*(1.-0.27719)**(0.32641/(1.-0.32641))*((FXNB/31585.00000)/1.05009)*(((( UIMNB*26209.85352)/(LNB1*53.66100))*(DTHQNB1/DTFKMNB1))**(1.-0.32641)* (0.27719/(1.-0.27719))**0.32641+1.)**(0.32641/(1.-0.32641))*53.66100)*( 1.0+JRHQNBW1))*(1.0-DHQNBW1)+DHQNBW1*ZHQNBW1$ FRML JLED JRHQNBW1 =HQNBW1/((1./DTHQNB1)*(1.-0.27719)**(0.32641/(1.-0.32641))*((FXNB/31585.00000)/1.05009) *((((UIMNB*26209.85352)/(LNB1*53.66100))*(DTHQNB1/DTFKMNB1))**(1.-0.32641 )*(0.27719/(1.-0.27719))**0.32641+1.)**(0.32641/(1.-0.32641))*53.66100) -1.0$ FRML EXO ZHQNBW1 =HQNBW1$ FRML _DJ_D RPIMNME =(0.25*RPIMNME(-1)+0.75*(PIMNM/PIMNM(-1)-1.)+JRPIMNME)*(1.0-DRPIMNME)+DRPIMNME* ZRPIMNME$ FRML JLED JRPIMNME =RPIMNME-(0.25*RPIMNME(-1)+0.75*(PIMNM/PIMNM(-1)-1.))$ FRML EXO ZRPIMNME =RPIMNME$ FRML _DJRD YCMNM =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNM+(KNMNM(-1)+0.5*INMNM)*((1.-TSDSU1)*IWLO-0.5* RPIMNME)))*(1.0+JRYCMNM))*(1.0-DYCMNM)+DYCMNM*ZYCMNM$ FRML JLED JRYCMNM =YCMNM/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNM+(KNMNM(-1)+0.5*INMNM)*((1.-TSDSU1)*IWLO- 0.5*RPIMNME)))-1.0$ FRML EXO ZYCMNM =YCMNM$ FRML _D UIMNM =YCMNM/(0.5*FKMNM(-1)+0.5*FKMNM)$ FRML _DJRD FKMNMW1 =(((1./DTFKMNM1)*0.27303**(0.29399/(1.-0.29399))*((FXNM/170085.00000)/1.09775)*(((( LNM1*285.85101)/(UIMNM*89217.00000))*(DTFKMNM1/DTHQNM1))**(1.-0.29399) *((1.-0.27303)/0.27303)**0.29399+1.)**(0.29399/(1.-0.29399))*89217.00000 )*(1.0+JRFKMNMW1))*(1.0-DFKMNMW1)+DFKMNMW1*ZFKMNMW1$ FRML JLED JRFKMNMW1 =FKMNMW1/((1./DTFKMNM1)*0.27303**(0.29399/(1.-0.29399))*((FXNM/170085.00000)/1.09775)*( (((LNM1*285.85101)/(UIMNM*89217.00000))*(DTFKMNM1/DTHQNM1))**(1.-0.29399 )*((1.-0.27303)/0.27303)**0.29399+1.)**(0.29399/(1.-0.29399))*89217.00000 )-1.0$ FRML EXO ZFKMNMW1 =FKMNMW1$ FRML _SJRDF FKMNM =((EXP(LOG(FKMNM(-1))+0.16872*(LOG(FKMNMW1)-LOG(FKMNMW1(-1)))+0.20000*(LOG(FKMNMW1(-1) )-LOG(FKMNM(-1)))+ROFKMNM1*((LOG(FKMNM(-1))-LOG(FKMNM(-2)))-0.16872*( LOG(FKMNMW1(-1))-LOG(FKMNMW1(-2)))-0.20000*(LOG(FKMNMW1(-2))-LOG( FKMNM(-2))))))*(1.0+JRFKMNM))*(1.0-DFKMNM)+DFKMNM*ZFKMNM$ FRML JLED JRFKMNM =FKMNM/(EXP(LOG(FKMNM(-1))+0.16872*(LOG(FKMNMW1)-LOG(FKMNMW1(-1)))+0.20000*(LOG( FKMNMW1(-1))-LOG(FKMNM(-1)))+ROFKMNM1*((LOG(FKMNM(-1))-LOG(FKMNM(-2)) )-0.16872*(LOG(FKMNMW1(-1))-LOG(FKMNMW1(-2)))-0.20000*(LOG(FKMNMW1(-2) )-LOG(FKMNM(-2))))))-1.0$ FRML EXO ZFKMNM =FKMNM$ FRML _DJRD FKMNMK =((FKMNM)*(1.0+JRFKMNMK))*(1.0-DFKMNMK)+DFKMNMK*ZFKMNMK$ FRML JLED JRFKMNMK =FKMNMK/(FKMNM)-1.0$ FRML EXO ZFKMNMK =FKMNMK$ FRML _KJRD FIMNM =((KFIMNM*(((FKMNM)-(FKMNM(-1)))+BIVMNM*FKMNM(-1)))*(1.0+JRFIMNM))*(1.0-DFIMNM)+ DFIMNM*ZFIMNM$ FRML JLED JRFIMNM =FIMNM/(KFIMNM*(((FKMNM)-(FKMNM(-1)))+BIVMNM*FKMNM(-1)))-1.0$ FRML EXO ZFIMNM =FIMNM$ FRML _I IMNM =FIMNM*PIMNM$ FRML _GJ_D OKNMNM =((PIMNM/PIMNM(-1)-1.)*(KNMNM(-1)+0.5*INMNM)+JOKNMNM)*(1.0-DOKNMNM)+DOKNMNM*ZOKNMNM$ FRML JLED JOKNMNM =OKNMNM-((PIMNM/PIMNM(-1)-1.)*(KNMNM(-1)+0.5*INMNM))$ FRML EXO ZOKNMNM =OKNMNM$ FRML _GJRD INVMNM =(((PIMNM/(0.5*PIMNM(-1)+0.5*PIMNM))*BINVMNM*KNMNM(-1))*(1.0+JRINVMNM))*(1.0-DINVMNM)+ DINVMNM*ZINVMNM$ FRML JLED JRINVMNM =INVMNM/((PIMNM/(0.5*PIMNM(-1)+0.5*PIMNM))*BINVMNM*KNMNM(-1))-1.0$ FRML EXO ZINVMNM =INVMNM$ FRML _I INMNM =IMNM-INVMNM$ FRML _I KNMNM =KNMNM(-1)+INMNM+OKNMNM$ FRML _DJRD HQNMN1 =(((1./DTHQNM1)*((1./(1.-0.27303))*((FXNM/170085.00000)/1.09775)**(-(1./0.29399-1.))-(0.27303 /(1.-0.27303))*(DTFKMNM1*FKMNMK/89217.00000)**(-(1./0.29399-1.)))**(-(1. /(1./0.29399-1.)))*285.85101)*(1.0+JRHQNMN1))*(1.0-DHQNMN1)+DHQNMN1* ZHQNMN1$ FRML JLED JRHQNMN1 =HQNMN1/((1./DTHQNM1)*((1./(1.-0.27303))*((FXNM/170085.00000)/1.09775)**(-(1./0.29399-1. ))-(0.27303/(1.-0.27303))*(DTFKMNM1*FKMNMK/89217.00000)**(-(1./0.29399 -1.)))**(-(1./(1./0.29399-1.)))*285.85101)-1.0$ FRML EXO ZHQNMN1 =HQNMN1$ FRML _SJRDF HQNM1 =((EXP(0.58743*(LOG(HQNMN1)-LOG(HGNM))+LOG(HGNM)+(1.-0.58743+(-0.14880))*(LOG(HQNMN1(-1) )-LOG(HGNM(-1)))-(-0.14880)*(LOG(HQNMN1(-2))-LOG(HGNM(-2)))+ROHQNM1*( LOG(HQNM1(-1))-(0.58743*(LOG(HQNMN1(-1))-LOG(HGNM(-1)))+(1.-0.58743+( -0.14880))*(LOG(HQNMN1(-2))-LOG(HGNM(-2)))-(-0.14880)*(LOG(HQNMN1(-3) )-LOG(HGNM(-3)))+LOG(HGNM(-1))))))*(1.0+JRHQNM1))*(1.0-DHQNM1)+ DHQNM1*ZHQNM1$ FRML JLED JRHQNM1 =HQNM1/(EXP(0.58743*(LOG(HQNMN1)-LOG(HGNM))+LOG(HGNM)+(1.-0.58743+(-0.14880))*(LOG( HQNMN1(-1))-LOG(HGNM(-1)))-(-0.14880)*(LOG(HQNMN1(-2))-LOG(HGNM(-2))) +ROHQNM1*(LOG(HQNM1(-1))-(0.58743*(LOG(HQNMN1(-1))-LOG(HGNM(-1)))+(1. -0.58743+(-0.14880))*(LOG(HQNMN1(-2))-LOG(HGNM(-2)))-(-0.14880)*(LOG( HQNMN1(-3))-LOG(HGNM(-3)))+LOG(HGNM(-1))))))-1.0$ FRML EXO ZHQNM1 =HQNM1$ FRML _DJRD QNM1 =((HQNM1/(BQSNM1*HGSNM+(1.-BQSNM1)*HGWNM)*1000.)*(1.0+JRQNM1))*(1.0-DQNM1)+DQNM1* ZQNM1$ FRML JLED JRQNM1 =QNM1/(HQNM1/(BQSNM1*HGSNM+(1.-BQSNM1)*HGWNM)*1000.)-1.0$ FRML EXO ZQNM1 =QNM1$ 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.)*(1.0+JRLNM1)$ FRML JLED JRLNM1 =LNM1/((YWNM1+SIQNML)/(QWNM1*HGWNM)*1000.)-1.0$ FRML _DJRD HQNMW1 =(((1./DTHQNM1)*(1.-0.27303)**(0.29399/(1.-0.29399))*((FXNM/170085.00000)/1.09775)*(((( UIMNM*89217.00000)/(LNM1*285.85101))*(DTHQNM1/DTFKMNM1))**(1.-0.29399) *(0.27303/(1.-0.27303))**0.29399+1.)**(0.29399/(1.-0.29399))*285.85101) *(1.0+JRHQNMW1))*(1.0-DHQNMW1)+DHQNMW1*ZHQNMW1$ FRML JLED JRHQNMW1 =HQNMW1/((1./DTHQNM1)*(1.-0.27303)**(0.29399/(1.-0.29399))*((FXNM/170085.00000)/1.09775 )*((((UIMNM*89217.00000)/(LNM1*285.85101))*(DTHQNM1/DTFKMNM1))**(1.-0.29399 )*(0.27303/(1.-0.27303))**0.29399+1.)**(0.29399/(1.-0.29399))*285.85101 )-1.0$ FRML EXO ZHQNMW1 =HQNMW1$ FRML _DJ_D RPIMNTE =(0.25*RPIMNTE(-1)+0.75*(PIMNT/PIMNT(-1)-1.)+JRPIMNTE)*(1.0-DRPIMNTE)+DRPIMNTE* ZRPIMNTE$ FRML JLED JRPIMNTE =RPIMNTE-(0.25*RPIMNTE(-1)+0.75*(PIMNT/PIMNT(-1)-1.))$ FRML EXO ZRPIMNTE =RPIMNTE$ FRML _DJRD YCMNT =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNT+(KNMNT(-1)+0.5*INMNT)*((1.-TSDSU1)*IWLO-0.5* RPIMNTE)))*(1.0+JRYCMNT))*(1.0-DYCMNT)+DYCMNT*ZYCMNT$ FRML JLED JRYCMNT =YCMNT/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNT+(KNMNT(-1)+0.5*INMNT)*((1.-TSDSU1)*IWLO- 0.5*RPIMNTE)))-1.0$ FRML EXO ZYCMNT =YCMNT$ FRML _D UIMNT =YCMNT/(0.5*FKMNT(-1)+0.5*FKMNT)$ FRML _DJRD FKMNTW1 =(((1./DTFKMNT1)*0.49605**(0.28450/(1.-0.28450))*((FXNT/17358.00000)/1.09363)*((((LNT1* 27.73400)/(UIMNT*6482.00000))*(DTFKMNT1/DTHQNT1))**(1.-0.28450)*((1.-0.49605 )/0.49605)**0.28450+1.)**(0.28450/(1.-0.28450))*6482.00000)*(1.0+ JRFKMNTW1))*(1.0-DFKMNTW1)+DFKMNTW1*ZFKMNTW1$ FRML JLED JRFKMNTW1 =FKMNTW1/((1./DTFKMNT1)*0.49605**(0.28450/(1.-0.28450))*((FXNT/17358.00000)/1.09363)*(( ((LNT1*27.73400)/(UIMNT*6482.00000))*(DTFKMNT1/DTHQNT1))**(1.-0.28450) *((1.-0.49605)/0.49605)**0.28450+1.)**(0.28450/(1.-0.28450))*6482.00000 )-1.0$ FRML EXO ZFKMNTW1 =FKMNTW1$ FRML _SJRDF FKMNT =((EXP(LOG(FKMNT(-1))+0.17888*(LOG(FKMNTW1)-LOG(FKMNTW1(-1)))+0.28589*(LOG(FKMNTW1(-1) )-LOG(FKMNT(-1)))+ROFKMNT1*((LOG(FKMNT(-1))-LOG(FKMNT(-2)))-0.17888*( LOG(FKMNTW1(-1))-LOG(FKMNTW1(-2)))-0.28589*(LOG(FKMNTW1(-2))-LOG( FKMNT(-2))))))*(1.0+JRFKMNT))*(1.0-DFKMNT)+DFKMNT*ZFKMNT$ FRML JLED JRFKMNT =FKMNT/(EXP(LOG(FKMNT(-1))+0.17888*(LOG(FKMNTW1)-LOG(FKMNTW1(-1)))+0.28589*(LOG( FKMNTW1(-1))-LOG(FKMNT(-1)))+ROFKMNT1*((LOG(FKMNT(-1))-LOG(FKMNT(-2)) )-0.17888*(LOG(FKMNTW1(-1))-LOG(FKMNTW1(-2)))-0.28589*(LOG(FKMNTW1(-2) )-LOG(FKMNT(-2))))))-1.0$ FRML EXO ZFKMNT =FKMNT$ FRML _DJRD FKMNTK =((FKMNT)*(1.0+JRFKMNTK))*(1.0-DFKMNTK)+DFKMNTK*ZFKMNTK$ FRML JLED JRFKMNTK =FKMNTK/(FKMNT)-1.0$ FRML EXO ZFKMNTK =FKMNTK$ FRML _KJRD FIMNT =((KFIMNT*(((FKMNT)-(FKMNT(-1)))+BIVMNT*FKMNT(-1)))*(1.0+JRFIMNT))*(1.0-DFIMNT)+ DFIMNT*ZFIMNT$ FRML JLED JRFIMNT =FIMNT/(KFIMNT*(((FKMNT)-(FKMNT(-1)))+BIVMNT*FKMNT(-1)))-1.0$ FRML EXO ZFIMNT =FIMNT$ FRML _I IMNT =FIMNT*PIMNT$ FRML _GJ_D OKNMNT =((PIMNT/PIMNT(-1)-1.)*(KNMNT(-1)+0.5*INMNT)+JOKNMNT)*(1.0-DOKNMNT)+DOKNMNT*ZOKNMNT$ FRML JLED JOKNMNT =OKNMNT-((PIMNT/PIMNT(-1)-1.)*(KNMNT(-1)+0.5*INMNT))$ FRML EXO ZOKNMNT =OKNMNT$ FRML _GJRD INVMNT =(((PIMNT/(0.5*PIMNT(-1)+0.5*PIMNT))*BINVMNT*KNMNT(-1))*(1.0+JRINVMNT))*(1.0-DINVMNT)+ DINVMNT*ZINVMNT$ FRML JLED JRINVMNT =INVMNT/((PIMNT/(0.5*PIMNT(-1)+0.5*PIMNT))*BINVMNT*KNMNT(-1))-1.0$ FRML EXO ZINVMNT =INVMNT$ FRML _I INMNT =IMNT-INVMNT$ FRML _I KNMNT =KNMNT(-1)+INMNT+OKNMNT$ FRML _DJRD HQNTN1 =(((1./DTHQNT1)*((1./(1.-0.49605))*((FXNT/17358.00000)/1.09363)**(-(1./0.28450-1.))-(0.49605 /(1.-0.49605))*(DTFKMNT1*FKMNTK/6482.00000)**(-(1./0.28450-1.)))**(-(1. /(1./0.28450-1.)))*27.73400)*(1.0+JRHQNTN1))*(1.0-DHQNTN1)+DHQNTN1* ZHQNTN1$ FRML JLED JRHQNTN1 =HQNTN1/((1./DTHQNT1)*((1./(1.-0.49605))*((FXNT/17358.00000)/1.09363)**(-(1./0.28450-1. ))-(0.49605/(1.-0.49605))*(DTFKMNT1*FKMNTK/6482.00000)**(-(1./0.28450- 1.)))**(-(1./(1./0.28450-1.)))*27.73400)-1.0$ FRML EXO ZHQNTN1 =HQNTN1$ FRML _SJRDF HQNT1 =((EXP(0.39777*(LOG(HQNTN1)-LOG(HGNT))+LOG(HGNT)+(1.-0.39777+(-0.20928))*(LOG(HQNTN1(-1) )-LOG(HGNT(-1)))-(-0.20928)*(LOG(HQNTN1(-2))-LOG(HGNT(-2)))+ROHQNT1*( LOG(HQNT1(-1))-(0.39777*(LOG(HQNTN1(-1))-LOG(HGNT(-1)))+(1.-0.39777+( -0.20928))*(LOG(HQNTN1(-2))-LOG(HGNT(-2)))-(-0.20928)*(LOG(HQNTN1(-3) )-LOG(HGNT(-3)))+LOG(HGNT(-1))))))*(1.0+JRHQNT1))*(1.0-DHQNT1)+ DHQNT1*ZHQNT1$ FRML JLED JRHQNT1 =HQNT1/(EXP(0.39777*(LOG(HQNTN1)-LOG(HGNT))+LOG(HGNT)+(1.-0.39777+(-0.20928))*(LOG( HQNTN1(-1))-LOG(HGNT(-1)))-(-0.20928)*(LOG(HQNTN1(-2))-LOG(HGNT(-2))) +ROHQNT1*(LOG(HQNT1(-1))-(0.39777*(LOG(HQNTN1(-1))-LOG(HGNT(-1)))+(1. -0.39777+(-0.20928))*(LOG(HQNTN1(-2))-LOG(HGNT(-2)))-(-0.20928)*(LOG( HQNTN1(-3))-LOG(HGNT(-3)))+LOG(HGNT(-1))))))-1.0$ FRML EXO ZHQNT1 =HQNT1$ FRML _DJRD QNT1 =((HQNT1/(BQSNT1*HGSNT+(1.-BQSNT1)*HGWNT)*1000.)*(1.0+JRQNT1))*(1.0-DQNT1)+DQNT1* ZQNT1$ FRML JLED JRQNT1 =QNT1/(HQNT1/(BQSNT1*HGSNT+(1.-BQSNT1)*HGWNT)*1000.)-1.0$ FRML EXO ZQNT1 =QNT1$ 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.)*(1.0+JRLNT1)$ FRML JLED JRLNT1 =LNT1/((YWNT1+SIQNTL)/(QWNT1*HGWNT)*1000.)-1.0$ FRML _DJRD HQNTW1 =(((1./DTHQNT1)*(1.-0.49605)**(0.28450/(1.-0.28450))*((FXNT/17358.00000)/1.09363)*(((( UIMNT*6482.00000)/(LNT1*27.73400))*(DTHQNT1/DTFKMNT1))**(1.-0.28450)*( 0.49605/(1.-0.49605))**0.28450+1.)**(0.28450/(1.-0.28450))*27.73400)*(1.0 +JRHQNTW1))*(1.0-DHQNTW1)+DHQNTW1*ZHQNTW1$ FRML JLED JRHQNTW1 =HQNTW1/((1./DTHQNT1)*(1.-0.49605)**(0.28450/(1.-0.28450))*((FXNT/17358.00000)/1.09363) *((((UIMNT*6482.00000)/(LNT1*27.73400))*(DTHQNT1/DTFKMNT1))**(1.-0.28450 )*(0.49605/(1.-0.49605))**0.28450+1.)**(0.28450/(1.-0.28450))*27.73400) -1.0$ FRML EXO ZHQNTW1 =HQNTW1$ FRML _DJ_D RPIMNKE =(0.25*RPIMNKE(-1)+0.75*(PIMNK/PIMNK(-1)-1.)+JRPIMNKE)*(1.0-DRPIMNKE)+DRPIMNKE* ZRPIMNKE$ FRML JLED JRPIMNKE =RPIMNKE-(0.25*RPIMNKE(-1)+0.75*(PIMNK/PIMNK(-1)-1.))$ FRML EXO ZRPIMNKE =RPIMNKE$ FRML _DJRD YCMNK =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNK+(KNMNK(-1)+0.5*INMNK)*((1.-TSDSU1)*IWLO-0.5* RPIMNKE)))*(1.0+JRYCMNK))*(1.0-DYCMNK)+DYCMNK*ZYCMNK$ FRML JLED JRYCMNK =YCMNK/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNK+(KNMNK(-1)+0.5*INMNK)*((1.-TSDSU1)*IWLO- 0.5*RPIMNKE)))-1.0$ FRML EXO ZYCMNK =YCMNK$ FRML _D UIMNK =YCMNK/(0.5*FKMNK(-1)+0.5*FKMNK)$ FRML _DJRD FKMNKW1 =(((1./DTFKMNK1)*0.27552**(0.33760/(1.-0.33760))*((FXNK/75161.00000)/1.06813)*((((LNK1* 90.40800)/(UIMNK*61857.62500))*(DTFKMNK1/DTHQNK1))**(1.-0.33760)*((1.- 0.27552)/0.27552)**0.33760+1.)**(0.33760/(1.-0.33760))*61857.62500)*(1.0 +JRFKMNKW1))*(1.0-DFKMNKW1)+DFKMNKW1*ZFKMNKW1$ FRML JLED JRFKMNKW1 =FKMNKW1/((1./DTFKMNK1)*0.27552**(0.33760/(1.-0.33760))*((FXNK/75161.00000)/1.06813)*(( ((LNK1*90.40800)/(UIMNK*61857.62500))*(DTFKMNK1/DTHQNK1))**(1.-0.33760 )*((1.-0.27552)/0.27552)**0.33760+1.)**(0.33760/(1.-0.33760))*61857.62500 )-1.0$ FRML EXO ZFKMNKW1 =FKMNKW1$ FRML _SJRDF FKMNK =((EXP(LOG(FKMNK(-1))+0.10000*(LOG(FKMNKW1)-LOG(FKMNKW1(-1)))+0.20000*(LOG(FKMNKW1(-1) )-LOG(FKMNK(-1)))+ROFKMNK1*((LOG(FKMNK(-1))-LOG(FKMNK(-2)))-0.10000*( LOG(FKMNKW1(-1))-LOG(FKMNKW1(-2)))-0.20000*(LOG(FKMNKW1(-2))-LOG( FKMNK(-2))))))*(1.0+JRFKMNK))*(1.0-DFKMNK)+DFKMNK*ZFKMNK$ FRML JLED JRFKMNK =FKMNK/(EXP(LOG(FKMNK(-1))+0.10000*(LOG(FKMNKW1)-LOG(FKMNKW1(-1)))+0.20000*(LOG( FKMNKW1(-1))-LOG(FKMNK(-1)))+ROFKMNK1*((LOG(FKMNK(-1))-LOG(FKMNK(-2)) )-0.10000*(LOG(FKMNKW1(-1))-LOG(FKMNKW1(-2)))-0.20000*(LOG(FKMNKW1(-2) )-LOG(FKMNK(-2))))))-1.0$ FRML EXO ZFKMNK =FKMNK$ FRML _DJRD FKMNKK =((FKMNK)*(1.0+JRFKMNKK))*(1.0-DFKMNKK)+DFKMNKK*ZFKMNKK$ FRML JLED JRFKMNKK =FKMNKK/(FKMNK)-1.0$ FRML EXO ZFKMNKK =FKMNKK$ FRML _KJRD FIMNK =((KFIMNK*(((FKMNK)-(FKMNK(-1)))+BIVMNK*FKMNK(-1)))*(1.0+JRFIMNK))*(1.0-DFIMNK)+ DFIMNK*ZFIMNK$ FRML JLED JRFIMNK =FIMNK/(KFIMNK*(((FKMNK)-(FKMNK(-1)))+BIVMNK*FKMNK(-1)))-1.0$ FRML EXO ZFIMNK =FIMNK$ FRML _I IMNK =FIMNK*PIMNK$ FRML _GJ_D OKNMNK =((PIMNK/PIMNK(-1)-1.)*(KNMNK(-1)+0.5*INMNK)+JOKNMNK)*(1.0-DOKNMNK)+DOKNMNK*ZOKNMNK$ FRML JLED JOKNMNK =OKNMNK-((PIMNK/PIMNK(-1)-1.)*(KNMNK(-1)+0.5*INMNK))$ FRML EXO ZOKNMNK =OKNMNK$ FRML _GJRD INVMNK =(((PIMNK/(0.5*PIMNK(-1)+0.5*PIMNK))*BINVMNK*KNMNK(-1))*(1.0+JRINVMNK))*(1.0-DINVMNK)+ DINVMNK*ZINVMNK$ FRML JLED JRINVMNK =INVMNK/((PIMNK/(0.5*PIMNK(-1)+0.5*PIMNK))*BINVMNK*KNMNK(-1))-1.0$ FRML EXO ZINVMNK =INVMNK$ FRML _I INMNK =IMNK-INVMNK$ FRML _I KNMNK =KNMNK(-1)+INMNK+OKNMNK$ FRML _DJRD HQNKN1 =(((1./DTHQNK1)*((1./(1.-0.27552))*((FXNK/75161.00000)/1.06813)**(-(1./0.33760-1.))-(0.27552 /(1.-0.27552))*(DTFKMNK1*FKMNKK/61857.62500)**(-(1./0.33760-1.)))**(-(1. /(1./0.33760-1.)))*90.40800)*(1.0+JRHQNKN1))*(1.0-DHQNKN1)+DHQNKN1* ZHQNKN1$ FRML JLED JRHQNKN1 =HQNKN1/((1./DTHQNK1)*((1./(1.-0.27552))*((FXNK/75161.00000)/1.06813)**(-(1./0.33760-1. ))-(0.27552/(1.-0.27552))*(DTFKMNK1*FKMNKK/61857.62500)**(-(1./0.33760 -1.)))**(-(1./(1./0.33760-1.)))*90.40800)-1.0$ FRML EXO ZHQNKN1 =HQNKN1$ FRML _SJRDF HQNK1 =((EXP(0.47789*(LOG(HQNKN1)-LOG(HGNK))+LOG(HGNK)+(1.-0.47789+(-0.23319))*(LOG(HQNKN1(-1) )-LOG(HGNK(-1)))-(-0.23319)*(LOG(HQNKN1(-2))-LOG(HGNK(-2)))+ROHQNK1*( LOG(HQNK1(-1))-(0.47789*(LOG(HQNKN1(-1))-LOG(HGNK(-1)))+(1.-0.47789+( -0.23319))*(LOG(HQNKN1(-2))-LOG(HGNK(-2)))-(-0.23319)*(LOG(HQNKN1(-3) )-LOG(HGNK(-3)))+LOG(HGNK(-1))))))*(1.0+JRHQNK1))*(1.0-DHQNK1)+ DHQNK1*ZHQNK1$ FRML JLED JRHQNK1 =HQNK1/(EXP(0.47789*(LOG(HQNKN1)-LOG(HGNK))+LOG(HGNK)+(1.-0.47789+(-0.23319))*(LOG( HQNKN1(-1))-LOG(HGNK(-1)))-(-0.23319)*(LOG(HQNKN1(-2))-LOG(HGNK(-2))) +ROHQNK1*(LOG(HQNK1(-1))-(0.47789*(LOG(HQNKN1(-1))-LOG(HGNK(-1)))+(1. -0.47789+(-0.23319))*(LOG(HQNKN1(-2))-LOG(HGNK(-2)))-(-0.23319)*(LOG( HQNKN1(-3))-LOG(HGNK(-3)))+LOG(HGNK(-1))))))-1.0$ FRML EXO ZHQNK1 =HQNK1$ FRML _DJRD QNK1 =((HQNK1/(BQSNK1*HGSNK+(1.-BQSNK1)*HGWNK)*1000.)*(1.0+JRQNK1))*(1.0-DQNK1)+DQNK1* ZQNK1$ FRML JLED JRQNK1 =QNK1/(HQNK1/(BQSNK1*HGSNK+(1.-BQSNK1)*HGWNK)*1000.)-1.0$ FRML EXO ZQNK1 =QNK1$ 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.)*(1.0+JRLNK1)$ FRML JLED JRLNK1 =LNK1/((YWNK1+SIQNKL)/(QWNK1*HGWNK)*1000.)-1.0$ FRML _DJRD HQNKW1 =(((1./DTHQNK1)*(1.-0.27552)**(0.33760/(1.-0.33760))*((FXNK/75161.00000)/1.06813)*(((( UIMNK*61857.62500)/(LNK1*90.40800))*(DTHQNK1/DTFKMNK1))**(1.-0.33760)* (0.27552/(1.-0.27552))**0.33760+1.)**(0.33760/(1.-0.33760))*90.40800)*( 1.0+JRHQNKW1))*(1.0-DHQNKW1)+DHQNKW1*ZHQNKW1$ FRML JLED JRHQNKW1 =HQNKW1/((1./DTHQNK1)*(1.-0.27552)**(0.33760/(1.-0.33760))*((FXNK/75161.00000)/1.06813) *((((UIMNK*61857.62500)/(LNK1*90.40800))*(DTHQNK1/DTFKMNK1))**(1.-0.33760 )*(0.27552/(1.-0.27552))**0.33760+1.)**(0.33760/(1.-0.33760))*90.40800) -1.0$ FRML EXO ZHQNKW1 =HQNKW1$ FRML _DJ_D RPIMNQE =(0.25*RPIMNQE(-1)+0.75*(PIMNQ/PIMNQ(-1)-1.)+JRPIMNQE)*(1.0-DRPIMNQE)+DRPIMNQE* ZRPIMNQE$ FRML JLED JRPIMNQE =RPIMNQE-(0.25*RPIMNQE(-1)+0.75*(PIMNQ/PIMNQ(-1)-1.))$ FRML EXO ZRPIMNQE =RPIMNQE$ FRML _DJRD YCMNQ =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNQ+(KNMNQ(-1)+0.5*INMNQ)*((1.-TSDSU1)*IWLO-0.5* RPIMNQE)))*(1.0+JRYCMNQ))*(1.0-DYCMNQ)+DYCMNQ*ZYCMNQ$ FRML JLED JRYCMNQ =YCMNQ/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNQ+(KNMNQ(-1)+0.5*INMNQ)*((1.-TSDSU1)*IWLO- 0.5*RPIMNQE)))-1.0$ FRML EXO ZYCMNQ =YCMNQ$ FRML _D UIMNQ =YCMNQ/(0.5*FKMNQ(-1)+0.5*FKMNQ)$ FRML _DJRD FKMNQW1 =(((1./DTFKMNQ1)*0.29729**(0.27128/(1.-0.27128))*((FXNQ/86920.00000)/1.07949)*((((LNQ1* 153.12399)/(UIMNQ*60642.41016))*(DTFKMNQ1/DTHQNQ1))**(1.-0.27128)*((1. -0.29729)/0.29729)**0.27128+1.)**(0.27128/(1.-0.27128))*60642.41016)*(1.0 +JRFKMNQW1))*(1.0-DFKMNQW1)+DFKMNQW1*ZFKMNQW1$ FRML JLED JRFKMNQW1 =FKMNQW1/((1./DTFKMNQ1)*0.29729**(0.27128/(1.-0.27128))*((FXNQ/86920.00000)/1.07949)*(( ((LNQ1*153.12399)/(UIMNQ*60642.41016))*(DTFKMNQ1/DTHQNQ1))**(1.-0.27128 )*((1.-0.29729)/0.29729)**0.27128+1.)**(0.27128/(1.-0.27128))*60642.41016 )-1.0$ FRML EXO ZFKMNQW1 =FKMNQW1$ FRML _SJRDF FKMNQ =((EXP(LOG(FKMNQ(-1))+0.11664*(LOG(FKMNQW1)-LOG(FKMNQW1(-1)))+0.26607*(LOG(FKMNQW1(-1) )-LOG(FKMNQ(-1)))+ROFKMNQ1*((LOG(FKMNQ(-1))-LOG(FKMNQ(-2)))-0.11664*( LOG(FKMNQW1(-1))-LOG(FKMNQW1(-2)))-0.26607*(LOG(FKMNQW1(-2))-LOG( FKMNQ(-2))))))*(1.0+JRFKMNQ))*(1.0-DFKMNQ)+DFKMNQ*ZFKMNQ$ FRML JLED JRFKMNQ =FKMNQ/(EXP(LOG(FKMNQ(-1))+0.11664*(LOG(FKMNQW1)-LOG(FKMNQW1(-1)))+0.26607*(LOG( FKMNQW1(-1))-LOG(FKMNQ(-1)))+ROFKMNQ1*((LOG(FKMNQ(-1))-LOG(FKMNQ(-2)) )-0.11664*(LOG(FKMNQW1(-1))-LOG(FKMNQW1(-2)))-0.26607*(LOG(FKMNQW1(-2) )-LOG(FKMNQ(-2))))))-1.0$ FRML EXO ZFKMNQ =FKMNQ$ FRML _DJRD FKMNQK =((FKMNQ)*(1.0+JRFKMNQK))*(1.0-DFKMNQK)+DFKMNQK*ZFKMNQK$ FRML JLED JRFKMNQK =FKMNQK/(FKMNQ)-1.0$ FRML EXO ZFKMNQK =FKMNQK$ FRML _KJRD FIMNQ =((KFIMNQ*(((FKMNQ)-(FKMNQ(-1)))+BIVMNQ*FKMNQ(-1)))*(1.0+JRFIMNQ))*(1.0-DFIMNQ)+ DFIMNQ*ZFIMNQ$ FRML JLED JRFIMNQ =FIMNQ/(KFIMNQ*(((FKMNQ)-(FKMNQ(-1)))+BIVMNQ*FKMNQ(-1)))-1.0$ FRML EXO ZFIMNQ =FIMNQ$ FRML _I IMNQ =FIMNQ*PIMNQ$ FRML _GJ_D OKNMNQ =((PIMNQ/PIMNQ(-1)-1.)*(KNMNQ(-1)+0.5*INMNQ)+JOKNMNQ)*(1.0-DOKNMNQ)+DOKNMNQ*ZOKNMNQ$ FRML JLED JOKNMNQ =OKNMNQ-((PIMNQ/PIMNQ(-1)-1.)*(KNMNQ(-1)+0.5*INMNQ))$ FRML EXO ZOKNMNQ =OKNMNQ$ FRML _GJRD INVMNQ =(((PIMNQ/(0.5*PIMNQ(-1)+0.5*PIMNQ))*BINVMNQ*KNMNQ(-1))*(1.0+JRINVMNQ))*(1.0-DINVMNQ)+ DINVMNQ*ZINVMNQ$ FRML JLED JRINVMNQ =INVMNQ/((PIMNQ/(0.5*PIMNQ(-1)+0.5*PIMNQ))*BINVMNQ*KNMNQ(-1))-1.0$ FRML EXO ZINVMNQ =INVMNQ$ FRML _I INMNQ =IMNQ-INVMNQ$ FRML _I KNMNQ =KNMNQ(-1)+INMNQ+OKNMNQ$ FRML _DJRD HQNQN1 =(((1./DTHQNQ1)*((1./(1.-0.29729))*((FXNQ/86920.00000)/1.07949)**(-(1./0.27128-1.))-(0.29729 /(1.-0.29729))*(DTFKMNQ1*FKMNQK/60642.41016)**(-(1./0.27128-1.)))**(-(1. /(1./0.27128-1.)))*153.12399)*(1.0+JRHQNQN1))*(1.0-DHQNQN1)+DHQNQN1* ZHQNQN1$ FRML JLED JRHQNQN1 =HQNQN1/((1./DTHQNQ1)*((1./(1.-0.29729))*((FXNQ/86920.00000)/1.07949)**(-(1./0.27128-1. ))-(0.29729/(1.-0.29729))*(DTFKMNQ1*FKMNQK/60642.41016)**(-(1./0.27128 -1.)))**(-(1./(1./0.27128-1.)))*153.12399)-1.0$ FRML EXO ZHQNQN1 =HQNQN1$ FRML _SJRDF HQNQ1 =((EXP(0.55180*(LOG(HQNQN1)-LOG(HGNQ))+LOG(HGNQ)+(1.-0.55180+(-0.13581))*(LOG(HQNQN1(-1) )-LOG(HGNQ(-1)))-(-0.13581)*(LOG(HQNQN1(-2))-LOG(HGNQ(-2)))+ROHQNQ1*( LOG(HQNQ1(-1))-(0.55180*(LOG(HQNQN1(-1))-LOG(HGNQ(-1)))+(1.-0.55180+( -0.13581))*(LOG(HQNQN1(-2))-LOG(HGNQ(-2)))-(-0.13581)*(LOG(HQNQN1(-3) )-LOG(HGNQ(-3)))+LOG(HGNQ(-1))))))*(1.0+JRHQNQ1))*(1.0-DHQNQ1)+ DHQNQ1*ZHQNQ1$ FRML JLED JRHQNQ1 =HQNQ1/(EXP(0.55180*(LOG(HQNQN1)-LOG(HGNQ))+LOG(HGNQ)+(1.-0.55180+(-0.13581))*(LOG( HQNQN1(-1))-LOG(HGNQ(-1)))-(-0.13581)*(LOG(HQNQN1(-2))-LOG(HGNQ(-2))) +ROHQNQ1*(LOG(HQNQ1(-1))-(0.55180*(LOG(HQNQN1(-1))-LOG(HGNQ(-1)))+(1. -0.55180+(-0.13581))*(LOG(HQNQN1(-2))-LOG(HGNQ(-2)))-(-0.13581)*(LOG( HQNQN1(-3))-LOG(HGNQ(-3)))+LOG(HGNQ(-1))))))-1.0$ FRML EXO ZHQNQ1 =HQNQ1$ FRML _DJRD QNQ1 =((HQNQ1/(BQSNQ1*HGSNQ+(1.-BQSNQ1)*HGWNQ)*1000.)*(1.0+JRQNQ1))*(1.0-DQNQ1)+DQNQ1* ZQNQ1$ FRML JLED JRQNQ1 =QNQ1/(HQNQ1/(BQSNQ1*HGSNQ+(1.-BQSNQ1)*HGWNQ)*1000.)-1.0$ FRML EXO ZQNQ1 =QNQ1$ 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.)*(1.0+JRLNQ1)$ FRML JLED JRLNQ1 =LNQ1/((YWNQ1+SIQNQL)/(QWNQ1*HGWNQ)*1000.)-1.0$ FRML _DJRD HQNQW1 =(((1./DTHQNQ1)*(1.-0.29729)**(0.27128/(1.-0.27128))*((FXNQ/86920.00000)/1.07949)*(((( UIMNQ*60642.41016)/(LNQ1*153.12399))*(DTHQNQ1/DTFKMNQ1))**(1.-0.27128) *(0.29729/(1.-0.29729))**0.27128+1.)**(0.27128/(1.-0.27128))*153.12399) *(1.0+JRHQNQW1))*(1.0-DHQNQW1)+DHQNQW1*ZHQNQW1$ FRML JLED JRHQNQW1 =HQNQW1/((1./DTHQNQ1)*(1.-0.29729)**(0.27128/(1.-0.27128))*((FXNQ/86920.00000)/1.07949) *((((UIMNQ*60642.41016)/(LNQ1*153.12399))*(DTHQNQ1/DTFKMNQ1))**(1.-0.27128 )*(0.29729/(1.-0.29729))**0.27128+1.)**(0.27128/(1.-0.27128))*153.12399 )-1.0$ FRML EXO ZHQNQW1 =HQNQW1$ FRML _DJ_D RPIMBE =(0.25*RPIMBE(-1)+0.75*(PIMB/PIMB(-1)-1.)+JRPIMBE)*(1.0-DRPIMBE)+DRPIMBE*ZRPIMBE$ FRML JLED JRPIMBE =RPIMBE-(0.25*RPIMBE(-1)+0.75*(PIMB/PIMB(-1)-1.))$ FRML EXO ZRPIMBE =RPIMBE$ FRML _DJRD YCMB =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMB+(KNMB(-1)+0.5*INMB)*((1.-TSDSU1)*IWLO-0.5* RPIMBE)))*(1.0+JRYCMB))*(1.0-DYCMB)+DYCMB*ZYCMB$ FRML JLED JRYCMB =YCMB/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMB+(KNMB(-1)+0.5*INMB)*((1.-TSDSU1)*IWLO-0.5* RPIMBE)))-1.0$ FRML EXO ZYCMB =YCMB$ FRML _D UIMB =YCMB/(0.5*FKMB(-1)+0.5*FKMB)$ FRML _DJRD FKMBW1 =(((1./DTFKMB1)*0.11696**(0.25749/(1.-0.25749))*((FXB/153175.00000)/1.02076)*((((LB1*290.47601 )/(UIMB*50487.00000))*(DTFKMB1/DTHQB1))**(1.-0.25749)*((1.-0.11696)/0.11696 )**0.25749+1.)**(0.25749/(1.-0.25749))*50487.00000)*(1.0+JRFKMBW1))*(1.0 -DFKMBW1)+DFKMBW1*ZFKMBW1$ FRML JLED JRFKMBW1 =FKMBW1/((1./DTFKMB1)*0.11696**(0.25749/(1.-0.25749))*((FXB/153175.00000)/1.02076)*(((( LB1*290.47601)/(UIMB*50487.00000))*(DTFKMB1/DTHQB1))**(1.-0.25749)*((1. -0.11696)/0.11696)**0.25749+1.)**(0.25749/(1.-0.25749))*50487.00000)-1.0$ FRML EXO ZFKMBW1 =FKMBW1$ FRML _SJRDF FKMB =((EXP(LOG(FKMB(-1))+0.29590*(LOG(FKMBW1)-LOG(FKMBW1(-1)))+0.25517*(LOG(FKMBW1(-1))-LOG (FKMB(-1)))+ROFKMB1*((LOG(FKMB(-1))-LOG(FKMB(-2)))-0.29590*(LOG( FKMBW1(-1))-LOG(FKMBW1(-2)))-0.25517*(LOG(FKMBW1(-2))-LOG(FKMB(-2)))) ))*(1.0+JRFKMB))*(1.0-DFKMB)+DFKMB*ZFKMB$ FRML JLED JRFKMB =FKMB/(EXP(LOG(FKMB(-1))+0.29590*(LOG(FKMBW1)-LOG(FKMBW1(-1)))+0.25517*(LOG(FKMBW1(-1) )-LOG(FKMB(-1)))+ROFKMB1*((LOG(FKMB(-1))-LOG(FKMB(-2)))-0.29590*(LOG( FKMBW1(-1))-LOG(FKMBW1(-2)))-0.25517*(LOG(FKMBW1(-2))-LOG(FKMB(-2)))) ))-1.0$ FRML EXO ZFKMB =FKMB$ FRML _DJRD FKMBK =((FKMB)*(1.0+JRFKMBK))*(1.0-DFKMBK)+DFKMBK*ZFKMBK$ FRML JLED JRFKMBK =FKMBK/(FKMB)-1.0$ FRML EXO ZFKMBK =FKMBK$ FRML _KJRD FIMB =((KFIMB*(((FKMB)-(FKMB(-1)))+BIVMB*FKMB(-1)))*(1.0+JRFIMB))*(1.0-DFIMB)+DFIMB*ZFIMB$ FRML JLED JRFIMB =FIMB/(KFIMB*(((FKMB)-(FKMB(-1)))+BIVMB*FKMB(-1)))-1.0$ FRML EXO ZFIMB =FIMB$ FRML _I IMB =FIMB*PIMB$ FRML _GJ_D OKNMB =((PIMB/PIMB(-1)-1.)*(KNMB(-1)+0.5*INMB)+JOKNMB)*(1.0-DOKNMB)+DOKNMB*ZOKNMB$ FRML JLED JOKNMB =OKNMB-((PIMB/PIMB(-1)-1.)*(KNMB(-1)+0.5*INMB))$ FRML EXO ZOKNMB =OKNMB$ FRML _GJRD INVMB =(((PIMB/(0.5*PIMB(-1)+0.5*PIMB))*BINVMB*KNMB(-1))*(1.0+JRINVMB))*(1.0-DINVMB)+DINVMB* ZINVMB$ FRML JLED JRINVMB =INVMB/((PIMB/(0.5*PIMB(-1)+0.5*PIMB))*BINVMB*KNMB(-1))-1.0$ FRML EXO ZINVMB =INVMB$ FRML _I INMB =IMB-INVMB$ FRML _I KNMB =KNMB(-1)+INMB+OKNMB$ FRML _DJRD HQBN1 =(((1./DTHQB1)*((1./(1.-0.11696))*((FXB/153175.00000)/1.02076)**(-(1./0.25749-1.))-(0.11696 /(1.-0.11696))*(DTFKMB1*FKMBK/50487.00000)**(-(1./0.25749-1.)))**(-(1./ (1./0.25749-1.)))*290.47601)*(1.0+JRHQBN1))*(1.0-DHQBN1)+DHQBN1* ZHQBN1$ FRML JLED JRHQBN1 =HQBN1/((1./DTHQB1)*((1./(1.-0.11696))*((FXB/153175.00000)/1.02076)**(-(1./0.25749-1.)) -(0.11696/(1.-0.11696))*(DTFKMB1*FKMBK/50487.00000)**(-(1./0.25749-1.) ))**(-(1./(1./0.25749-1.)))*290.47601)-1.0$ FRML EXO ZHQBN1 =HQBN1$ FRML _SJRDF HQB1 =((EXP(0.75079*(LOG(HQBN1)-LOG(HGB))+LOG(HGB)+(1.-0.75079+(-0.18091))*(LOG(HQBN1(-1))- LOG(HGB(-1)))-(-0.18091)*(LOG(HQBN1(-2))-LOG(HGB(-2)))+ROHQB1*(LOG( HQB1(-1))-(0.75079*(LOG(HQBN1(-1))-LOG(HGB(-1)))+(1.-0.75079+(-0.18091 ))*(LOG(HQBN1(-2))-LOG(HGB(-2)))-(-0.18091)*(LOG(HQBN1(-3))-LOG(HGB(-3) ))+LOG(HGB(-1))))))*(1.0+JRHQB1))*(1.0-DHQB1)+DHQB1*ZHQB1$ FRML JLED JRHQB1 =HQB1/(EXP(0.75079*(LOG(HQBN1)-LOG(HGB))+LOG(HGB)+(1.-0.75079+(-0.18091))*(LOG(HQBN1(-1) )-LOG(HGB(-1)))-(-0.18091)*(LOG(HQBN1(-2))-LOG(HGB(-2)))+ROHQB1*(LOG( HQB1(-1))-(0.75079*(LOG(HQBN1(-1))-LOG(HGB(-1)))+(1.-0.75079+(-0.18091 ))*(LOG(HQBN1(-2))-LOG(HGB(-2)))-(-0.18091)*(LOG(HQBN1(-3))-LOG(HGB(-3) ))+LOG(HGB(-1))))))-1.0$ FRML EXO ZHQB1 =HQB1$ FRML _DJRD QB1 =((HQB1/(BQSB1*HGSB+(1.-BQSB1)*HGWB)*1000.)*(1.0+JRQB1))*(1.0-DQB1)+DQB1*ZQB1$ FRML JLED JRQB1 =QB1/(HQB1/(BQSB1*HGSB+(1.-BQSB1)*HGWB)*1000.)-1.0$ FRML EXO ZQB1 =QB1$ 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.)*(1.0+JRLB1)$ FRML JLED JRLB1 =LB1/((YWB1+SIQBL)/(QWB1*HGWB)*1000.)-1.0$ FRML _DJRD HQBW1 =(((1./DTHQB1)*(1.-0.11696)**(0.25749/(1.-0.25749))*((FXB/153175.00000)/1.02076)*(((( UIMB*50487.00000)/(LB1*290.47601))*(DTHQB1/DTFKMB1))**(1.-0.25749)*(0.11696 /(1.-0.11696))**0.25749+1.)**(0.25749/(1.-0.25749))*290.47601)*(1.0+ JRHQBW1))*(1.0-DHQBW1)+DHQBW1*ZHQBW1$ FRML JLED JRHQBW1 =HQBW1/((1./DTHQB1)*(1.-0.11696)**(0.25749/(1.-0.25749))*((FXB/153175.00000)/1.02076)*( (((UIMB*50487.00000)/(LB1*290.47601))*(DTHQB1/DTFKMB1))**(1.-0.25749)* (0.11696/(1.-0.11696))**0.25749+1.)**(0.25749/(1.-0.25749))*290.47601)- 1.0$ FRML EXO ZHQBW1 =HQBW1$ FRML _DJ_D RPIMQHE =(0.25*RPIMQHE(-1)+0.75*(PIMQH/PIMQH(-1)-1.)+JRPIMQHE)*(1.0-DRPIMQHE)+DRPIMQHE* ZRPIMQHE$ FRML JLED JRPIMQHE =RPIMQHE-(0.25*RPIMQHE(-1)+0.75*(PIMQH/PIMQH(-1)-1.))$ FRML EXO ZRPIMQHE =RPIMQHE$ FRML _DJRD YCMQH =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQH+(KNMQH(-1)+0.5*INMQH)*((1.-TSDSU1)*IWLO-0.5* RPIMQHE)))*(1.0+JRYCMQH))*(1.0-DYCMQH)+DYCMQH*ZYCMQH$ FRML JLED JRYCMQH =YCMQH/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQH+(KNMQH(-1)+0.5*INMQH)*((1.-TSDSU1)*IWLO- 0.5*RPIMQHE)))-1.0$ FRML EXO ZYCMQH =YCMQH$ FRML _D UIMQH =YCMQH/(0.5*FKMQH(-1)+0.5*FKMQH)$ FRML _DJRD FKMQHW1 =(((1./DTFKMQH1)*0.12654**(0.099370/(1.-0.099370))*((FXQH/228529.00000)/1.10133)*(((( LQH1*614.19702)/(UIMQH*159317.90625))*(DTFKMQH1/DTHQQH1))**(1.-0.099370 )*((1.-0.12654)/0.12654)**0.099370+1.)**(0.099370/(1.-0.099370))*159317.90625 )*(1.0+JRFKMQHW1))*(1.0-DFKMQHW1)+DFKMQHW1*ZFKMQHW1$ FRML JLED JRFKMQHW1 =FKMQHW1/((1./DTFKMQH1)*0.12654**(0.099370/(1.-0.099370))*((FXQH/228529.00000)/1.10133) *((((LQH1*614.19702)/(UIMQH*159317.90625))*(DTFKMQH1/DTHQQH1))**(1.-0.099370 )*((1.-0.12654)/0.12654)**0.099370+1.)**(0.099370/(1.-0.099370))*159317.90625 )-1.0$ FRML EXO ZFKMQHW1 =FKMQHW1$ FRML _SJRDF FKMQH =((EXP(LOG(FKMQH(-1))+0.30037*(LOG(FKMQHW1)-LOG(FKMQHW1(-1)))+0.51413*(LOG(FKMQHW1(-1) )-LOG(FKMQH(-1)))+ROFKMQH1*((LOG(FKMQH(-1))-LOG(FKMQH(-2)))-0.30037*( LOG(FKMQHW1(-1))-LOG(FKMQHW1(-2)))-0.51413*(LOG(FKMQHW1(-2))-LOG( FKMQH(-2))))))*(1.0+JRFKMQH))*(1.0-DFKMQH)+DFKMQH*ZFKMQH$ FRML JLED JRFKMQH =FKMQH/(EXP(LOG(FKMQH(-1))+0.30037*(LOG(FKMQHW1)-LOG(FKMQHW1(-1)))+0.51413*(LOG( FKMQHW1(-1))-LOG(FKMQH(-1)))+ROFKMQH1*((LOG(FKMQH(-1))-LOG(FKMQH(-2)) )-0.30037*(LOG(FKMQHW1(-1))-LOG(FKMQHW1(-2)))-0.51413*(LOG(FKMQHW1(-2) )-LOG(FKMQH(-2))))))-1.0$ FRML EXO ZFKMQH =FKMQH$ FRML _DJRD FKMQHK =((FKMQH)*(1.0+JRFKMQHK))*(1.0-DFKMQHK)+DFKMQHK*ZFKMQHK$ FRML JLED JRFKMQHK =FKMQHK/(FKMQH)-1.0$ FRML EXO ZFKMQHK =FKMQHK$ FRML _KJRD FIMQH =((KFIMQH*(((FKMQH)-(FKMQH(-1)))+BIVMQH*FKMQH(-1)))*(1.0+JRFIMQH))*(1.0-DFIMQH)+ DFIMQH*ZFIMQH$ FRML JLED JRFIMQH =FIMQH/(KFIMQH*(((FKMQH)-(FKMQH(-1)))+BIVMQH*FKMQH(-1)))-1.0$ FRML EXO ZFIMQH =FIMQH$ FRML _I IMQH =FIMQH*PIMQH$ FRML _GJ_D OKNMQH =((PIMQH/PIMQH(-1)-1.)*(KNMQH(-1)+0.5*INMQH)+JOKNMQH)*(1.0-DOKNMQH)+DOKNMQH*ZOKNMQH$ FRML JLED JOKNMQH =OKNMQH-((PIMQH/PIMQH(-1)-1.)*(KNMQH(-1)+0.5*INMQH))$ FRML EXO ZOKNMQH =OKNMQH$ FRML _GJRD INVMQH =(((PIMQH/(0.5*PIMQH(-1)+0.5*PIMQH))*BINVMQH*KNMQH(-1))*(1.0+JRINVMQH))*(1.0-DINVMQH)+ DINVMQH*ZINVMQH$ FRML JLED JRINVMQH =INVMQH/((PIMQH/(0.5*PIMQH(-1)+0.5*PIMQH))*BINVMQH*KNMQH(-1))-1.0$ FRML EXO ZINVMQH =INVMQH$ FRML _I INMQH =IMQH-INVMQH$ FRML _I KNMQH =KNMQH(-1)+INMQH+OKNMQH$ FRML _DJRD HQQHN1 =(((1./DTHQQH1)*((1./(1.-0.12654))*((FXQH/228529.00000)/1.10133)**(-(1./0.099370-1.))-( 0.12654/(1.-0.12654))*(DTFKMQH1*FKMQHK/159317.90625)**(-(1./0.099370-1. )))**(-(1./(1./0.099370-1.)))*614.19702)*(1.0+JRHQQHN1))*(1.0-DHQQHN1) +DHQQHN1*ZHQQHN1$ FRML JLED JRHQQHN1 =HQQHN1/((1./DTHQQH1)*((1./(1.-0.12654))*((FXQH/228529.00000)/1.10133)**(-(1./0.099370- 1.))-(0.12654/(1.-0.12654))*(DTFKMQH1*FKMQHK/159317.90625)**(-(1./0.099370 -1.)))**(-(1./(1./0.099370-1.)))*614.19702)-1.0$ FRML EXO ZHQQHN1 =HQQHN1$ FRML _SJRDF HQQH1 =((EXP(0.48881*(LOG(HQQHN1)-LOG(HGQH))+LOG(HGQH)+(1.-0.48881+(-0.27444))*(LOG(HQQHN1(-1) )-LOG(HGQH(-1)))-(-0.27444)*(LOG(HQQHN1(-2))-LOG(HGQH(-2)))+ROHQQH1*( LOG(HQQH1(-1))-(0.48881*(LOG(HQQHN1(-1))-LOG(HGQH(-1)))+(1.-0.48881+( -0.27444))*(LOG(HQQHN1(-2))-LOG(HGQH(-2)))-(-0.27444)*(LOG(HQQHN1(-3) )-LOG(HGQH(-3)))+LOG(HGQH(-1))))))*(1.0+JRHQQH1))*(1.0-DHQQH1)+ DHQQH1*ZHQQH1$ FRML JLED JRHQQH1 =HQQH1/(EXP(0.48881*(LOG(HQQHN1)-LOG(HGQH))+LOG(HGQH)+(1.-0.48881+(-0.27444))*(LOG( HQQHN1(-1))-LOG(HGQH(-1)))-(-0.27444)*(LOG(HQQHN1(-2))-LOG(HGQH(-2))) +ROHQQH1*(LOG(HQQH1(-1))-(0.48881*(LOG(HQQHN1(-1))-LOG(HGQH(-1)))+(1. -0.48881+(-0.27444))*(LOG(HQQHN1(-2))-LOG(HGQH(-2)))-(-0.27444)*(LOG( HQQHN1(-3))-LOG(HGQH(-3)))+LOG(HGQH(-1))))))-1.0$ FRML EXO ZHQQH1 =HQQH1$ FRML _DJRD QQH1 =((HQQH1/(BQSQH1*HGSQH+(1.-BQSQH1)*HGWQH)*1000.)*(1.0+JRQQH1))*(1.0-DQQH1)+DQQH1* ZQQH1$ FRML JLED JRQQH1 =QQH1/(HQQH1/(BQSQH1*HGSQH+(1.-BQSQH1)*HGWQH)*1000.)-1.0$ FRML EXO ZQQH1 =QQH1$ 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.)*(1.0+JRLQH1)$ FRML JLED JRLQH1 =LQH1/((YWQH1+SIQQHL)/(QWQH1*HGWQH)*1000.)-1.0$ FRML _DJRD HQQHW1 =(((1./DTHQQH1)*(1.-0.12654)**(0.099370/(1.-0.099370))*((FXQH/228529.00000)/1.10133)*(( ((UIMQH*159317.90625)/(LQH1*614.19702))*(DTHQQH1/DTFKMQH1))**(1.-0.099370 )*(0.12654/(1.-0.12654))**0.099370+1.)**(0.099370/(1.-0.099370))*614.19702 )*(1.0+JRHQQHW1))*(1.0-DHQQHW1)+DHQQHW1*ZHQQHW1$ FRML JLED JRHQQHW1 =HQQHW1/((1./DTHQQH1)*(1.-0.12654)**(0.099370/(1.-0.099370))*((FXQH/228529.00000)/1.10133 )*((((UIMQH*159317.90625)/(LQH1*614.19702))*(DTHQQH1/DTFKMQH1))**(1.-0.099370 )*(0.12654/(1.-0.12654))**0.099370+1.)**(0.099370/(1.-0.099370))*614.19702 )-1.0$ FRML EXO ZHQQHW1 =HQQHW1$ FRML _DJ_D RPIMQSE =(0.25*RPIMQSE(-1)+0.75*(PIMQS/PIMQS(-1)-1.)+JRPIMQSE)*(1.0-DRPIMQSE)+DRPIMQSE* ZRPIMQSE$ FRML JLED JRPIMQSE =RPIMQSE-(0.25*RPIMQSE(-1)+0.75*(PIMQS/PIMQS(-1)-1.))$ FRML EXO ZRPIMQSE =RPIMQSE$ FRML _DJRD YCMQS =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQS+(KNMQS(-1)+0.5*INMQS)*((1.-TSDSU1)*IWLO-0.5* RPIMQSE)))*(1.0+JRYCMQS))*(1.0-DYCMQS)+DYCMQS*ZYCMQS$ FRML JLED JRYCMQS =YCMQS/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQS+(KNMQS(-1)+0.5*INMQS)*((1.-TSDSU1)*IWLO- 0.5*RPIMQSE)))-1.0$ FRML EXO ZYCMQS =YCMQS$ FRML _D UIMQS =YCMQS/(0.5*FKMQS(-1)+0.5*FKMQS)$ FRML _DJRD FKMQSW1 =(((1./DTFKMQS1)*0.87009**(0.10000/(1.-0.10000))*((FXQS/93403.00000)/1.20750)*((((LQS1* 34.72500)/(UIMQS*133477.00000))*(DTFKMQS1/DTHQQS1))**(1.-0.10000)*((1. -0.87009)/0.87009)**0.10000+1.)**(0.10000/(1.-0.10000))*133477.00000)*( 1.0+JRFKMQSW1))*(1.0-DFKMQSW1)+DFKMQSW1*ZFKMQSW1$ FRML JLED JRFKMQSW1 =FKMQSW1/((1./DTFKMQS1)*0.87009**(0.10000/(1.-0.10000))*((FXQS/93403.00000)/1.20750)*(( ((LQS1*34.72500)/(UIMQS*133477.00000))*(DTFKMQS1/DTHQQS1))**(1.-0.10000 )*((1.-0.87009)/0.87009)**0.10000+1.)**(0.10000/(1.-0.10000))*133477.00000 )-1.0$ FRML EXO ZFKMQSW1 =FKMQSW1$ FRML _SJRDF FKMQS =((EXP(LOG(FKMQS(-1))+0.20*(LOG(FKMQSW1)-LOG(FKMQSW1(-1)))+0.20*(LOG(FKMQSW1(-1))-LOG( FKMQSW1(-2)))+0.20*(LOG(FKMQSW1(-2))-LOG(FKMQSW1(-3)))+0.20*(LOG( FKMQSW1(-3))-LOG(FKMQSW1(-4)))+0.20*(LOG(FKMQSW1(-4))-LOG(FKMQSW1(-5) ))))*(1.0+JRFKMQS))*(1.0-DFKMQS)+DFKMQS*ZFKMQS$ FRML JLED JRFKMQS =FKMQS/(EXP(LOG(FKMQS(-1))+0.20*(LOG(FKMQSW1)-LOG(FKMQSW1(-1)))+0.20*(LOG(FKMQSW1(-1)) -LOG(FKMQSW1(-2)))+0.20*(LOG(FKMQSW1(-2))-LOG(FKMQSW1(-3)))+0.20*(LOG (FKMQSW1(-3))-LOG(FKMQSW1(-4)))+0.20*(LOG(FKMQSW1(-4))-LOG(FKMQSW1(-5) ))))-1.0$ FRML EXO ZFKMQS =FKMQS$ FRML _KJRD FIMQS =((KFIMQS*(((FKMQS)-(FKMQS(-1)))+BIVMQS*FKMQS(-1)))*(1.0+JRFIMQS))*(1.0-DFIMQS)+ DFIMQS*ZFIMQS$ FRML JLED JRFIMQS =FIMQS/(KFIMQS*(((FKMQS)-(FKMQS(-1)))+BIVMQS*FKMQS(-1)))-1.0$ FRML EXO ZFIMQS =FIMQS$ FRML _I IMQS =FIMQS*PIMQS$ FRML _GJ_D OKNMQS =((PIMQS/PIMQS(-1)-1.)*(KNMQS(-1)+0.5*INMQS)+JOKNMQS)*(1.0-DOKNMQS)+DOKNMQS*ZOKNMQS$ FRML JLED JOKNMQS =OKNMQS-((PIMQS/PIMQS(-1)-1.)*(KNMQS(-1)+0.5*INMQS))$ FRML EXO ZOKNMQS =OKNMQS$ FRML _GJRD INVMQS =(((PIMQS/(0.5*PIMQS(-1)+0.5*PIMQS))*BINVMQS*KNMQS(-1))*(1.0+JRINVMQS))*(1.0-DINVMQS)+ DINVMQS*ZINVMQS$ FRML JLED JRINVMQS =INVMQS/((PIMQS/(0.5*PIMQS(-1)+0.5*PIMQS))*BINVMQS*KNMQS(-1))-1.0$ FRML EXO ZINVMQS =INVMQS$ FRML _I INMQS =IMQS-INVMQS$ FRML _I KNMQS =KNMQS(-1)+INMQS+OKNMQS$ FRML _DJRD HQQSW1 =(((1./DTHQQS1)*(1.-0.87009)**(0.10000/(1.-0.10000))*((FXQS/93403.00000)/1.20750)*(((( UIMQS*133477.00000)/(LQS1*34.72500))*(DTHQQS1/DTFKMQS1))**(1.-0.10000) *(0.87009/(1.-0.87009))**0.10000+1.)**(0.10000/(1.-0.10000))*34.72500)* (1.0+JRHQQSW1))*(1.0-DHQQSW1)+DHQQSW1*ZHQQSW1$ FRML JLED JRHQQSW1 =HQQSW1/((1./DTHQQS1)*(1.-0.87009)**(0.10000/(1.-0.10000))*((FXQS/93403.00000)/1.20750) *((((UIMQS*133477.00000)/(LQS1*34.72500))*(DTHQQS1/DTFKMQS1))**(1.-0.10000 )*(0.87009/(1.-0.87009))**0.10000+1.)**(0.10000/(1.-0.10000))*34.72500) -1.0$ FRML EXO ZHQQSW1 =HQQSW1$ FRML _SJRDF HQQS1 =((EXP(LOG(HQQS1(-1))+0.65*((LOG(HQQSW1)-LOG(HQQSW1(-1)))-(LOG(HGQS)-LOG(HGQS(-1))))+( LOG(HGQS)-LOG(HGQS(-1)))+0.20*((LOG(HQQSW1(-1))-LOG(HQQSW1(-2)))-(LOG (HGQS(-1))-LOG(HGQS(-2))))+0.15*((LOG(HQQSW1(-2))-LOG(HQQSW1(-3)))-(LOG (HGQS(-2))-LOG(HGQS(-3))))))*(1.0+JRHQQS1))*(1.0-DHQQS1)+DHQQS1* ZHQQS1$ FRML JLED JRHQQS1 =HQQS1/(EXP(LOG(HQQS1(-1))+0.65*((LOG(HQQSW1)-LOG(HQQSW1(-1)))-(LOG(HGQS)-LOG(HGQS(-1) )))+(LOG(HGQS)-LOG(HGQS(-1)))+0.20*((LOG(HQQSW1(-1))-LOG(HQQSW1(-2))) -(LOG(HGQS(-1))-LOG(HGQS(-2))))+0.15*((LOG(HQQSW1(-2))-LOG(HQQSW1(-3) ))-(LOG(HGQS(-2))-LOG(HGQS(-3))))))-1.0$ FRML EXO ZHQQS1 =HQQS1$ FRML _DJRD QQS1 =((HQQS1/(BQSQS1*HGSQS+(1.-BQSQS1)*HGWQS)*1000.)*(1.0+JRQQS1))*(1.0-DQQS1)+DQQS1* ZQQS1$ FRML JLED JRQQS1 =QQS1/(HQQS1/(BQSQS1*HGSQS+(1.-BQSQS1)*HGWQS)*1000.)-1.0$ FRML EXO ZQQS1 =QQS1$ 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.)*(1.0+JRLQS1)$ FRML JLED JRLQS1 =LQS1/((YWQS1+SIQQSL)/(QWQS1*HGWQS)*1000.)-1.0$ FRML _DJ_D RPIMQTE =(0.25*RPIMQTE(-1)+0.75*(PIMQT/PIMQT(-1)-1.)+JRPIMQTE)*(1.0-DRPIMQTE)+DRPIMQTE* ZRPIMQTE$ FRML JLED JRPIMQTE =RPIMQTE-(0.25*RPIMQTE(-1)+0.75*(PIMQT/PIMQT(-1)-1.))$ FRML EXO ZRPIMQTE =RPIMQTE$ FRML _DJRD YCMQT =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQT+(KNMQT(-1)+0.5*INMQT)*((1.-TSDSU1)*IWLO-0.5* RPIMQTE)))*(1.0+JRYCMQT))*(1.0-DYCMQT)+DYCMQT*ZYCMQT$ FRML JLED JRYCMQT =YCMQT/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQT+(KNMQT(-1)+0.5*INMQT)*((1.-TSDSU1)*IWLO- 0.5*RPIMQTE)))-1.0$ FRML EXO ZYCMQT =YCMQT$ FRML _D UIMQT =YCMQT/(0.5*FKMQT(-1)+0.5*FKMQT)$ FRML _DJRD FKMQTW1 =(((1./DTFKMQT1)*0.51091**(0.30910/(1.-0.30910))*((FXQT/155453.00000)/1.04963)*(((( LQT1*292.31201)/(UIMQT*162944.00000))*(DTFKMQT1/DTHQQT1))**(1.-0.30910 )*((1.-0.51091)/0.51091)**0.30910+1.)**(0.30910/(1.-0.30910))*162944.00000 )*(1.0+JRFKMQTW1))*(1.0-DFKMQTW1)+DFKMQTW1*ZFKMQTW1$ FRML JLED JRFKMQTW1 =FKMQTW1/((1./DTFKMQT1)*0.51091**(0.30910/(1.-0.30910))*((FXQT/155453.00000)/1.04963)*( (((LQT1*292.31201)/(UIMQT*162944.00000))*(DTFKMQT1/DTHQQT1))**(1.-0.30910 )*((1.-0.51091)/0.51091)**0.30910+1.)**(0.30910/(1.-0.30910))*162944.00000 )-1.0$ FRML EXO ZFKMQTW1 =FKMQTW1$ FRML _SJRDF FKMQT =((EXP(LOG(FKMQT(-1))+0.15064*(LOG(FKMQTW1)-LOG(FKMQTW1(-1)))+0.31559*(LOG(FKMQTW1(-1) )-LOG(FKMQT(-1)))+ROFKMQT1*((LOG(FKMQT(-1))-LOG(FKMQT(-2)))-0.15064*( LOG(FKMQTW1(-1))-LOG(FKMQTW1(-2)))-0.31559*(LOG(FKMQTW1(-2))-LOG( FKMQT(-2))))))*(1.0+JRFKMQT))*(1.0-DFKMQT)+DFKMQT*ZFKMQT$ FRML JLED JRFKMQT =FKMQT/(EXP(LOG(FKMQT(-1))+0.15064*(LOG(FKMQTW1)-LOG(FKMQTW1(-1)))+0.31559*(LOG( FKMQTW1(-1))-LOG(FKMQT(-1)))+ROFKMQT1*((LOG(FKMQT(-1))-LOG(FKMQT(-2)) )-0.15064*(LOG(FKMQTW1(-1))-LOG(FKMQTW1(-2)))-0.31559*(LOG(FKMQTW1(-2) )-LOG(FKMQT(-2))))))-1.0$ FRML EXO ZFKMQT =FKMQT$ FRML _DJRD FKMQTK =((FKMQT)*(1.0+JRFKMQTK))*(1.0-DFKMQTK)+DFKMQTK*ZFKMQTK$ FRML JLED JRFKMQTK =FKMQTK/(FKMQT)-1.0$ FRML EXO ZFKMQTK =FKMQTK$ FRML _KJRD FIMQT =((KFIMQT*(((FKMQT)-(FKMQT(-1)))+BIVMQT*FKMQT(-1)))*(1.0+JRFIMQT))*(1.0-DFIMQT)+ DFIMQT*ZFIMQT$ FRML JLED JRFIMQT =FIMQT/(KFIMQT*(((FKMQT)-(FKMQT(-1)))+BIVMQT*FKMQT(-1)))-1.0$ FRML EXO ZFIMQT =FIMQT$ FRML _I IMQT =FIMQT*PIMQT$ FRML _GJ_D OKNMQT =((PIMQT/PIMQT(-1)-1.)*(KNMQT(-1)+0.5*INMQT)+JOKNMQT)*(1.0-DOKNMQT)+DOKNMQT*ZOKNMQT$ FRML JLED JOKNMQT =OKNMQT-((PIMQT/PIMQT(-1)-1.)*(KNMQT(-1)+0.5*INMQT))$ FRML EXO ZOKNMQT =OKNMQT$ FRML _GJRD INVMQT =(((PIMQT/(0.5*PIMQT(-1)+0.5*PIMQT))*BINVMQT*KNMQT(-1))*(1.0+JRINVMQT))*(1.0-DINVMQT)+ DINVMQT*ZINVMQT$ FRML JLED JRINVMQT =INVMQT/((PIMQT/(0.5*PIMQT(-1)+0.5*PIMQT))*BINVMQT*KNMQT(-1))-1.0$ FRML EXO ZINVMQT =INVMQT$ FRML _I INMQT =IMQT-INVMQT$ FRML _I KNMQT =KNMQT(-1)+INMQT+OKNMQT$ FRML _DJRD HQQTN1 =(((1./DTHQQT1)*((1./(1.-0.51091))*((FXQT/155453.00000)/1.04963)**(-(1./0.30910-1.))-(0.51091 /(1.-0.51091))*(DTFKMQT1*FKMQTK/162944.00000)**(-(1./0.30910-1.)))**(-( 1./(1./0.30910-1.)))*292.31201)*(1.0+JRHQQTN1))*(1.0-DHQQTN1)+ DHQQTN1*ZHQQTN1$ FRML JLED JRHQQTN1 =HQQTN1/((1./DTHQQT1)*((1./(1.-0.51091))*((FXQT/155453.00000)/1.04963)**(-(1./0.30910-1. ))-(0.51091/(1.-0.51091))*(DTFKMQT1*FKMQTK/162944.00000)**(-(1./0.30910 -1.)))**(-(1./(1./0.30910-1.)))*292.31201)-1.0$ FRML EXO ZHQQTN1 =HQQTN1$ FRML _SJRDF HQQT1 =((EXP(0.54668*(LOG(HQQTN1)-LOG(HGQT))+LOG(HGQT)+(1.-0.54668+(-0.31433))*(LOG(HQQTN1(-1) )-LOG(HGQT(-1)))-(-0.31433)*(LOG(HQQTN1(-2))-LOG(HGQT(-2)))+ROHQQT1*( LOG(HQQT1(-1))-(0.54668*(LOG(HQQTN1(-1))-LOG(HGQT(-1)))+(1.-0.54668+( -0.31433))*(LOG(HQQTN1(-2))-LOG(HGQT(-2)))-(-0.31433)*(LOG(HQQTN1(-3) )-LOG(HGQT(-3)))+LOG(HGQT(-1))))))*(1.0+JRHQQT1))*(1.0-DHQQT1)+ DHQQT1*ZHQQT1$ FRML JLED JRHQQT1 =HQQT1/(EXP(0.54668*(LOG(HQQTN1)-LOG(HGQT))+LOG(HGQT)+(1.-0.54668+(-0.31433))*(LOG( HQQTN1(-1))-LOG(HGQT(-1)))-(-0.31433)*(LOG(HQQTN1(-2))-LOG(HGQT(-2))) +ROHQQT1*(LOG(HQQT1(-1))-(0.54668*(LOG(HQQTN1(-1))-LOG(HGQT(-1)))+(1. -0.54668+(-0.31433))*(LOG(HQQTN1(-2))-LOG(HGQT(-2)))-(-0.31433)*(LOG( HQQTN1(-3))-LOG(HGQT(-3)))+LOG(HGQT(-1))))))-1.0$ FRML EXO ZHQQT1 =HQQT1$ FRML _DJRD QQT1 =((HQQT1/(BQSQT1*HGSQT+(1.-BQSQT1)*HGWQT)*1000.)*(1.0+JRQQT1))*(1.0-DQQT1)+DQQT1* ZQQT1$ FRML JLED JRQQT1 =QQT1/(HQQT1/(BQSQT1*HGSQT+(1.-BQSQT1)*HGWQT)*1000.)-1.0$ FRML EXO ZQQT1 =QQT1$ 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.)*(1.0+JRLQT1)$ FRML JLED JRLQT1 =LQT1/((YWQT1+SIQQTL)/(QWQT1*HGWQT)*1000.)-1.0$ FRML _DJRD HQQTW1 =(((1./DTHQQT1)*(1.-0.51091)**(0.30910/(1.-0.30910))*((FXQT/155453.00000)/1.04963)*(((( UIMQT*162944.00000)/(LQT1*292.31201))*(DTHQQT1/DTFKMQT1))**(1.-0.30910 )*(0.51091/(1.-0.51091))**0.30910+1.)**(0.30910/(1.-0.30910))*292.31201 )*(1.0+JRHQQTW1))*(1.0-DHQQTW1)+DHQQTW1*ZHQQTW1$ FRML JLED JRHQQTW1 =HQQTW1/((1./DTHQQT1)*(1.-0.51091)**(0.30910/(1.-0.30910))*((FXQT/155453.00000)/1.04963 )*((((UIMQT*162944.00000)/(LQT1*292.31201))*(DTHQQT1/DTFKMQT1))**(1.-0.30910 )*(0.51091/(1.-0.51091))**0.30910+1.)**(0.30910/(1.-0.30910))*292.31201 )-1.0$ FRML EXO ZHQQTW1 =HQQTW1$ FRML _DJ_D RPIMQFE =(0.25*RPIMQFE(-1)+0.75*(PIMQF/PIMQF(-1)-1.)+JRPIMQFE)*(1.0-DRPIMQFE)+DRPIMQFE* ZRPIMQFE$ FRML JLED JRPIMQFE =RPIMQFE-(0.25*RPIMQFE(-1)+0.75*(PIMQF/PIMQF(-1)-1.))$ FRML EXO ZRPIMQFE =RPIMQFE$ FRML _DJRD YCMQF =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQF+(KNMQF(-1)+0.5*INMQF)*((1.-TSDSU1)*IWLO-0.5* RPIMQFE)))*(1.0+JRYCMQF))*(1.0-DYCMQF)+DYCMQF*ZYCMQF$ FRML JLED JRYCMQF =YCMQF/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQF+(KNMQF(-1)+0.5*INMQF)*((1.-TSDSU1)*IWLO- 0.5*RPIMQFE)))-1.0$ FRML EXO ZYCMQF =YCMQF$ FRML _D UIMQF =YCMQF/(0.5*FKMQF(-1)+0.5*FKMQF)$ FRML _DJRD FKMQFW1 =(((1./DTFKMQF1)*0.35737**(0.10000/(1.-0.10000))*((FXQF/89354.00000)/1.13369)*((((LQF1* 118.43400)/(UIMQF*38047.00000))*(DTFKMQF1/DTHQQF1))**(1.-0.10000)*((1. -0.35737)/0.35737)**0.10000+1.)**(0.10000/(1.-0.10000))*38047.00000)*(1.0 +JRFKMQFW1))*(1.0-DFKMQFW1)+DFKMQFW1*ZFKMQFW1$ FRML JLED JRFKMQFW1 =FKMQFW1/((1./DTFKMQF1)*0.35737**(0.10000/(1.-0.10000))*((FXQF/89354.00000)/1.13369)*(( ((LQF1*118.43400)/(UIMQF*38047.00000))*(DTFKMQF1/DTHQQF1))**(1.-0.10000 )*((1.-0.35737)/0.35737)**0.10000+1.)**(0.10000/(1.-0.10000))*38047.00000 )-1.0$ FRML EXO ZFKMQFW1 =FKMQFW1$ FRML _SJRDF FKMQF =((EXP(LOG(FKMQF(-1))+0.20*(LOG(FKMQFW1)-LOG(FKMQFW1(-1)))+0.20*(LOG(FKMQFW1(-1))-LOG( FKMQFW1(-2)))+0.20*(LOG(FKMQFW1(-2))-LOG(FKMQFW1(-3)))+0.20*(LOG( FKMQFW1(-3))-LOG(FKMQFW1(-4)))+0.20*(LOG(FKMQFW1(-4))-LOG(FKMQFW1(-5) ))))*(1.0+JRFKMQF))*(1.0-DFKMQF)+DFKMQF*ZFKMQF$ FRML JLED JRFKMQF =FKMQF/(EXP(LOG(FKMQF(-1))+0.20*(LOG(FKMQFW1)-LOG(FKMQFW1(-1)))+0.20*(LOG(FKMQFW1(-1)) -LOG(FKMQFW1(-2)))+0.20*(LOG(FKMQFW1(-2))-LOG(FKMQFW1(-3)))+0.20*(LOG (FKMQFW1(-3))-LOG(FKMQFW1(-4)))+0.20*(LOG(FKMQFW1(-4))-LOG(FKMQFW1(-5) ))))-1.0$ FRML EXO ZFKMQF =FKMQF$ FRML _KJRD FIMQF =((KFIMQF*(((FKMQF)-(FKMQF(-1)))+BIVMQF*FKMQF(-1)))*(1.0+JRFIMQF))*(1.0-DFIMQF)+ DFIMQF*ZFIMQF$ FRML JLED JRFIMQF =FIMQF/(KFIMQF*(((FKMQF)-(FKMQF(-1)))+BIVMQF*FKMQF(-1)))-1.0$ FRML EXO ZFIMQF =FIMQF$ FRML _I IMQF =FIMQF*PIMQF$ FRML _GJ_D OKNMQF =((PIMQF/PIMQF(-1)-1.)*(KNMQF(-1)+0.5*INMQF)+JOKNMQF)*(1.0-DOKNMQF)+DOKNMQF*ZOKNMQF$ FRML JLED JOKNMQF =OKNMQF-((PIMQF/PIMQF(-1)-1.)*(KNMQF(-1)+0.5*INMQF))$ FRML EXO ZOKNMQF =OKNMQF$ FRML _GJRD INVMQF =(((PIMQF/(0.5*PIMQF(-1)+0.5*PIMQF))*BINVMQF*KNMQF(-1))*(1.0+JRINVMQF))*(1.0-DINVMQF)+ DINVMQF*ZINVMQF$ FRML JLED JRINVMQF =INVMQF/((PIMQF/(0.5*PIMQF(-1)+0.5*PIMQF))*BINVMQF*KNMQF(-1))-1.0$ FRML EXO ZINVMQF =INVMQF$ FRML _I INMQF =IMQF-INVMQF$ FRML _I KNMQF =KNMQF(-1)+INMQF+OKNMQF$ FRML _DJRD HQQFW1 =(((1./DTHQQF1)*(1.-0.35737)**(0.10000/(1.-0.10000))*((FXQF/89354.00000)/1.13369)*(((( UIMQF*38047.00000)/(LQF1*118.43400))*(DTHQQF1/DTFKMQF1))**(1.-0.10000) *(0.35737/(1.-0.35737))**0.10000+1.)**(0.10000/(1.-0.10000))*118.43400) *(1.0+JRHQQFW1))*(1.0-DHQQFW1)+DHQQFW1*ZHQQFW1$ FRML JLED JRHQQFW1 =HQQFW1/((1./DTHQQF1)*(1.-0.35737)**(0.10000/(1.-0.10000))*((FXQF/89354.00000)/1.13369) *((((UIMQF*38047.00000)/(LQF1*118.43400))*(DTHQQF1/DTFKMQF1))**(1.-0.10000 )*(0.35737/(1.-0.35737))**0.10000+1.)**(0.10000/(1.-0.10000))*118.43400 )-1.0$ FRML EXO ZHQQFW1 =HQQFW1$ FRML _SJRDF HQQF1 =((EXP(LOG(HQQF1(-1))+0.65*((LOG(HQQFW1)-LOG(HQQFW1(-1)))-(LOG(HGQF)-LOG(HGQF(-1))))+( LOG(HGQF)-LOG(HGQF(-1)))+0.20*((LOG(HQQFW1(-1))-LOG(HQQFW1(-2)))-(LOG (HGQF(-1))-LOG(HGQF(-2))))+0.15*((LOG(HQQFW1(-2))-LOG(HQQFW1(-3)))-(LOG (HGQF(-2))-LOG(HGQF(-3))))))*(1.0+JRHQQF1))*(1.0-DHQQF1)+DHQQF1* ZHQQF1$ FRML JLED JRHQQF1 =HQQF1/(EXP(LOG(HQQF1(-1))+0.65*((LOG(HQQFW1)-LOG(HQQFW1(-1)))-(LOG(HGQF)-LOG(HGQF(-1) )))+(LOG(HGQF)-LOG(HGQF(-1)))+0.20*((LOG(HQQFW1(-1))-LOG(HQQFW1(-2))) -(LOG(HGQF(-1))-LOG(HGQF(-2))))+0.15*((LOG(HQQFW1(-2))-LOG(HQQFW1(-3) ))-(LOG(HGQF(-2))-LOG(HGQF(-3))))))-1.0$ FRML EXO ZHQQF1 =HQQF1$ FRML _DJRD QQF1 =((HQQF1/(BQSQF1*HGSQF+(1.-BQSQF1)*HGWQF)*1000.)*(1.0+JRQQF1))*(1.0-DQQF1)+DQQF1* ZQQF1$ FRML JLED JRQQF1 =QQF1/(HQQF1/(BQSQF1*HGSQF+(1.-BQSQF1)*HGWQF)*1000.)-1.0$ FRML EXO ZQQF1 =QQF1$ 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.)*(1.0+JRLQF1)$ FRML JLED JRLQF1 =LQF1/((YWQF1+SIQQFL)/(QWQF1*HGWQF)*1000.)-1.0$ FRML _DJ_D RPIMQQE =(0.25*RPIMQQE(-1)+0.75*(PIMQQ/PIMQQ(-1)-1.)+JRPIMQQE)*(1.0-DRPIMQQE)+DRPIMQQE* ZRPIMQQE$ FRML JLED JRPIMQQE =RPIMQQE-(0.25*RPIMQQE(-1)+0.75*(PIMQQ/PIMQQ(-1)-1.))$ FRML EXO ZRPIMQQE =RPIMQQE$ FRML _DJRD YCMQQ =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQQ+(KNMQQ(-1)+0.5*INMQQ)*((1.-TSDSU1)*IWLO-0.5* RPIMQQE)))*(1.0+JRYCMQQ))*(1.0-DYCMQQ)+DYCMQQ*ZYCMQQ$ FRML JLED JRYCMQQ =YCMQQ/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMQQ+(KNMQQ(-1)+0.5*INMQQ)*((1.-TSDSU1)*IWLO- 0.5*RPIMQQE)))-1.0$ FRML EXO ZYCMQQ =YCMQQ$ FRML _D UIMQQ =YCMQQ/(0.5*FKMQQ(-1)+0.5*FKMQQ)$ FRML _DJRD FKMQQW1 =(((1./DTFKMQQ1)*0.28818**(0.40000/(1.-0.40000))*((FXQQ/352530.00000)/0.96152)*(((( LQQ1*847.56500)/(UIMQQ*218851.56250))*(DTFKMQQ1/DTHQQQ1))**(1.-0.40000 )*((1.-0.28818)/0.28818)**0.40000+1.)**(0.40000/(1.-0.40000))*218851.56250 )*(1.0+JRFKMQQW1))*(1.0-DFKMQQW1)+DFKMQQW1*ZFKMQQW1$ FRML JLED JRFKMQQW1 =FKMQQW1/((1./DTFKMQQ1)*0.28818**(0.40000/(1.-0.40000))*((FXQQ/352530.00000)/0.96152)*( (((LQQ1*847.56500)/(UIMQQ*218851.56250))*(DTFKMQQ1/DTHQQQ1))**(1.-0.40000 )*((1.-0.28818)/0.28818)**0.40000+1.)**(0.40000/(1.-0.40000))*218851.56250 )-1.0$ FRML EXO ZFKMQQW1 =FKMQQW1$ FRML _SJRDF FKMQQ =((EXP(LOG(FKMQQ(-1))+0.099435*(LOG(FKMQQW1)-LOG(FKMQQW1(-1)))+0.25864*(LOG(FKMQQW1(-1) )-LOG(FKMQQ(-1)))+ROFKMQQ1*((LOG(FKMQQ(-1))-LOG(FKMQQ(-2)))-0.099435* (LOG(FKMQQW1(-1))-LOG(FKMQQW1(-2)))-0.25864*(LOG(FKMQQW1(-2))-LOG( FKMQQ(-2))))))*(1.0+JRFKMQQ))*(1.0-DFKMQQ)+DFKMQQ*ZFKMQQ$ FRML JLED JRFKMQQ =FKMQQ/(EXP(LOG(FKMQQ(-1))+0.099435*(LOG(FKMQQW1)-LOG(FKMQQW1(-1)))+0.25864*(LOG( FKMQQW1(-1))-LOG(FKMQQ(-1)))+ROFKMQQ1*((LOG(FKMQQ(-1))-LOG(FKMQQ(-2)) )-0.099435*(LOG(FKMQQW1(-1))-LOG(FKMQQW1(-2)))-0.25864*(LOG(FKMQQW1(-2) )-LOG(FKMQQ(-2))))))-1.0$ FRML EXO ZFKMQQ =FKMQQ$ FRML _DJRD FKMQQK =((FKMQQ)*(1.0+JRFKMQQK))*(1.0-DFKMQQK)+DFKMQQK*ZFKMQQK$ FRML JLED JRFKMQQK =FKMQQK/(FKMQQ)-1.0$ FRML EXO ZFKMQQK =FKMQQK$ FRML _KJRD FIMQQ =((KFIMQQ*(((FKMQQ)-(FKMQQ(-1)))+BIVMQQ*FKMQQ(-1)))*(1.0+JRFIMQQ))*(1.0-DFIMQQ)+ DFIMQQ*ZFIMQQ$ FRML JLED JRFIMQQ =FIMQQ/(KFIMQQ*(((FKMQQ)-(FKMQQ(-1)))+BIVMQQ*FKMQQ(-1)))-1.0$ FRML EXO ZFIMQQ =FIMQQ$ FRML _I IMQQ =FIMQQ*PIMQQ$ FRML _GJ_D OKNMQQ =((PIMQQ/PIMQQ(-1)-1.)*(KNMQQ(-1)+0.5*INMQQ)+JOKNMQQ)*(1.0-DOKNMQQ)+DOKNMQQ*ZOKNMQQ$ FRML JLED JOKNMQQ =OKNMQQ-((PIMQQ/PIMQQ(-1)-1.)*(KNMQQ(-1)+0.5*INMQQ))$ FRML EXO ZOKNMQQ =OKNMQQ$ FRML _GJRD INVMQQ =(((PIMQQ/(0.5*PIMQQ(-1)+0.5*PIMQQ))*BINVMQQ*KNMQQ(-1))*(1.0+JRINVMQQ))*(1.0-DINVMQQ)+ DINVMQQ*ZINVMQQ$ FRML JLED JRINVMQQ =INVMQQ/((PIMQQ/(0.5*PIMQQ(-1)+0.5*PIMQQ))*BINVMQQ*KNMQQ(-1))-1.0$ FRML EXO ZINVMQQ =INVMQQ$ FRML _I INMQQ =IMQQ-INVMQQ$ FRML _I KNMQQ =KNMQQ(-1)+INMQQ+OKNMQQ$ FRML _DJRD HQQQN1 =(((1./DTHQQQ1)*((1./(1.-0.28818))*((FXQQ/352530.00000)/0.96152)**(-(1./0.40000-1.))-(0.28818 /(1.-0.28818))*(DTFKMQQ1*FKMQQK/218851.56250)**(-(1./0.40000-1.)))**(-( 1./(1./0.40000-1.)))*847.56500)*(1.0+JRHQQQN1))*(1.0-DHQQQN1)+ DHQQQN1*ZHQQQN1$ FRML JLED JRHQQQN1 =HQQQN1/((1./DTHQQQ1)*((1./(1.-0.28818))*((FXQQ/352530.00000)/0.96152)**(-(1./0.40000-1. ))-(0.28818/(1.-0.28818))*(DTFKMQQ1*FKMQQK/218851.56250)**(-(1./0.40000 -1.)))**(-(1./(1./0.40000-1.)))*847.56500)-1.0$ FRML EXO ZHQQQN1 =HQQQN1$ FRML _SJRDF HQQQ1 =((EXP(0.47796*(LOG(HQQQN1)-LOG(HGQQ))+LOG(HGQQ)+(1.-0.47796+(-0.10580))*(LOG(HQQQN1(-1) )-LOG(HGQQ(-1)))-(-0.10580)*(LOG(HQQQN1(-2))-LOG(HGQQ(-2)))+ROHQQQ1*( LOG(HQQQ1(-1))-(0.47796*(LOG(HQQQN1(-1))-LOG(HGQQ(-1)))+(1.-0.47796+( -0.10580))*(LOG(HQQQN1(-2))-LOG(HGQQ(-2)))-(-0.10580)*(LOG(HQQQN1(-3) )-LOG(HGQQ(-3)))+LOG(HGQQ(-1))))))*(1.0+JRHQQQ1))*(1.0-DHQQQ1)+ DHQQQ1*ZHQQQ1$ FRML JLED JRHQQQ1 =HQQQ1/(EXP(0.47796*(LOG(HQQQN1)-LOG(HGQQ))+LOG(HGQQ)+(1.-0.47796+(-0.10580))*(LOG( HQQQN1(-1))-LOG(HGQQ(-1)))-(-0.10580)*(LOG(HQQQN1(-2))-LOG(HGQQ(-2))) +ROHQQQ1*(LOG(HQQQ1(-1))-(0.47796*(LOG(HQQQN1(-1))-LOG(HGQQ(-1)))+(1. -0.47796+(-0.10580))*(LOG(HQQQN1(-2))-LOG(HGQQ(-2)))-(-0.10580)*(LOG( HQQQN1(-3))-LOG(HGQQ(-3)))+LOG(HGQQ(-1))))))-1.0$ FRML EXO ZHQQQ1 =HQQQ1$ FRML _DJRD QQQ1 =((HQQQ1/(BQSQQ1*HGSQQ+(1.-BQSQQ1)*HGWQQ)*1000.)*(1.0+JRQQQ1))*(1.0-DQQQ1)+DQQQ1* ZQQQ1$ FRML JLED JRQQQ1 =QQQ1/(HQQQ1/(BQSQQ1*HGSQQ+(1.-BQSQQ1)*HGWQQ)*1000.)-1.0$ FRML EXO ZQQQ1 =QQQ1$ 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.)*(1.0+JRLQQ1)$ FRML JLED JRLQQ1 =LQQ1/((YWQQ1+SIQQQL)/(QWQQ1*HGWQQ)*1000.)-1.0$ FRML _DJRD HQQQW1 =(((1./DTHQQQ1)*(1.-0.28818)**(0.40000/(1.-0.40000))*((FXQQ/352530.00000)/0.96152)*(((( UIMQQ*218851.56250)/(LQQ1*847.56500))*(DTHQQQ1/DTFKMQQ1))**(1.-0.40000 )*(0.28818/(1.-0.28818))**0.40000+1.)**(0.40000/(1.-0.40000))*847.56500 )*(1.0+JRHQQQW1))*(1.0-DHQQQW1)+DHQQQW1*ZHQQQW1$ FRML JLED JRHQQQW1 =HQQQW1/((1./DTHQQQ1)*(1.-0.28818)**(0.40000/(1.-0.40000))*((FXQQ/352530.00000)/0.96152 )*((((UIMQQ*218851.56250)/(LQQ1*847.56500))*(DTHQQQ1/DTFKMQQ1))**(1.-0.40000 )*(0.28818/(1.-0.28818))**0.40000+1.)**(0.40000/(1.-0.40000))*847.56500 )-1.0$ FRML EXO ZHQQQW1 =HQQQW1$ FRML _DJRD YCBNE =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNE+(KNBNE(-1)+0.5*INBNE)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNE))*(1.0-DYCBNE)+DYCBNE*ZYCBNE$ FRML JLED JRYCBNE =YCBNE/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNE+(KNBNE(-1)+0.5*INBNE)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNE =YCBNE$ FRML _D UIBNE =YCBNE/(0.5*FKBNE(-1)+0.5*FKBNE)$ FRML _DJ_D RPIMNEE =(0.25*RPIMNEE(-1)+0.75*(PIMNE/PIMNE(-1)-1.)+JRPIMNEE)*(1.0-DRPIMNEE)+DRPIMNEE* ZRPIMNEE$ FRML JLED JRPIMNEE =RPIMNEE-(0.25*RPIMNEE(-1)+0.75*(PIMNE/PIMNE(-1)-1.))$ FRML EXO ZRPIMNEE =RPIMNEE$ FRML _DJRD YCMNE =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNE+(KNMNE(-1)+0.5*INMNE)*((1.-TSDSU1)*IWLO-0.5* RPIMNEE)))*(1.0+JRYCMNE))*(1.0-DYCMNE)+DYCMNE*ZYCMNE$ FRML JLED JRYCMNE =YCMNE/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMNE+(KNMNE(-1)+0.5*INMNE)*((1.-TSDSU1)*IWLO- 0.5*RPIMNEE)))-1.0$ FRML EXO ZYCMNE =YCMNE$ FRML _D UIMNE =YCMNE/(0.5*FKMNE(-1)+0.5*FKMNE)$ 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)))))*(1.0-DPKZNE1)+DPKZNE1*ZPKZNE1$ FRML EXO ZPKZNE1 =PKZNE1$ FRML _D__D PWNE2 =(EXP((1./(1.-0.12397))*LOG(1.09599**0.12397*(PKZNE1/DTFKZNE1)**(1.-0.12397)+0.000077003 **0.12397*(PVENE/DTFVENE1)**(1.-0.12397))))*(1.0-DPWNE2)+DPWNE2*ZPWNE2$ FRML EXO ZPWNE2 =PWNE2$ FRML _D DTFKZNE1 =EXP(0.20*LOG(DTHQNE1)+0.12*LOG(DTFKMNE1)+0.52*LOG(DTFKBNE1)+0.16*LOG(DTFVMNE1))$ FRML _DJRD FKZNEW1 =((EXP(LOG(FXNE/1.00000)-0.12397*LOG(PKZNE1/PWNE2)-(1.-0.12397)*LOG(DTFKZNE1)+0.076694 *D81+0.12397*LOG(1.09599)))*(1.0+JRFKZNEW1))*(1.0-DFKZNEW1)+DFKZNEW1* ZFKZNEW1$ FRML JLED JRFKZNEW1 =FKZNEW1/(EXP(LOG(FXNE/1.00000)-0.12397*LOG(PKZNE1/PWNE2)-(1.-0.12397)*LOG(DTFKZNE1)+0.076694 *D81+0.12397*LOG(1.09599)))-1.0$ FRML EXO ZFKZNEW1 =FKZNEW1$ FRML _SJRD FKZNE1 =((EXP(LOG(FKZNE1(-1))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)))+0.17828*(-0.12397)*(LOG( PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000*(1.-0.12397)*(LOG( DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1)))-0.30000*(LOG( FKZNE1(-1))-LOG(FKZNEW1(-1)))))*(1.0+JRFKZNE1))*(1.0-DFKZNE1)+ DFKZNE1*ZFKZNE1$ FRML JLED JRFKZNE1 =FKZNE1/(EXP(LOG(FKZNE1(-1))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)))+0.17828*(-0.12397)*(LOG (PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000*(1.-0.12397)*(LOG( DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1)))-0.30000*(LOG( FKZNE1(-1))-LOG(FKZNEW1(-1)))))-1.0$ FRML EXO ZFKZNE1 =FKZNE1$ FRML _DJRD FVENEW1 =((EXP(LOG(FXNE/1.00000)-0.12397*LOG(PVENE/PWNE2)-(1.-0.12397)*LOG(DTFVENE1)+(-0.33779 )*D81+0.12397*LOG(0.000077003)))*(1.0+JRFVENEW1))*(1.0-DFVENEW1)+ DFVENEW1*ZFVENEW1$ FRML JLED JRFVENEW1 =FVENEW1/(EXP(LOG(FXNE/1.00000)-0.12397*LOG(PVENE/PWNE2)-(1.-0.12397)*LOG(DTFVENE1)+(- 0.33779)*D81+0.12397*LOG(0.000077003)))-1.0$ FRML EXO ZFVENEW1 =FVENEW1$ FRML _SJRDF FVENE =((EXP(LOG(FVENE(-1))+1.31078*(LOG(FXNE)-LOG(FXNE(-1)))+1.31078*(-0.12397)*(LOG(PVENE/ PWNE2)-LOG(PVENE(-1)/PWNE2(-1)))-0.46820*(1.-0.12397)*(LOG(DTFVENE1)- LOG(DTFVENE1(-1)))+(-0.33779)*((D81)-(D81(-1)))-0.46820*(LOG(FVENE(-1) )-LOG(FVENEW1(-1)))))*(1.0+JRFVENE))*(1.0-DFVENE)+DFVENE*ZFVENE$ FRML JLED JRFVENE =FVENE/(EXP(LOG(FVENE(-1))+1.31078*(LOG(FXNE)-LOG(FXNE(-1)))+1.31078*(-0.12397)*(LOG( PVENE/PWNE2)-LOG(PVENE(-1)/PWNE2(-1)))-0.46820*(1.-0.12397)*(LOG( DTFVENE1)-LOG(DTFVENE1(-1)))+(-0.33779)*((D81)-(D81(-1)))-0.46820*(LOG (FVENE(-1))-LOG(FVENEW1(-1)))))-1.0$ FRML EXO ZFVENE =FVENE$ FRML _DJRD FKBNEW1 =((BFKBNE1*FKZNEW1*(DTFKZNE1/DTFKBNE1))*(1.0+JRFKBNEW1))*(1.0-DFKBNEW1)+DFKBNEW1* ZFKBNEW1$ FRML JLED JRFKBNEW1 =FKBNEW1/(BFKBNE1*FKZNEW1*(DTFKZNE1/DTFKBNE1))-1.0$ FRML EXO ZFKBNEW1 =FKBNEW1$ FRML _GJRDF FKBNE =((EXP(LOG(FKBNE(-1))+(LOG(BFKBNE1)-LOG(BFKBNE1(-1)))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)) )+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000 *(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1) ))-0.30000*LOG(FKBNE(-1)/FKBNEW1(-1))))*(1.0+JRFKBNE))*(1.0-DFKBNE)+ DFKBNE*ZFKBNE$ FRML JLED JRFKBNE =FKBNE/(EXP(LOG(FKBNE(-1))+(LOG(BFKBNE1)-LOG(BFKBNE1(-1)))+0.17828*(LOG(FXNE)-LOG( FXNE(-1)))+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/ PWNE2(-1)))-0.30000*(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694 *((D81)-(D81(-1)))-0.30000*LOG(FKBNE(-1)/FKBNEW1(-1))))-1.0$ FRML EXO ZFKBNE =FKBNE$ FRML _KJRD FIBNE =((KFIBNE*(((FKBNE)-(FKBNE(-1)))+BIVBNE*FKBNE(-1)))*(1.0+JRFIBNE))*(1.0-DFIBNE)+ DFIBNE*ZFIBNE$ FRML JLED JRFIBNE =FIBNE/(KFIBNE*(((FKBNE)-(FKBNE(-1)))+BIVBNE*FKBNE(-1)))-1.0$ FRML EXO ZFIBNE =FIBNE$ FRML _I IBNE =PIBNE*FIBNE$ FRML _GJ_D OKNBNE =((PIBNE/PIBNE(-1)-1.)*(KNBNE(-1)+0.5*INBNE)+JOKNBNE)*(1.0-DOKNBNE)+DOKNBNE*ZOKNBNE$ FRML JLED JOKNBNE =OKNBNE-((PIBNE/PIBNE(-1)-1.)*(KNBNE(-1)+0.5*INBNE))$ FRML EXO ZOKNBNE =OKNBNE$ FRML _GJRD INVBNE =(((1.+0.5*(PIBNE/PIBNE(-1)-1.))*BINVBNE*KNBNE(-1))*(1.0+JRINVBNE))*(1.0-DINVBNE)+ DINVBNE*ZINVBNE$ FRML JLED JRINVBNE =INVBNE/((1.+0.5*(PIBNE/PIBNE(-1)-1.))*BINVBNE*KNBNE(-1))-1.0$ FRML EXO ZINVBNE =INVBNE$ FRML _I INBNE =IBNE-INVBNE$ FRML _I KNBNE =KNBNE(-1)+INBNE+OKNBNE$ FRML _DJRD FKMNEW1 =((BFKMNE1*FKZNEW1*(DTFKZNE1/DTFKMNE1))*(1.0+JRFKMNEW1))*(1.0-DFKMNEW1)+DFKMNEW1* ZFKMNEW1$ FRML JLED JRFKMNEW1 =FKMNEW1/(BFKMNE1*FKZNEW1*(DTFKZNE1/DTFKMNE1))-1.0$ FRML EXO ZFKMNEW1 =FKMNEW1$ FRML _GJRDF FKMNE =((EXP(LOG(FKMNE(-1))+(LOG(BFKMNE1)-LOG(BFKMNE1(-1)))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)) )+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000 *(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1) ))-0.30000*LOG(FKMNE(-1)/FKMNEW1(-1))))*(1.0+JRFKMNE))*(1.0-DFKMNE)+ DFKMNE*ZFKMNE$ FRML JLED JRFKMNE =FKMNE/(EXP(LOG(FKMNE(-1))+(LOG(BFKMNE1)-LOG(BFKMNE1(-1)))+0.17828*(LOG(FXNE)-LOG( FXNE(-1)))+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/ PWNE2(-1)))-0.30000*(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694 *((D81)-(D81(-1)))-0.30000*LOG(FKMNE(-1)/FKMNEW1(-1))))-1.0$ FRML EXO ZFKMNE =FKMNE$ FRML _KJRD FIMNE =((KFIMNE*(((FKMNE)-(FKMNE(-1)))+BIVMNE*FKMNE(-1)))*(1.0+JRFIMNE))*(1.0-DFIMNE)+ DFIMNE*ZFIMNE$ FRML JLED JRFIMNE =FIMNE/(KFIMNE*(((FKMNE)-(FKMNE(-1)))+BIVMNE*FKMNE(-1)))-1.0$ FRML EXO ZFIMNE =FIMNE$ FRML _I IMNE =FIMNE*PIMNE$ FRML _GJ_D OKNMNE =((PIMNE/PIMNE(-1)-1.)*(KNMNE(-1)+0.5*INMNE)+JOKNMNE)*(1.0-DOKNMNE)+DOKNMNE*ZOKNMNE$ FRML JLED JOKNMNE =OKNMNE-((PIMNE/PIMNE(-1)-1.)*(KNMNE(-1)+0.5*INMNE))$ FRML EXO ZOKNMNE =OKNMNE$ FRML _GJRD INVMNE =(((1.+0.5*(PIMNE/PIMNE(-1)-1.))*BINVMNE*KNMNE(-1))*(1.0+JRINVMNE))*(1.0-DINVMNE)+ DINVMNE*ZINVMNE$ FRML JLED JRINVMNE =INVMNE/((1.+0.5*(PIMNE/PIMNE(-1)-1.))*BINVMNE*KNMNE(-1))-1.0$ FRML EXO ZINVMNE =INVMNE$ FRML _I INMNE =IMNE-INVMNE$ FRML _I KNMNE =KNMNE(-1)+INMNE+OKNMNE$ FRML _DJRD HQNEW1 =((BHQNE1*FKZNEW1*(DTFKZNE1/DTHQNE1))*(1.0+JRHQNEW1))*(1.0-DHQNEW1)+DHQNEW1*ZHQNEW1$ FRML JLED JRHQNEW1 =HQNEW1/(BHQNE1*FKZNEW1*(DTFKZNE1/DTHQNE1))-1.0$ FRML EXO ZHQNEW1 =HQNEW1$ FRML _GJRDF HQNE1 =((EXP(LOG(HQNE1(-1))+(LOG(BHQNE1)-LOG(BHQNE1(-1)))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)))+ 0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000 *(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1) ))-0.30000*LOG(HQNE1(-1)/HQNEW1(-1))))*(1.0+JRHQNE1))*(1.0-DHQNE1)+ DHQNE1*ZHQNE1$ FRML JLED JRHQNE1 =HQNE1/(EXP(LOG(HQNE1(-1))+(LOG(BHQNE1)-LOG(BHQNE1(-1)))+0.17828*(LOG(FXNE)-LOG(FXNE(-1) ))+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000 *(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1) ))-0.30000*LOG(HQNE1(-1)/HQNEW1(-1))))-1.0$ FRML EXO ZHQNE1 =HQNE1$ FRML _DJRD QNE1 =((HQNE1/(BQSNE1*HGSNE+(1.-BQSNE1)*HGWNE)*1000.)*(1.0+JRQNE1))*(1.0-DQNE1)+DQNE1* ZQNE1$ FRML JLED JRQNE1 =QNE1/(HQNE1/(BQSNE1*HGSNE+(1.-BQSNE1)*HGWNE)*1000.)-1.0$ FRML EXO ZQNE1 =QNE1$ 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.)*(1.0+JRLNE1))*(1.0-DLNE1)+DLNE1*ZLNE1$ FRML JLED JRLNE1 =LNE1/((YWNE1+SIQNEL)/(QWNE1*HGWNE)*1000.)-1.0$ FRML EXO ZLNE1 =LNE1$ FRML _DJRD FVMNEW1 =((BFVMNE1*FKZNEW1*(DTFKZNE1/DTFVMNE1))*(1.0+JRFVMNEW1))*(1.0-DFVMNEW1)+DFVMNEW1* ZFVMNEW1$ FRML JLED JRFVMNEW1 =FVMNEW1/(BFVMNE1*FKZNEW1*(DTFKZNE1/DTFVMNE1))-1.0$ FRML EXO ZFVMNEW1 =FVMNEW1$ FRML _GJRDF FVMNE =((EXP(LOG(FVMNE(-1))+(LOG(BFVMNE1)-LOG(BFVMNE1(-1)))+0.17828*(LOG(FXNE)-LOG(FXNE(-1)) )+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/PWNE2(-1)))-0.30000 *(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694*((D81)-(D81(-1) ))-0.30000*LOG(FVMNE(-1)/FVMNEW1(-1))))*(1.0+JRFVMNE))*(1.0-DFVMNE)+ DFVMNE*ZFVMNE$ FRML JLED JRFVMNE =FVMNE/(EXP(LOG(FVMNE(-1))+(LOG(BFVMNE1)-LOG(BFVMNE1(-1)))+0.17828*(LOG(FXNE)-LOG( FXNE(-1)))+0.17828*(-0.12397)*(LOG(PKZNE1/PWNE2)-LOG(PKZNE1(-1)/ PWNE2(-1)))-0.30000*(1.-0.12397)*(LOG(DTFKZNE1)-LOG(DTFKZNE1(-1)))+0.076694 *((D81)-(D81(-1)))-0.30000*LOG(FVMNE(-1)/FVMNEW1(-1))))-1.0$ FRML EXO ZFVMNE =FVMNE$ FRML _D PWNEW1 =(PVENE*FVENEW1+PKZNE1*FKZNEW1+SIQNE-SIQNEL-0.006*SIQEJ)/FXNE$ FRML _D PWNEVE =PVENE*FVENE/FXNE$ FRML _DJRD PXNEW1 =((EXP(LOG(PWNEW1)))*(1.0+JRPXNEW1))*(1.0-DPXNEW1)+DPXNEW1*ZPXNEW1$ FRML JLED JRPXNEW1 =PXNEW1/(EXP(LOG(PWNEW1)))-1.0$ FRML EXO ZPXNEW1 =PXNEW1$ FRML _I BYWNE1 =(YWNE1/(YRNE1+YWNE1))*(1.-DBYW)+DBYW*ZBYWNE1$ FRML _S PXNE =(1.-DBYW)*((1.-DPXNE)*((EXP(LOG(PXNE(-1))+0.85453*(LOG(PWNEVE)-LOG(PWNEVE(-1)))*( PWNEVE(-1)/PXNE(-1))+(1.-0.85453)*(LOG(PWNEVE(-1))-LOG(PWNEVE(-2)))*( PWNEVE(-1)/PXNE(-1))-0.50000*(LOG(PXNE(-1))-LOG(PXNEW1(-1)))))*(1.+ JRPXNE))+DPXNE*ZPXNE)+DBYW*(((YWNE1/BYWNE1)+SIQNE+VNE)/FXNE)$ FRML _KJRD FIME =((KFIME1*(1./DTFKME)*(DTFKME(-1)*FIME(-1))*(FXE/FXE(-3))**(1./3.))*(1.0+JRFIME))*(1.0- DFIME)+DFIME*ZFIME$ FRML JLED JRFIME =FIME/(KFIME1*(1./DTFKME)*(DTFKME(-1)*FIME(-1))*(FXE/FXE(-3))**(1./3.))-1.0$ FRML EXO ZFIME =FIME$ FRML _I IME =FIME*PIME$ FRML _GJRD FKME =((FIME/KFIME+(1.-BIVME)*FKME(-1))*(1.0+JRFKME))*(1.0-DFKME)+DFKME*ZFKME$ FRML JLED JRFKME =FKME/(FIME/KFIME+(1.-BIVME)*FKME(-1))-1.0$ FRML EXO ZFKME =FKME$ FRML _GJ_D OKNME =((PIME/PIME(-1)-1.)*(KNME(-1)+0.5*INME)+JOKNME)*(1.0-DOKNME)+DOKNME*ZOKNME$ FRML JLED JOKNME =OKNME-((PIME/PIME(-1)-1.)*(KNME(-1)+0.5*INME))$ FRML EXO ZOKNME =OKNME$ FRML _GJRD INVME =(((1.+0.5*(PIME/PIME(-1)-1.))*BINVME*KNME(-1))*(1.0+JRINVME))*(1.0-DINVME)+DINVME* ZINVME$ FRML JLED JRINVME =INVME/((1.+0.5*(PIME/PIME(-1)-1.))*BINVME*KNME(-1))-1.0$ FRML EXO ZINVME =INVME$ FRML _I INME =IME-INVME$ FRML _I KNME =KNME(-1)+INME+OKNME$ FRML _DJ_D RPIMEE =(0.25*RPIMEE(-1)+0.75*(PIME/PIME(-1)-1.)+JRPIMEE)*(1.0-DRPIMEE)+DRPIMEE*ZRPIMEE$ FRML JLED JRPIMEE =RPIMEE-(0.25*RPIMEE(-1)+0.75*(PIME/PIME(-1)-1.))$ FRML EXO ZRPIMEE =RPIMEE$ FRML _DJRD YCME =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVME+(KNME(-1)+0.5*INME)*((1.-TSDSU1)*IWLO-0.5* RPIMEE)))*(1.0+JRYCME))*(1.0-DYCME)+DYCME*ZYCME$ FRML JLED JRYCME =YCME/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVME+(KNME(-1)+0.5*INME)*((1.-TSDSU1)*IWLO-0.5* RPIMEE)))-1.0$ FRML EXO ZYCME =YCME$ FRML _D UIME =YCME/(0.5*FKME(-1)+0.5*FKME)$ FRML _DJRD YCBE =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBE+(KNBE(-1)+0.5*INBE)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBE))*(1.0-DYCBE)+DYCBE*ZYCBE$ FRML JLED JRYCBE =YCBE/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBE+(KNBE(-1)+0.5*INBE)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBE =YCBE$ FRML _D UIBE =YCBE/(0.5*FKBE(-1)+0.5*FKBE+D6680)$ FRML _G___ FKBE =(FIBE/KFIBE+(1.-BIVBE)*FKBE(-1))*(1.+JRFKBE)*(1.-DFKBE)+DFKBE*ZFKBE$ FRML _I IBE =FIBE*PIBE$ FRML _GJ_D OKNBE =((PIBE/PIBE(-1)-1.)*(KNBE(-1)+0.5*INBE)+JOKNBE)*(1.0-DOKNBE)+DOKNBE*ZOKNBE$ FRML JLED JOKNBE =OKNBE-((PIBE/PIBE(-1)-1.)*(KNBE(-1)+0.5*INBE))$ FRML EXO ZOKNBE =OKNBE$ FRML _GJRD INVBE =(((1.+0.5*(PIBE/PIBE(-1)-1.))*BINVBE*KNBE(-1))*(1.0+JRINVBE))*(1.0-DINVBE)+DINVBE* ZINVBE$ FRML JLED JRINVBE =INVBE/((1.+0.5*(PIBE/PIBE(-1)-1.))*BINVBE*KNBE(-1))-1.0$ FRML EXO ZINVBE =INVBE$ FRML _I INBE =IBE-INVBE$ FRML _I KNBE =KNBE(-1)+INBE+OKNBE$ FRML _GJRD HQE1 =((1./DTHQE*(DTHQE(-1)*HQE1(-1))*(FXE/FXE(-1)))*(1.0+JRHQE1))*(1.0-DHQE1)+DHQE1*ZHQE1$ FRML JLED JRHQE1 =HQE1/(1./DTHQE*(DTHQE(-1)*HQE1(-1))*(FXE/FXE(-1)))-1.0$ FRML EXO ZHQE1 =HQE1$ FRML _DJRD QE1 =((HQE1/(BQSE1*HGSE+(1.-BQSE1)*HGWE)*1000.)*(1.0+JRQE1))*(1.0-DQE1)+DQE1*ZQE1$ FRML JLED JRQE1 =QE1/(HQE1/(BQSE1*HGSE+(1.-BQSE1)*HGWE)*1000.)-1.0$ FRML EXO ZQE1 =QE1$ 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.)*(1.0+JRLE1))*(1.0-DLE1)+DLE1*ZLE1$ FRML JLED JRLE1 =LE1/((YWE1+SIQEL)/(QWE1*HGWE)*1000.)-1.0$ FRML EXO ZLE1 =LE1$ FRML _GJRD FIMH =((1./DTFKMH*(DTFKMH(-1)*FIMH(-1))*(FXH/FXH(-3))**(1./3.))*(1.0+JRFIMH))*(1.0-DFIMH)+ DFIMH*ZFIMH$ FRML JLED JRFIMH =FIMH/(1./DTFKMH*(DTFKMH(-1)*FIMH(-1))*(FXH/FXH(-3))**(1./3.))-1.0$ FRML EXO ZFIMH =FIMH$ FRML _I IMH =FIMH*PIMH$ FRML _GJRD FKMH =((FIMH/KFIMH+(1.-BIVMH)*FKMH(-1))*(1.0+JRFKMH))*(1.0-DFKMH)+DFKMH*ZFKMH$ FRML JLED JRFKMH =FKMH/(FIMH/KFIMH+(1.-BIVMH)*FKMH(-1))-1.0$ FRML EXO ZFKMH =FKMH$ FRML _GJ_D OKNMH =((PIMH/PIMH(-1)-1.)*(KNMH(-1)+0.5*INMH)+JOKNMH)*(1.0-DOKNMH)+DOKNMH*ZOKNMH$ FRML JLED JOKNMH =OKNMH-((PIMH/PIMH(-1)-1.)*(KNMH(-1)+0.5*INMH))$ FRML EXO ZOKNMH =OKNMH$ FRML _GJRD INVMH =(((1.+0.5*(PIMH/PIMH(-1)-1.))*BINVMH*KNMH(-1))*(1.0+JRINVMH))*(1.0-DINVMH)+DINVMH* ZINVMH$ FRML JLED JRINVMH =INVMH/((1.+0.5*(PIMH/PIMH(-1)-1.))*BINVMH*KNMH(-1))-1.0$ FRML EXO ZINVMH =INVMH$ FRML _I INMH =IMH-INVMH$ FRML _I KNMH =KNMH(-1)+INMH+OKNMH$ FRML _DJ_D RPIMHE =(0.25*RPIMHE(-1)+0.75*(PIMH/PIMH(-1)-1.)+JRPIMHE)*(1.0-DRPIMHE)+DRPIMHE*ZRPIMHE$ FRML JLED JRPIMHE =RPIMHE-(0.25*RPIMHE(-1)+0.75*(PIMH/PIMH(-1)-1.))$ FRML EXO ZRPIMHE =RPIMHE$ FRML _DJRD YCMH =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMH+(KNMH(-1)+0.5*INMH)*((1.-TSDSU1)*IWLO-0.5* RPIMHE)))*(1.0+JRYCMH))*(1.0-DYCMH)+DYCMH*ZYCMH$ FRML JLED JRYCMH =YCMH/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMH+(KNMH(-1)+0.5*INMH)*((1.-TSDSU1)*IWLO-0.5* RPIMHE)))-1.0$ FRML EXO ZYCMH =YCMH$ FRML _D UIMH =YCMH/(0.5*FKMH(-1)+0.5*FKMH)$ FRML _GJRD HQH1 =((1./DTHQH*(DTHQH(-1)*HQH1(-1))*(FXH/FXH(-1)))*(1.0+JRHQH1))*(1.0-DHQH1)+DHQH1*ZHQH1$ FRML JLED JRHQH1 =HQH1/(1./DTHQH*(DTHQH(-1)*HQH1(-1))*(FXH/FXH(-1)))-1.0$ FRML EXO ZHQH1 =HQH1$ FRML _DJRD QH1 =((HQH1/(BQSH1*HGSH+(1.-BQSH1)*HGWH)*1000.)*(1.0+JRQH1))*(1.0-DQH1)+DQH1*ZQH1$ FRML JLED JRQH1 =QH1/(HQH1/(BQSH1*HGSH+(1.-BQSH1)*HGWH)*1000.)-1.0$ FRML EXO ZQH1 =QH1$ 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.)*(1.0+JRLH1))*(1.0-DLH1)+DLH1*ZLH1$ FRML JLED JRLH1 =LH1/((YWH1+SIQHL)/(QWH1*HGWH)*1000.)-1.0$ FRML EXO ZLH1 =LH1$ FRML _I IMO =FIMO*PIMO$ FRML _GJRD FKMO =((FIMO/KFIMO+(1.-BIVMO)*FKMO(-1))*(1.0+JRFKMO))*(1.0-DFKMO)+DFKMO*ZFKMO$ FRML JLED JRFKMO =FKMO/(FIMO/KFIMO+(1.-BIVMO)*FKMO(-1))-1.0$ FRML EXO ZFKMO =FKMO$ FRML _GJ_D OKNMO =((PIMO/PIMO(-1)-1.)*(KNMO(-1)+0.5*INMO)+JOKNMO)*(1.0-DOKNMO)+DOKNMO*ZOKNMO$ FRML JLED JOKNMO =OKNMO-((PIMO/PIMO(-1)-1.)*(KNMO(-1)+0.5*INMO))$ FRML EXO ZOKNMO =OKNMO$ FRML _GJRD INVMO =(((1.+0.5*(PIMO/PIMO(-1)-1.))*BINVMO*KNMO(-1))*(1.0+JRINVMO))*(1.0-DINVMO)+DINVMO* ZINVMO$ FRML JLED JRINVMO =INVMO/((1.+0.5*(PIMO/PIMO(-1)-1.))*BINVMO*KNMO(-1))-1.0$ FRML EXO ZINVMO =INVMO$ FRML _I INMO =IMO-INVMO$ FRML _I KNMO =KNMO(-1)+INMO+OKNMO$ FRML _DJ_D RPIMOE =(0.25*RPIMOE(-1)+0.75*(PIMO/PIMO(-1)-1.)+JRPIMOE)*(1.0-DRPIMOE)+DRPIMOE*ZRPIMOE$ FRML JLED JRPIMOE =RPIMOE-(0.25*RPIMOE(-1)+0.75*(PIMO/PIMO(-1)-1.))$ FRML EXO ZRPIMOE =RPIMOE$ FRML _DJRD YCMO =(((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMO+(KNMO(-1)+0.5*INMO)*((1.-TSDSU1)*IWLO-0.5* RPIMOE)))*(1.0+JRYCMO))*(1.0-DYCMO)+DYCMO*ZYCMO$ FRML JLED JRYCMO =YCMO/((1.-TSDSU1*BIVMU)/(1.-TSDSU1)*(INVMO+(KNMO(-1)+0.5*INMO)*((1.-TSDSU1)*IWLO-0.5* RPIMOE)))-1.0$ FRML EXO ZYCMO =YCMO$ FRML _D UIMO =YCMO/(0.5*FKMO(-1)+0.5*FKMO)$ FRML _GJRD FKBO =((FIBO/KFIBO+(1.-BIVBO)*FKBO(-1))*(1.0+JRFKBO))*(1.0-DFKBO)+DFKBO*ZFKBO$ FRML JLED JRFKBO =FKBO/(FIBO/KFIBO+(1.-BIVBO)*FKBO(-1))-1.0$ FRML EXO ZFKBO =FKBO$ FRML _I IBO =FIBO*PIBO$ FRML _GJ_D OKNBO =((PIBO/PIBO(-1)-1.)*(KNBO(-1)+0.5*INBO)+JOKNBO)*(1.0-DOKNBO)+DOKNBO*ZOKNBO$ FRML JLED JOKNBO =OKNBO-((PIBO/PIBO(-1)-1.)*(KNBO(-1)+0.5*INBO))$ FRML EXO ZOKNBO =OKNBO$ FRML _GJRD INVBO =(((1.+0.5*(PIBO/PIBO(-1)-1.))*BINVBO*KNBO(-1))*(1.0+JRINVBO))*(1.0-DINVBO)+DINVBO* ZINVBO$ FRML JLED JRINVBO =INVBO/((1.+0.5*(PIBO/PIBO(-1)-1.))*BINVBO*KNBO(-1))-1.0$ FRML EXO ZINVBO =INVBO$ FRML _I INBO =IBO-INVBO$ FRML _I KNBO =KNBO(-1)+INBO+OKNBO$ FRML _DJRD YCBO =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBO+(KNBO(-1)+0.5*INBO)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBO))*(1.0-DYCBO)+DYCBO*ZYCBO$ FRML JLED JRYCBO =YCBO/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBO+(KNBO(-1)+0.5*INBO)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBO =YCBO$ FRML _D UIBO =YCBO/(0.5*FKBO(-1)+0.5*FKBO)$ FRML _D QSO2 =BQSO2/(1.-BQSO2)*QWO2$ FRML _I QO2 =QWO2+QSO2$ FRML _DJRD HQO2 =(((QO2*((BQSO2*HGSO+(1.-BQSO2)*HGWO)))/1000.)*(1.0+JRHQO2))*(1.0-DHQO2)+DHQO2*ZHQO2$ FRML JLED JRHQO2 =HQO2/((QO2*((BQSO2*HGSO+(1.-BQSO2)*HGWO)))/1000.)-1.0$ FRML EXO ZHQO2 =HQO2$ FRML _GJRD YWO2 =((LOHKK1*QWO2*(1.-BQO/2.)*0.001)*(1.0+JRYWO2))*(1.0-DYWO2)+DYWO2*ZYWO2$ FRML JLED JRYWO2 =YWO2/(LOHKK1*QWO2*(1.-BQO/2.)*0.001)-1.0$ FRML EXO ZYWO2 =YWO2$ FRML _DJRD LO1 =(((YWO2+SIQOL)/(QWO2*HGWO)*1000.)*(1.0+JRLO1))*(1.0-DLO1)+DLO1*ZLO1$ FRML JLED JRLO1 =LO1/((YWO2+SIQOL)/(QWO2*HGWO)*1000.)-1.0$ FRML EXO ZLO1 =LO1$ FRML _D FYFO =(KLOHH1*HA*QWO2*(1.-BQO/2.)*PWO(-1)+(INVMO/PIMO)*PIMO(-1)+(INVBO/PIBO)*PIBO(-1))/ PYFO(-1)$ FRML _D PWO =PWO(-1)*(FYFO*PYFO-INVMO-INVBO)/(FYFO*PYFO(-1)-(INVMO/PIMO)*PIMO(-1)-(INVBO/PIBO)* PIBO(-1))$ FRML _I FVO =FVEO+FVMO$ FRML _I FXO =(FYFO*PYFO(-1)+FVO*PVO(-1))/PXO(-1)$ FRML _I YFO =YWO2+(INVMO+INVBO)*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)*(1.0+JRFACO))*(1.0-DFACO)+DFACO*ZFACO$ FRML JLED JRFACO =FACO/(FACO(-1)*FXO/FXO(-1)+JDFACO)-1.0$ FRML EXO ZFACO =FACO$ FRML _GJRDF FBCO =((FBCO(-1)*FXO/FXO(-1)+JDFBCO)*(1.0+JRFBCO))*(1.0-DFBCO)+DFBCO*ZFBCO$ FRML JLED JRFBCO =FBCO/(FBCO(-1)*FXO/FXO(-1)+JDFBCO)-1.0$ FRML EXO ZFBCO =FBCO$ FRML _GJRDF FQHCO =((FQHCO(-1)*FXO/FXO(-1)+JDFQHCO)*(1.0+JRFQHCO))*(1.0-DFQHCO)+DFQHCO*ZFQHCO$ FRML JLED JRFQHCO =FQHCO/(FQHCO(-1)*FXO/FXO(-1)+JDFQHCO)-1.0$ FRML EXO ZFQHCO =FQHCO$ FRML _GJRDF FQTCO =((FQTCO(-1)*FXO/FXO(-1)+JDFQTCO)*(1.0+JRFQTCO))*(1.0-DFQTCO)+DFQTCO*ZFQTCO$ FRML JLED JRFQTCO =FQTCO/(FQTCO(-1)*FXO/FXO(-1)+JDFQTCO)-1.0$ FRML EXO ZFQTCO =FQTCO$ FRML _GJRDF FQQCO =((FQQCO(-1)*FXO/FXO(-1)+JDFQQCO)*(1.0+JRFQQCO))*(1.0-DFQQCO)+DFQQCO*ZFQQCO$ FRML JLED JRFQQCO =FQQCO/(FQQCO(-1)*FXO/FXO(-1)+JDFQQCO)-1.0$ FRML EXO ZFQQCO =FQQCO$ FRML _GJRDF FSICO =((FSICO(-1)*FXO/FXO(-1)+JDFSICO)*(1.0+JRFSICO))*(1.0-DFSICO)+DFSICO*ZFSICO$ FRML JLED JRFSICO =FSICO/(FSICO(-1)*FXO/FXO(-1)+JDFSICO)-1.0$ FRML EXO ZFSICO =FSICO$ 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+JFVMOX)*(1.0-DFVMOX)+DFVMOX*ZFVMOX$ FRML JLED JFVMOX =FVMOX-((TFON-KFVMO)*KFVMO0+(TFON(-1)-KFVMO)*KFVMO1+(TFON(-2)-KFVMO)*KFVMO2+(TFON(-3)- KFVMO)*KFVMO3)$ FRML EXO ZFVMOX =FVMOX$ FRML _K XO11 =CO+(XO-PXO*FOCO)*KXO11$ FRML _K VO11 =VO*KVO11$ FRML _I YFO11 =XO11-VO11$ FRML _G YWO11 =YFO11-IVO1-SIQO*KSIQO1$ FRML _I FIO11 =(FIMO11*PIMO11(-1)+FIBO11*PIBO11(-1))/PIO11(-1)$ FRML _I PIO11 =PIO11(-1)*(IMO11+IBO11)/(FIMO11*PIMO11(-1)+FIBO11*PIBO11(-1))$ FRML _K QO11 =QO2*KQO2$ FRML _I QP11 =Q1-QO11$ FRML _GJRD COII =((COII(-1)*XO11/XO11(-1))*(1.0+JRCOII))*(1.0-DCOII)+DCOII*ZCOII$ FRML JLED JRCOII =COII/(COII(-1)*XO11/XO11(-1))-1.0$ FRML EXO ZCOII =COII$ FRML _GJRD COIM =((COIM(-1)*XO11/XO11(-1))*(1.0+JRCOIM))*(1.0-DCOIM)+DCOIM*ZCOIM$ FRML JLED JRCOIM =COIM/(COIM(-1)*XO11/XO11(-1))-1.0$ FRML EXO ZCOIM =COIM$ FRML _DJ_D RPIBPE =(0.75*RPIBPE(-1)+0.25*(PIBP/PIBP(-1)-1.)+JRPIBPE)*(1.0-DRPIBPE)+DRPIBPE*ZRPIBPE$ FRML JLED JRPIBPE =RPIBPE-(0.75*RPIBPE(-1)+0.25*(PIBP/PIBP(-1)-1.))$ FRML EXO ZRPIBPE =RPIBPE$ FRML _DJRD YCBA =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBA+(KNBA(-1)+0.5*INBA)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBA))*(1.0-DYCBA)+DYCBA*ZYCBA$ FRML JLED JRYCBA =YCBA/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBA+(KNBA(-1)+0.5*INBA)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBA =YCBA$ FRML _D UIBA =YCBA/(0.5*FKBA(-1)+0.5*FKBA)$ FRML _DJRDF FKBAW =((EXP(1.25131+LOG(FXA-HOSTKOR)+(-0.12000)*LOG(UIBA/PXA)-LOG(DTFKBA)))*(1.0+JRFKBAW))* (1.0-DFKBAW)+DFKBAW*ZFKBAW$ FRML JLED JRFKBAW =FKBAW/(EXP(1.25131+LOG(FXA-HOSTKOR)+(-0.12000)*LOG(UIBA/PXA)-LOG(DTFKBA)))-1.0$ FRML EXO ZFKBAW =FKBAW$ FRML _SJRDF FKBA =((EXP(LOG(FKBA(-1))+0.040000*(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))-0.1*(LOG( FKBA(-1))-LOG(FKBAW(-1)))+ROFKBA*((LOG(FKBA(-1))-LOG(FKBA(-2)))-(0.040000 *(LOG(FXA(-1)-HOSTKOR(-1))-LOG(FXA(-2)-HOSTKOR(-2)))-0.1*(LOG(FKBA(-2) )-LOG(FKBAW(-2)))))))*(1.0+JRFKBA))*(1.0-DFKBA)+DFKBA*ZFKBA$ FRML JLED JRFKBA =FKBA/(EXP(LOG(FKBA(-1))+0.040000*(LOG(FXA-HOSTKOR)-LOG(FXA(-1)-HOSTKOR(-1)))-0.1*(LOG (FKBA(-1))-LOG(FKBAW(-1)))+ROFKBA*((LOG(FKBA(-1))-LOG(FKBA(-2)))-(0.040000 *(LOG(FXA(-1)-HOSTKOR(-1))-LOG(FXA(-2)-HOSTKOR(-2)))-0.1*(LOG(FKBA(-2) )-LOG(FKBAW(-2)))))))-1.0$ FRML EXO ZFKBA =FKBA$ FRML _KJRD FIBA =((KFIBA*(((FKBA)-(FKBA(-1)))+BIVBA*FKBA(-1)))*(1.0+JRFIBA))*(1.0-DFIBA)+DFIBA*ZFIBA$ FRML JLED JRFIBA =FIBA/(KFIBA*(((FKBA)-(FKBA(-1)))+BIVBA*FKBA(-1)))-1.0$ FRML EXO ZFIBA =FIBA$ FRML _I IBA =PIBA*FIBA$ FRML _GJ_D OKNBA =((PIBA/PIBA(-1)-1.)*(KNBA(-1)+0.5*INBA)+JOKNBA)*(1.0-DOKNBA)+DOKNBA*ZOKNBA$ FRML JLED JOKNBA =OKNBA-((PIBA/PIBA(-1)-1.)*(KNBA(-1)+0.5*INBA))$ FRML EXO ZOKNBA =OKNBA$ FRML _GJRD INVBA =(((PIBA/(0.5*PIBA(-1)+0.5*PIBA))*BINVBA*KNBA(-1))*(1.0+JRINVBA))*(1.0-DINVBA)+DINVBA* ZINVBA$ FRML JLED JRINVBA =INVBA/((PIBA/(0.5*PIBA(-1)+0.5*PIBA))*BINVBA*KNBA(-1))-1.0$ FRML EXO ZINVBA =INVBA$ FRML _I INBA =IBA-INVBA$ FRML _I KNBA =KNBA(-1)+INBA+OKNBA$ FRML _DJRD YCBNG =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNG+(KNBNG(-1)+0.5*INBNG)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNG))*(1.0-DYCBNG)+DYCBNG*ZYCBNG$ FRML JLED JRYCBNG =YCBNG/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNG+(KNBNG(-1)+0.5*INBNG)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNG =YCBNG$ FRML _D UIBNG =YCBNG/(0.5*FKBNG(-1)+0.5*FKBNG)$ FRML _DJRDF FKBNGW =((EXP(-1.18791+LOG(FXNG)+(-0.12000)*LOG(UIBNG/PXNG)-LOG(DTFKBNG)))*(1.0+JRFKBNGW))*(1.0 -DFKBNGW)+DFKBNGW*ZFKBNGW$ FRML JLED JRFKBNGW =FKBNGW/(EXP(-1.18791+LOG(FXNG)+(-0.12000)*LOG(UIBNG/PXNG)-LOG(DTFKBNG)))-1.0$ FRML EXO ZFKBNGW =FKBNGW$ FRML _SJRDF FKBNG =((EXP(LOG(FKBNG(-1))+0.040000*(LOG(FXNG)-LOG(FXNG(-1)))-0.1*(LOG(FKBNG(-1))-LOG( FKBNGW(-1)))+ROFKBNG*((LOG(FKBNG(-1))-LOG(FKBNG(-2)))-(0.040000*(LOG( FXNG(-1))-LOG(FXNG(-2)))-0.1*(LOG(FKBNG(-2))-LOG(FKBNGW(-2)))))))*(1.0 +JRFKBNG))*(1.0-DFKBNG)+DFKBNG*ZFKBNG$ FRML JLED JRFKBNG =FKBNG/(EXP(LOG(FKBNG(-1))+0.040000*(LOG(FXNG)-LOG(FXNG(-1)))-0.1*(LOG(FKBNG(-1))-LOG( FKBNGW(-1)))+ROFKBNG*((LOG(FKBNG(-1))-LOG(FKBNG(-2)))-(0.040000*(LOG( FXNG(-1))-LOG(FXNG(-2)))-0.1*(LOG(FKBNG(-2))-LOG(FKBNGW(-2)))))))-1.0$ FRML EXO ZFKBNG =FKBNG$ FRML _KJRD FIBNG =((KFIBNG*(((FKBNG)-(FKBNG(-1)))+BIVBNG*FKBNG(-1)))*(1.0+JRFIBNG))*(1.0-DFIBNG)+ DFIBNG*ZFIBNG$ FRML JLED JRFIBNG =FIBNG/(KFIBNG*(((FKBNG)-(FKBNG(-1)))+BIVBNG*FKBNG(-1)))-1.0$ FRML EXO ZFIBNG =FIBNG$ FRML _I IBNG =PIBNG*FIBNG$ FRML _GJ_D OKNBNG =((PIBNG/PIBNG(-1)-1.)*(KNBNG(-1)+0.5*INBNG)+JOKNBNG)*(1.0-DOKNBNG)+DOKNBNG*ZOKNBNG$ FRML JLED JOKNBNG =OKNBNG-((PIBNG/PIBNG(-1)-1.)*(KNBNG(-1)+0.5*INBNG))$ FRML EXO ZOKNBNG =OKNBNG$ FRML _GJRD INVBNG =(((PIBNG/(0.5*PIBNG(-1)+0.5*PIBNG))*BINVBNG*KNBNG(-1))*(1.0+JRINVBNG))*(1.0-DINVBNG)+ DINVBNG*ZINVBNG$ FRML JLED JRINVBNG =INVBNG/((PIBNG/(0.5*PIBNG(-1)+0.5*PIBNG))*BINVBNG*KNBNG(-1))-1.0$ FRML EXO ZINVBNG =INVBNG$ FRML _I INBNG =IBNG-INVBNG$ FRML _I KNBNG =KNBNG(-1)+INBNG+OKNBNG$ FRML _DJRD YCBNF =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNF+(KNBNF(-1)+0.5*INBNF)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNF))*(1.0-DYCBNF)+DYCBNF*ZYCBNF$ FRML JLED JRYCBNF =YCBNF/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNF+(KNBNF(-1)+0.5*INBNF)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNF =YCBNF$ FRML _D UIBNF =YCBNF/(0.5*FKBNF(-1)+0.5*FKBNF)$ FRML _DJRDF FKBNFW =((EXP(-1.01430+LOG(FXNF)+(-0.12000)*LOG(UIBNF/PXNF)-LOG(DTFKBNF)))*(1.0+JRFKBNFW))*(1.0 -DFKBNFW)+DFKBNFW*ZFKBNFW$ FRML JLED JRFKBNFW =FKBNFW/(EXP(-1.01430+LOG(FXNF)+(-0.12000)*LOG(UIBNF/PXNF)-LOG(DTFKBNF)))-1.0$ FRML EXO ZFKBNFW =FKBNFW$ FRML _SJRDF FKBNF =((EXP(LOG(FKBNF(-1))+0.040000*(LOG(FXNF)-LOG(FXNF(-1)))-0.1*(LOG(FKBNF(-1))-LOG( FKBNFW(-1)))+ROFKBNF*((LOG(FKBNF(-1))-LOG(FKBNF(-2)))-(0.040000*(LOG( FXNF(-1))-LOG(FXNF(-2)))-0.1*(LOG(FKBNF(-2))-LOG(FKBNFW(-2)))))))*(1.0 +JRFKBNF))*(1.0-DFKBNF)+DFKBNF*ZFKBNF$ FRML JLED JRFKBNF =FKBNF/(EXP(LOG(FKBNF(-1))+0.040000*(LOG(FXNF)-LOG(FXNF(-1)))-0.1*(LOG(FKBNF(-1))-LOG( FKBNFW(-1)))+ROFKBNF*((LOG(FKBNF(-1))-LOG(FKBNF(-2)))-(0.040000*(LOG( FXNF(-1))-LOG(FXNF(-2)))-0.1*(LOG(FKBNF(-2))-LOG(FKBNFW(-2)))))))-1.0$ FRML EXO ZFKBNF =FKBNF$ FRML _KJRD FIBNF =((KFIBNF*(((FKBNF)-(FKBNF(-1)))+BIVBNF*FKBNF(-1)))*(1.0+JRFIBNF))*(1.0-DFIBNF)+ DFIBNF*ZFIBNF$ FRML JLED JRFIBNF =FIBNF/(KFIBNF*(((FKBNF)-(FKBNF(-1)))+BIVBNF*FKBNF(-1)))-1.0$ FRML EXO ZFIBNF =FIBNF$ FRML _I IBNF =PIBNF*FIBNF$ FRML _GJ_D OKNBNF =((PIBNF/PIBNF(-1)-1.)*(KNBNF(-1)+0.5*INBNF)+JOKNBNF)*(1.0-DOKNBNF)+DOKNBNF*ZOKNBNF$ FRML JLED JOKNBNF =OKNBNF-((PIBNF/PIBNF(-1)-1.)*(KNBNF(-1)+0.5*INBNF))$ FRML EXO ZOKNBNF =OKNBNF$ FRML _GJRD INVBNF =(((PIBNF/(0.5*PIBNF(-1)+0.5*PIBNF))*BINVBNF*KNBNF(-1))*(1.0+JRINVBNF))*(1.0-DINVBNF)+ DINVBNF*ZINVBNF$ FRML JLED JRINVBNF =INVBNF/((PIBNF/(0.5*PIBNF(-1)+0.5*PIBNF))*BINVBNF*KNBNF(-1))-1.0$ FRML EXO ZINVBNF =INVBNF$ FRML _I INBNF =IBNF-INVBNF$ FRML _I KNBNF =KNBNF(-1)+INBNF+OKNBNF$ FRML _DJRD YCBNN =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNN+(KNBNN(-1)+0.5*INBNN)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNN))*(1.0-DYCBNN)+DYCBNN*ZYCBNN$ FRML JLED JRYCBNN =YCBNN/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNN+(KNBNN(-1)+0.5*INBNN)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNN =YCBNN$ FRML _D UIBNN =YCBNN/(0.5*FKBNN(-1)+0.5*FKBNN)$ FRML _DJRDF FKBNNW =((EXP(-1.47972+LOG(FXNN)+(-0.12000)*LOG(UIBNN/PXNN)-LOG(DTFKBNN)))*(1.0+JRFKBNNW))*(1.0 -DFKBNNW)+DFKBNNW*ZFKBNNW$ FRML JLED JRFKBNNW =FKBNNW/(EXP(-1.47972+LOG(FXNN)+(-0.12000)*LOG(UIBNN/PXNN)-LOG(DTFKBNN)))-1.0$ FRML EXO ZFKBNNW =FKBNNW$ FRML _SJRDF FKBNN =((EXP(LOG(FKBNN(-1))+0.040000*(LOG(FXNN)-LOG(FXNN(-1)))-0.1*(LOG(FKBNN(-1))-LOG( FKBNNW(-1)))+ROFKBNN*((LOG(FKBNN(-1))-LOG(FKBNN(-2)))-(0.040000*(LOG( FXNN(-1))-LOG(FXNN(-2)))-0.1*(LOG(FKBNN(-2))-LOG(FKBNNW(-2)))))))*(1.0 +JRFKBNN))*(1.0-DFKBNN)+DFKBNN*ZFKBNN$ FRML JLED JRFKBNN =FKBNN/(EXP(LOG(FKBNN(-1))+0.040000*(LOG(FXNN)-LOG(FXNN(-1)))-0.1*(LOG(FKBNN(-1))-LOG( FKBNNW(-1)))+ROFKBNN*((LOG(FKBNN(-1))-LOG(FKBNN(-2)))-(0.040000*(LOG( FXNN(-1))-LOG(FXNN(-2)))-0.1*(LOG(FKBNN(-2))-LOG(FKBNNW(-2)))))))-1.0$ FRML EXO ZFKBNN =FKBNN$ FRML _KJRD FIBNN =((KFIBNN*(((FKBNN)-(FKBNN(-1)))+BIVBNN*FKBNN(-1)))*(1.0+JRFIBNN))*(1.0-DFIBNN)+ DFIBNN*ZFIBNN$ FRML JLED JRFIBNN =FIBNN/(KFIBNN*(((FKBNN)-(FKBNN(-1)))+BIVBNN*FKBNN(-1)))-1.0$ FRML EXO ZFIBNN =FIBNN$ FRML _I IBNN =PIBNN*FIBNN$ FRML _GJ_D OKNBNN =((PIBNN/PIBNN(-1)-1.)*(KNBNN(-1)+0.5*INBNN)+JOKNBNN)*(1.0-DOKNBNN)+DOKNBNN*ZOKNBNN$ FRML JLED JOKNBNN =OKNBNN-((PIBNN/PIBNN(-1)-1.)*(KNBNN(-1)+0.5*INBNN))$ FRML EXO ZOKNBNN =OKNBNN$ FRML _GJRD INVBNN =(((PIBNN/(0.5*PIBNN(-1)+0.5*PIBNN))*BINVBNN*KNBNN(-1))*(1.0+JRINVBNN))*(1.0-DINVBNN)+ DINVBNN*ZINVBNN$ FRML JLED JRINVBNN =INVBNN/((PIBNN/(0.5*PIBNN(-1)+0.5*PIBNN))*BINVBNN*KNBNN(-1))-1.0$ FRML EXO ZINVBNN =INVBNN$ FRML _I INBNN =IBNN-INVBNN$ FRML _I KNBNN =KNBNN(-1)+INBNN+OKNBNN$ FRML _DJRD YCBNB =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNB+(KNBNB(-1)+0.5*INBNB)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNB))*(1.0-DYCBNB)+DYCBNB*ZYCBNB$ FRML JLED JRYCBNB =YCBNB/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNB+(KNBNB(-1)+0.5*INBNB)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNB =YCBNB$ FRML _D UIBNB =YCBNB/(0.5*FKBNB(-1)+0.5*FKBNB)$ FRML _DJRDF FKBNBW =((EXP(-0.79113+LOG(FXNB)+(-0.12000)*LOG(UIBNB/PXNB)-LOG(DTFKBNB)))*(1.0+JRFKBNBW))*(1.0 -DFKBNBW)+DFKBNBW*ZFKBNBW$ FRML JLED JRFKBNBW =FKBNBW/(EXP(-0.79113+LOG(FXNB)+(-0.12000)*LOG(UIBNB/PXNB)-LOG(DTFKBNB)))-1.0$ FRML EXO ZFKBNBW =FKBNBW$ FRML _SJRDF FKBNB =((EXP(LOG(FKBNB(-1))+0.040000*(LOG(FXNB)-LOG(FXNB(-1)))-0.1*(LOG(FKBNB(-1))-LOG( FKBNBW(-1)))+ROFKBNB*((LOG(FKBNB(-1))-LOG(FKBNB(-2)))-(0.040000*(LOG( FXNB(-1))-LOG(FXNB(-2)))-0.1*(LOG(FKBNB(-2))-LOG(FKBNBW(-2)))))))*(1.0 +JRFKBNB))*(1.0-DFKBNB)+DFKBNB*ZFKBNB$ FRML JLED JRFKBNB =FKBNB/(EXP(LOG(FKBNB(-1))+0.040000*(LOG(FXNB)-LOG(FXNB(-1)))-0.1*(LOG(FKBNB(-1))-LOG( FKBNBW(-1)))+ROFKBNB*((LOG(FKBNB(-1))-LOG(FKBNB(-2)))-(0.040000*(LOG( FXNB(-1))-LOG(FXNB(-2)))-0.1*(LOG(FKBNB(-2))-LOG(FKBNBW(-2)))))))-1.0$ FRML EXO ZFKBNB =FKBNB$ FRML _KJRD FIBNB =((KFIBNB*(((FKBNB)-(FKBNB(-1)))+BIVBNB*FKBNB(-1)))*(1.0+JRFIBNB))*(1.0-DFIBNB)+ DFIBNB*ZFIBNB$ FRML JLED JRFIBNB =FIBNB/(KFIBNB*(((FKBNB)-(FKBNB(-1)))+BIVBNB*FKBNB(-1)))-1.0$ FRML EXO ZFIBNB =FIBNB$ FRML _I IBNB =PIBNB*FIBNB$ FRML _GJ_D OKNBNB =((PIBNB/PIBNB(-1)-1.)*(KNBNB(-1)+0.5*INBNB)+JOKNBNB)*(1.0-DOKNBNB)+DOKNBNB*ZOKNBNB$ FRML JLED JOKNBNB =OKNBNB-((PIBNB/PIBNB(-1)-1.)*(KNBNB(-1)+0.5*INBNB))$ FRML EXO ZOKNBNB =OKNBNB$ FRML _GJRD INVBNB =(((PIBNB/(0.5*PIBNB(-1)+0.5*PIBNB))*BINVBNB*KNBNB(-1))*(1.0+JRINVBNB))*(1.0-DINVBNB)+ DINVBNB*ZINVBNB$ FRML JLED JRINVBNB =INVBNB/((PIBNB/(0.5*PIBNB(-1)+0.5*PIBNB))*BINVBNB*KNBNB(-1))-1.0$ FRML EXO ZINVBNB =INVBNB$ FRML _I INBNB =IBNB-INVBNB$ FRML _I KNBNB =KNBNB(-1)+INBNB+OKNBNB$ FRML _DJRD YCBNM =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNM+(KNBNM(-1)+0.5*INBNM)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNM))*(1.0-DYCBNM)+DYCBNM*ZYCBNM$ FRML JLED JRYCBNM =YCBNM/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNM+(KNBNM(-1)+0.5*INBNM)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNM =YCBNM$ FRML _D UIBNM =YCBNM/(0.5*FKBNM(-1)+0.5*FKBNM)$ FRML _DJRDF FKBNMW =((EXP(-0.93188+LOG(FXNM)+(-0.12000)*LOG(UIBNM/PXNM)-LOG(DTFKBNM)))*(1.0+JRFKBNMW))*(1.0 -DFKBNMW)+DFKBNMW*ZFKBNMW$ FRML JLED JRFKBNMW =FKBNMW/(EXP(-0.93188+LOG(FXNM)+(-0.12000)*LOG(UIBNM/PXNM)-LOG(DTFKBNM)))-1.0$ FRML EXO ZFKBNMW =FKBNMW$ FRML _SJRDF FKBNM =((EXP(LOG(FKBNM(-1))+0.040000*(LOG(FXNM)-LOG(FXNM(-1)))-0.1*(LOG(FKBNM(-1))-LOG( FKBNMW(-1)))+ROFKBNM*((LOG(FKBNM(-1))-LOG(FKBNM(-2)))-(0.040000*(LOG( FXNM(-1))-LOG(FXNM(-2)))-0.1*(LOG(FKBNM(-2))-LOG(FKBNMW(-2)))))))*(1.0 +JRFKBNM))*(1.0-DFKBNM)+DFKBNM*ZFKBNM$ FRML JLED JRFKBNM =FKBNM/(EXP(LOG(FKBNM(-1))+0.040000*(LOG(FXNM)-LOG(FXNM(-1)))-0.1*(LOG(FKBNM(-1))-LOG( FKBNMW(-1)))+ROFKBNM*((LOG(FKBNM(-1))-LOG(FKBNM(-2)))-(0.040000*(LOG( FXNM(-1))-LOG(FXNM(-2)))-0.1*(LOG(FKBNM(-2))-LOG(FKBNMW(-2)))))))-1.0$ FRML EXO ZFKBNM =FKBNM$ FRML _KJRD FIBNM =((KFIBNM*(((FKBNM)-(FKBNM(-1)))+BIVBNM*FKBNM(-1)))*(1.0+JRFIBNM))*(1.0-DFIBNM)+ DFIBNM*ZFIBNM$ FRML JLED JRFIBNM =FIBNM/(KFIBNM*(((FKBNM)-(FKBNM(-1)))+BIVBNM*FKBNM(-1)))-1.0$ FRML EXO ZFIBNM =FIBNM$ FRML _I IBNM =PIBNM*FIBNM$ FRML _GJ_D OKNBNM =((PIBNM/PIBNM(-1)-1.)*(KNBNM(-1)+0.5*INBNM)+JOKNBNM)*(1.0-DOKNBNM)+DOKNBNM*ZOKNBNM$ FRML JLED JOKNBNM =OKNBNM-((PIBNM/PIBNM(-1)-1.)*(KNBNM(-1)+0.5*INBNM))$ FRML EXO ZOKNBNM =OKNBNM$ FRML _GJRD INVBNM =(((PIBNM/(0.5*PIBNM(-1)+0.5*PIBNM))*BINVBNM*KNBNM(-1))*(1.0+JRINVBNM))*(1.0-DINVBNM)+ DINVBNM*ZINVBNM$ FRML JLED JRINVBNM =INVBNM/((PIBNM/(0.5*PIBNM(-1)+0.5*PIBNM))*BINVBNM*KNBNM(-1))-1.0$ FRML EXO ZINVBNM =INVBNM$ FRML _I INBNM =IBNM-INVBNM$ FRML _I KNBNM =KNBNM(-1)+INBNM+OKNBNM$ FRML _DJRD YCBNT =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNT+(KNBNT(-1)+0.5*INBNT)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNT))*(1.0-DYCBNT)+DYCBNT*ZYCBNT$ FRML JLED JRYCBNT =YCBNT/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNT+(KNBNT(-1)+0.5*INBNT)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNT =YCBNT$ FRML _D UIBNT =YCBNT/(0.5*FKBNT(-1)+0.5*FKBNT)$ FRML _DJRDF FKBNTW =((EXP(-1.32441+LOG(FXNT)+(-0.12000)*LOG(UIBNT/PXNT)-LOG(DTFKBNT)))*(1.0+JRFKBNTW))*(1.0 -DFKBNTW)+DFKBNTW*ZFKBNTW$ FRML JLED JRFKBNTW =FKBNTW/(EXP(-1.32441+LOG(FXNT)+(-0.12000)*LOG(UIBNT/PXNT)-LOG(DTFKBNT)))-1.0$ FRML EXO ZFKBNTW =FKBNTW$ FRML _SJRDF FKBNT =((EXP(LOG(FKBNT(-1))+0.040000*(LOG(FXNT)-LOG(FXNT(-1)))-0.1*(LOG(FKBNT(-1))-LOG( FKBNTW(-1)))+ROFKBNT*((LOG(FKBNT(-1))-LOG(FKBNT(-2)))-(0.040000*(LOG( FXNT(-1))-LOG(FXNT(-2)))-0.1*(LOG(FKBNT(-2))-LOG(FKBNTW(-2)))))))*(1.0 +JRFKBNT))*(1.0-DFKBNT)+DFKBNT*ZFKBNT$ FRML JLED JRFKBNT =FKBNT/(EXP(LOG(FKBNT(-1))+0.040000*(LOG(FXNT)-LOG(FXNT(-1)))-0.1*(LOG(FKBNT(-1))-LOG( FKBNTW(-1)))+ROFKBNT*((LOG(FKBNT(-1))-LOG(FKBNT(-2)))-(0.040000*(LOG( FXNT(-1))-LOG(FXNT(-2)))-0.1*(LOG(FKBNT(-2))-LOG(FKBNTW(-2)))))))-1.0$ FRML EXO ZFKBNT =FKBNT$ FRML _KJRD FIBNT =((KFIBNT*(((FKBNT)-(FKBNT(-1)))+BIVBNT*FKBNT(-1)))*(1.0+JRFIBNT))*(1.0-DFIBNT)+ DFIBNT*ZFIBNT$ FRML JLED JRFIBNT =FIBNT/(KFIBNT*(((FKBNT)-(FKBNT(-1)))+BIVBNT*FKBNT(-1)))-1.0$ FRML EXO ZFIBNT =FIBNT$ FRML _I IBNT =PIBNT*FIBNT$ FRML _GJ_D OKNBNT =((PIBNT/PIBNT(-1)-1.)*(KNBNT(-1)+0.5*INBNT)+JOKNBNT)*(1.0-DOKNBNT)+DOKNBNT*ZOKNBNT$ FRML JLED JOKNBNT =OKNBNT-((PIBNT/PIBNT(-1)-1.)*(KNBNT(-1)+0.5*INBNT))$ FRML EXO ZOKNBNT =OKNBNT$ FRML _GJRD INVBNT =(((PIBNT/(0.5*PIBNT(-1)+0.5*PIBNT))*BINVBNT*KNBNT(-1))*(1.0+JRINVBNT))*(1.0-DINVBNT)+ DINVBNT*ZINVBNT$ FRML JLED JRINVBNT =INVBNT/((PIBNT/(0.5*PIBNT(-1)+0.5*PIBNT))*BINVBNT*KNBNT(-1))-1.0$ FRML EXO ZINVBNT =INVBNT$ FRML _I INBNT =IBNT-INVBNT$ FRML _I KNBNT =KNBNT(-1)+INBNT+OKNBNT$ FRML _DJRD YCBNK =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNK+(KNBNK(-1)+0.5*INBNK)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNK))*(1.0-DYCBNK)+DYCBNK*ZYCBNK$ FRML JLED JRYCBNK =YCBNK/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNK+(KNBNK(-1)+0.5*INBNK)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNK =YCBNK$ FRML _D UIBNK =YCBNK/(0.5*FKBNK(-1)+0.5*FKBNK)$ FRML _DJRDF FKBNKW =((EXP(-0.36620+LOG(FXNK)+(-0.12000)*LOG(UIBNK/PXNK)-LOG(DTFKBNK)))*(1.0+JRFKBNKW))*(1.0 -DFKBNKW)+DFKBNKW*ZFKBNKW$ FRML JLED JRFKBNKW =FKBNKW/(EXP(-0.36620+LOG(FXNK)+(-0.12000)*LOG(UIBNK/PXNK)-LOG(DTFKBNK)))-1.0$ FRML EXO ZFKBNKW =FKBNKW$ FRML _SJRDF FKBNK =((EXP(LOG(FKBNK(-1))+0.040000*(LOG(FXNK)-LOG(FXNK(-1)))-0.1*(LOG(FKBNK(-1))-LOG( FKBNKW(-1)))+ROFKBNK*((LOG(FKBNK(-1))-LOG(FKBNK(-2)))-(0.040000*(LOG( FXNK(-1))-LOG(FXNK(-2)))-0.1*(LOG(FKBNK(-2))-LOG(FKBNKW(-2)))))))*(1.0 +JRFKBNK))*(1.0-DFKBNK)+DFKBNK*ZFKBNK$ FRML JLED JRFKBNK =FKBNK/(EXP(LOG(FKBNK(-1))+0.040000*(LOG(FXNK)-LOG(FXNK(-1)))-0.1*(LOG(FKBNK(-1))-LOG( FKBNKW(-1)))+ROFKBNK*((LOG(FKBNK(-1))-LOG(FKBNK(-2)))-(0.040000*(LOG( FXNK(-1))-LOG(FXNK(-2)))-0.1*(LOG(FKBNK(-2))-LOG(FKBNKW(-2)))))))-1.0$ FRML EXO ZFKBNK =FKBNK$ FRML _KJRD FIBNK =((KFIBNK*(((FKBNK)-(FKBNK(-1)))+BIVBNK*FKBNK(-1)))*(1.0+JRFIBNK))*(1.0-DFIBNK)+ DFIBNK*ZFIBNK$ FRML JLED JRFIBNK =FIBNK/(KFIBNK*(((FKBNK)-(FKBNK(-1)))+BIVBNK*FKBNK(-1)))-1.0$ FRML EXO ZFIBNK =FIBNK$ FRML _I IBNK =PIBNK*FIBNK$ FRML _GJ_D OKNBNK =((PIBNK/PIBNK(-1)-1.)*(KNBNK(-1)+0.5*INBNK)+JOKNBNK)*(1.0-DOKNBNK)+DOKNBNK*ZOKNBNK$ FRML JLED JOKNBNK =OKNBNK-((PIBNK/PIBNK(-1)-1.)*(KNBNK(-1)+0.5*INBNK))$ FRML EXO ZOKNBNK =OKNBNK$ FRML _GJRD INVBNK =(((PIBNK/(0.5*PIBNK(-1)+0.5*PIBNK))*BINVBNK*KNBNK(-1))*(1.0+JRINVBNK))*(1.0-DINVBNK)+ DINVBNK*ZINVBNK$ FRML JLED JRINVBNK =INVBNK/((PIBNK/(0.5*PIBNK(-1)+0.5*PIBNK))*BINVBNK*KNBNK(-1))-1.0$ FRML EXO ZINVBNK =INVBNK$ FRML _I INBNK =IBNK-INVBNK$ FRML _I KNBNK =KNBNK(-1)+INBNK+OKNBNK$ FRML _DJRD YCBNQ =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNQ+(KNBNQ(-1)+0.5*INBNQ)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBNQ))*(1.0-DYCBNQ)+DYCBNQ*ZYCBNQ$ FRML JLED JRYCBNQ =YCBNQ/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBNQ+(KNBNQ(-1)+0.5*INBNQ)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBNQ =YCBNQ$ FRML _D UIBNQ =YCBNQ/(0.5*FKBNQ(-1)+0.5*FKBNQ)$ FRML _DJRDF FKBNQW =((EXP(-1.17281+LOG(FXNQ)+(-0.12000)*LOG(UIBNQ/PXNQ)-LOG(DTFKBNQ)))*(1.0+JRFKBNQW))*(1.0 -DFKBNQW)+DFKBNQW*ZFKBNQW$ FRML JLED JRFKBNQW =FKBNQW/(EXP(-1.17281+LOG(FXNQ)+(-0.12000)*LOG(UIBNQ/PXNQ)-LOG(DTFKBNQ)))-1.0$ FRML EXO ZFKBNQW =FKBNQW$ FRML _SJRDF FKBNQ =((EXP(LOG(FKBNQ(-1))+0.040000*(LOG(FXNQ)-LOG(FXNQ(-1)))-0.1*(LOG(FKBNQ(-1))-LOG( FKBNQW(-1)))+ROFKBNQ*((LOG(FKBNQ(-1))-LOG(FKBNQ(-2)))-(0.040000*(LOG( FXNQ(-1))-LOG(FXNQ(-2)))-0.1*(LOG(FKBNQ(-2))-LOG(FKBNQW(-2)))))))*(1.0 +JRFKBNQ))*(1.0-DFKBNQ)+DFKBNQ*ZFKBNQ$ FRML JLED JRFKBNQ =FKBNQ/(EXP(LOG(FKBNQ(-1))+0.040000*(LOG(FXNQ)-LOG(FXNQ(-1)))-0.1*(LOG(FKBNQ(-1))-LOG( FKBNQW(-1)))+ROFKBNQ*((LOG(FKBNQ(-1))-LOG(FKBNQ(-2)))-(0.040000*(LOG( FXNQ(-1))-LOG(FXNQ(-2)))-0.1*(LOG(FKBNQ(-2))-LOG(FKBNQW(-2)))))))-1.0$ FRML EXO ZFKBNQ =FKBNQ$ FRML _KJRD FIBNQ =((KFIBNQ*(((FKBNQ)-(FKBNQ(-1)))+BIVBNQ*FKBNQ(-1)))*(1.0+JRFIBNQ))*(1.0-DFIBNQ)+ DFIBNQ*ZFIBNQ$ FRML JLED JRFIBNQ =FIBNQ/(KFIBNQ*(((FKBNQ)-(FKBNQ(-1)))+BIVBNQ*FKBNQ(-1)))-1.0$ FRML EXO ZFIBNQ =FIBNQ$ FRML _I IBNQ =PIBNQ*FIBNQ$ FRML _GJ_D OKNBNQ =((PIBNQ/PIBNQ(-1)-1.)*(KNBNQ(-1)+0.5*INBNQ)+JOKNBNQ)*(1.0-DOKNBNQ)+DOKNBNQ*ZOKNBNQ$ FRML JLED JOKNBNQ =OKNBNQ-((PIBNQ/PIBNQ(-1)-1.)*(KNBNQ(-1)+0.5*INBNQ))$ FRML EXO ZOKNBNQ =OKNBNQ$ FRML _GJRD INVBNQ =(((PIBNQ/(0.5*PIBNQ(-1)+0.5*PIBNQ))*BINVBNQ*KNBNQ(-1))*(1.0+JRINVBNQ))*(1.0-DINVBNQ)+ DINVBNQ*ZINVBNQ$ FRML JLED JRINVBNQ =INVBNQ/((PIBNQ/(0.5*PIBNQ(-1)+0.5*PIBNQ))*BINVBNQ*KNBNQ(-1))-1.0$ FRML EXO ZINVBNQ =INVBNQ$ FRML _I INBNQ =IBNQ-INVBNQ$ FRML _I KNBNQ =KNBNQ(-1)+INBNQ+OKNBNQ$ FRML _DJRD YCBB =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBB+(KNBB(-1)+0.5*INBB)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBB))*(1.0-DYCBB)+DYCBB*ZYCBB$ FRML JLED JRYCBB =YCBB/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBB+(KNBB(-1)+0.5*INBB)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBB =YCBB$ FRML _D UIBB =YCBB/(0.5*FKBB(-1)+0.5*FKBB)$ FRML _DJRDF FKBBW =((EXP(-1.60220+LOG(FXB)+(0.00)*LOG(UIBB/PXB)-LOG(DTFKBB)))*(1.0+JRFKBBW))*(1.0- DFKBBW)+DFKBBW*ZFKBBW$ FRML JLED JRFKBBW =FKBBW/(EXP(-1.60220+LOG(FXB)+(0.00)*LOG(UIBB/PXB)-LOG(DTFKBB)))-1.0$ FRML EXO ZFKBBW =FKBBW$ FRML _SJRDF FKBB =((EXP(LOG(FKBB(-1))+0.040000*(LOG(FXB)-LOG(FXB(-1)))-0.1*(LOG(FKBB(-1))-LOG(FKBBW(-1) ))+ROFKBB*((LOG(FKBB(-1))-LOG(FKBB(-2)))-(0.040000*(LOG(FXB(-1))-LOG( FXB(-2)))-0.1*(LOG(FKBB(-2))-LOG(FKBBW(-2)))))))*(1.0+JRFKBB))*(1.0- DFKBB)+DFKBB*ZFKBB$ FRML JLED JRFKBB =FKBB/(EXP(LOG(FKBB(-1))+0.040000*(LOG(FXB)-LOG(FXB(-1)))-0.1*(LOG(FKBB(-1))-LOG( FKBBW(-1)))+ROFKBB*((LOG(FKBB(-1))-LOG(FKBB(-2)))-(0.040000*(LOG(FXB(-1) )-LOG(FXB(-2)))-0.1*(LOG(FKBB(-2))-LOG(FKBBW(-2)))))))-1.0$ FRML EXO ZFKBB =FKBB$ FRML _KJRD FIBB =((KFIBB*(((FKBB)-(FKBB(-1)))+BIVBB*FKBB(-1)))*(1.0+JRFIBB))*(1.0-DFIBB)+DFIBB*ZFIBB$ FRML JLED JRFIBB =FIBB/(KFIBB*(((FKBB)-(FKBB(-1)))+BIVBB*FKBB(-1)))-1.0$ FRML EXO ZFIBB =FIBB$ FRML _I IBB =PIBB*FIBB$ FRML _GJ_D OKNBB =((PIBB/PIBB(-1)-1.)*(KNBB(-1)+0.5*INBB)+JOKNBB)*(1.0-DOKNBB)+DOKNBB*ZOKNBB$ FRML JLED JOKNBB =OKNBB-((PIBB/PIBB(-1)-1.)*(KNBB(-1)+0.5*INBB))$ FRML EXO ZOKNBB =OKNBB$ FRML _GJRD INVBB =(((PIBB/(0.5*PIBB(-1)+0.5*PIBB))*BINVBB*KNBB(-1))*(1.0+JRINVBB))*(1.0-DINVBB)+DINVBB* ZINVBB$ FRML JLED JRINVBB =INVBB/((PIBB/(0.5*PIBB(-1)+0.5*PIBB))*BINVBB*KNBB(-1))-1.0$ FRML EXO ZINVBB =INVBB$ FRML _I INBB =IBB-INVBB$ FRML _I KNBB =KNBB(-1)+INBB+OKNBB$ FRML _DJRD YCBQH =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQH+(KNBQH(-1)+0.5*INBQH)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBQH))*(1.0-DYCBQH)+DYCBQH*ZYCBQH$ FRML JLED JRYCBQH =YCBQH/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQH+(KNBQH(-1)+0.5*INBQH)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBQH =YCBQH$ FRML _D UIBQH =YCBQH/(0.5*FKBQH(-1)+0.5*FKBQH)$ FRML _DJRDF FKBQHW =((EXP(0.26369+LOG(FXQH)+(0.000)*LOG(UIBQH/PXQH)-LOG(DTFKBQH)))*(1.0+JRFKBQHW))*(1.0- DFKBQHW)+DFKBQHW*ZFKBQHW$ FRML JLED JRFKBQHW =FKBQHW/(EXP(0.26369+LOG(FXQH)+(0.000)*LOG(UIBQH/PXQH)-LOG(DTFKBQH)))-1.0$ FRML EXO ZFKBQHW =FKBQHW$ FRML _SJRDF FKBQH =((EXP(LOG(FKBQH(-1))+0.040000*(LOG(FXQH)-LOG(FXQH(-1)))-0.1*(LOG(FKBQH(-1))-LOG( FKBQHW(-1)))+ROFKBQH*((LOG(FKBQH(-1))-LOG(FKBQH(-2)))-(0.040000*(LOG( FXQH(-1))-LOG(FXQH(-2)))-0.1*(LOG(FKBQH(-2))-LOG(FKBQHW(-2)))))))*(1.0 +JRFKBQH))*(1.0-DFKBQH)+DFKBQH*ZFKBQH$ FRML JLED JRFKBQH =FKBQH/(EXP(LOG(FKBQH(-1))+0.040000*(LOG(FXQH)-LOG(FXQH(-1)))-0.1*(LOG(FKBQH(-1))-LOG( FKBQHW(-1)))+ROFKBQH*((LOG(FKBQH(-1))-LOG(FKBQH(-2)))-(0.040000*(LOG( FXQH(-1))-LOG(FXQH(-2)))-0.1*(LOG(FKBQH(-2))-LOG(FKBQHW(-2)))))))-1.0$ FRML EXO ZFKBQH =FKBQH$ FRML _KJRD FIBQH =((KFIBQH*(((FKBQH)-(FKBQH(-1)))+BIVBQH*FKBQH(-1)))*(1.0+JRFIBQH))*(1.0-DFIBQH)+ DFIBQH*ZFIBQH$ FRML JLED JRFIBQH =FIBQH/(KFIBQH*(((FKBQH)-(FKBQH(-1)))+BIVBQH*FKBQH(-1)))-1.0$ FRML EXO ZFIBQH =FIBQH$ FRML _I IBQH =PIBQH*FIBQH$ FRML _GJ_D OKNBQH =((PIBQH/PIBQH(-1)-1.)*(KNBQH(-1)+0.5*INBQH)+JOKNBQH)*(1.0-DOKNBQH)+DOKNBQH*ZOKNBQH$ FRML JLED JOKNBQH =OKNBQH-((PIBQH/PIBQH(-1)-1.)*(KNBQH(-1)+0.5*INBQH))$ FRML EXO ZOKNBQH =OKNBQH$ FRML _GJRD INVBQH =(((PIBQH/(0.5*PIBQH(-1)+0.5*PIBQH))*BINVBQH*KNBQH(-1))*(1.0+JRINVBQH))*(1.0-DINVBQH)+ DINVBQH*ZINVBQH$ FRML JLED JRINVBQH =INVBQH/((PIBQH/(0.5*PIBQH(-1)+0.5*PIBQH))*BINVBQH*KNBQH(-1))-1.0$ FRML EXO ZINVBQH =INVBQH$ FRML _I INBQH =IBQH-INVBQH$ FRML _I KNBQH =KNBQH(-1)+INBQH+OKNBQH$ FRML _DJRD YCBQS =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQS+(KNBQS(-1)+0.5*INBQS)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBQS))*(1.0-DYCBQS)+DYCBQS*ZYCBQS$ FRML JLED JRYCBQS =YCBQS/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQS+(KNBQS(-1)+0.5*INBQS)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBQS =YCBQS$ FRML _D UIBQS =YCBQS/(0.5*FKBQS(-1)+0.5*FKBQS)$ FRML _DJRDF FKBQSW =((EXP(-1.32231+LOG(FXQS)+(-0.12000)*LOG(UIBQS/PXQS)-LOG(DTFKBQS)))*(1.0+JRFKBQSW))*(1.0 -DFKBQSW)+DFKBQSW*ZFKBQSW$ FRML JLED JRFKBQSW =FKBQSW/(EXP(-1.32231+LOG(FXQS)+(-0.12000)*LOG(UIBQS/PXQS)-LOG(DTFKBQS)))-1.0$ FRML EXO ZFKBQSW =FKBQSW$ FRML _SJRDF FKBQS =((EXP(LOG(FKBQS(-1))+0.040000*(LOG(FXQS)-LOG(FXQS(-1)))-0.1*(LOG(FKBQS(-1))-LOG( FKBQSW(-1)))+0.14507*D9696+ROFKBQS*((LOG(FKBQS(-1))-LOG(FKBQS(-2)))-( 0.040000*(LOG(FXQS(-1))-LOG(FXQS(-2)))-0.1*(LOG(FKBQS(-2))-LOG( FKBQSW(-2)))))))*(1.0+JRFKBQS))*(1.0-DFKBQS)+DFKBQS*ZFKBQS$ FRML JLED JRFKBQS =FKBQS/(EXP(LOG(FKBQS(-1))+0.040000*(LOG(FXQS)-LOG(FXQS(-1)))-0.1*(LOG(FKBQS(-1))-LOG( FKBQSW(-1)))+0.14507*D9696+ROFKBQS*((LOG(FKBQS(-1))-LOG(FKBQS(-2)))-( 0.040000*(LOG(FXQS(-1))-LOG(FXQS(-2)))-0.1*(LOG(FKBQS(-2))-LOG( FKBQSW(-2)))))))-1.0$ FRML EXO ZFKBQS =FKBQS$ FRML _KJRD FIBQS =((KFIBQS*(((FKBQS)-(FKBQS(-1)))+BIVBQS*FKBQS(-1)))*(1.0+JRFIBQS))*(1.0-DFIBQS)+ DFIBQS*ZFIBQS$ FRML JLED JRFIBQS =FIBQS/(KFIBQS*(((FKBQS)-(FKBQS(-1)))+BIVBQS*FKBQS(-1)))-1.0$ FRML EXO ZFIBQS =FIBQS$ FRML _I IBQS =PIBQS*FIBQS$ FRML _GJ_D OKNBQS =((PIBQS/PIBQS(-1)-1.)*(KNBQS(-1)+0.5*INBQS)+JOKNBQS)*(1.0-DOKNBQS)+DOKNBQS*ZOKNBQS$ FRML JLED JOKNBQS =OKNBQS-((PIBQS/PIBQS(-1)-1.)*(KNBQS(-1)+0.5*INBQS))$ FRML EXO ZOKNBQS =OKNBQS$ FRML _GJRD INVBQS =(((PIBQS/(0.5*PIBQS(-1)+0.5*PIBQS))*BINVBQS*KNBQS(-1))*(1.0+JRINVBQS))*(1.0-DINVBQS)+ DINVBQS*ZINVBQS$ FRML JLED JRINVBQS =INVBQS/((PIBQS/(0.5*PIBQS(-1)+0.5*PIBQS))*BINVBQS*KNBQS(-1))-1.0$ FRML EXO ZINVBQS =INVBQS$ FRML _I INBQS =IBQS-INVBQS$ FRML _I KNBQS =KNBQS(-1)+INBQS+OKNBQS$ FRML _DJRD YCBQT =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQT+(KNBQT(-1)+0.5*INBQT)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBQT))*(1.0-DYCBQT)+DYCBQT*ZYCBQT$ FRML JLED JRYCBQT =YCBQT/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQT+(KNBQT(-1)+0.5*INBQT)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBQT =YCBQT$ FRML _D UIBQT =YCBQT/(0.5*FKBQT(-1)+0.5*FKBQT)$ FRML _DJRDF FKBQTW =((EXP(0.58993+LOG(FXQT)+(0.00)*LOG(UIBQT/PXQT)-LOG(DTFKBQT)))*(1.0+JRFKBQTW))*(1.0- DFKBQTW)+DFKBQTW*ZFKBQTW$ FRML JLED JRFKBQTW =FKBQTW/(EXP(0.58993+LOG(FXQT)+(0.00)*LOG(UIBQT/PXQT)-LOG(DTFKBQT)))-1.0$ FRML EXO ZFKBQTW =FKBQTW$ FRML _SJRDF FKBQT =((EXP(LOG(FKBQT(-1))+0.040000*(LOG(FXQT)-LOG(FXQT(-1)))-0.1*(LOG(FKBQT(-1))-LOG( FKBQTW(-1)))+ROFKBQT*((LOG(FKBQT(-1))-LOG(FKBQT(-2)))-(0.040000*(LOG( FXQT(-1))-LOG(FXQT(-2)))-0.1*(LOG(FKBQT(-2))-LOG(FKBQTW(-2)))))))*(1.0 +JRFKBQT))*(1.0-DFKBQT)+DFKBQT*ZFKBQT$ FRML JLED JRFKBQT =FKBQT/(EXP(LOG(FKBQT(-1))+0.040000*(LOG(FXQT)-LOG(FXQT(-1)))-0.1*(LOG(FKBQT(-1))-LOG( FKBQTW(-1)))+ROFKBQT*((LOG(FKBQT(-1))-LOG(FKBQT(-2)))-(0.040000*(LOG( FXQT(-1))-LOG(FXQT(-2)))-0.1*(LOG(FKBQT(-2))-LOG(FKBQTW(-2)))))))-1.0$ FRML EXO ZFKBQT =FKBQT$ FRML _KJRD FIBQT =((KFIBQT*(((FKBQT)-(FKBQT(-1)))+BIVBQT*FKBQT(-1)))*(1.0+JRFIBQT))*(1.0-DFIBQT)+ DFIBQT*ZFIBQT$ FRML JLED JRFIBQT =FIBQT/(KFIBQT*(((FKBQT)-(FKBQT(-1)))+BIVBQT*FKBQT(-1)))-1.0$ FRML EXO ZFIBQT =FIBQT$ FRML _I IBQT =PIBQT*FIBQT$ FRML _GJ_D OKNBQT =((PIBQT/PIBQT(-1)-1.)*(KNBQT(-1)+0.5*INBQT)+JOKNBQT)*(1.0-DOKNBQT)+DOKNBQT*ZOKNBQT$ FRML JLED JOKNBQT =OKNBQT-((PIBQT/PIBQT(-1)-1.)*(KNBQT(-1)+0.5*INBQT))$ FRML EXO ZOKNBQT =OKNBQT$ FRML _GJRD INVBQT =(((PIBQT/(0.5*PIBQT(-1)+0.5*PIBQT))*BINVBQT*KNBQT(-1))*(1.0+JRINVBQT))*(1.0-DINVBQT)+ DINVBQT*ZINVBQT$ FRML JLED JRINVBQT =INVBQT/((PIBQT/(0.5*PIBQT(-1)+0.5*PIBQT))*BINVBQT*KNBQT(-1))-1.0$ FRML EXO ZINVBQT =INVBQT$ FRML _I INBQT =IBQT-INVBQT$ FRML _I KNBQT =KNBQT(-1)+INBQT+OKNBQT$ FRML _DJRD YCBQF =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQF+(KNBQF(-1)+0.5*INBQF)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBQF))*(1.0-DYCBQF)+DYCBQF*ZYCBQF$ FRML JLED JRYCBQF =YCBQF/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQF+(KNBQF(-1)+0.5*INBQF)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBQF =YCBQF$ FRML _D UIBQF =YCBQF/(0.5*FKBQF(-1)+0.5*FKBQF)$ FRML _DJRDF FKBQFW =((EXP(1.26879+LOG(FXQF)+(0.00)*LOG(UIBQF/PXQF)-LOG(DTFKBQF)))*(1.0+JRFKBQFW))*(1.0- DFKBQFW)+DFKBQFW*ZFKBQFW$ FRML JLED JRFKBQFW =FKBQFW/(EXP(1.26879+LOG(FXQF)+(0.00)*LOG(UIBQF/PXQF)-LOG(DTFKBQF)))-1.0$ FRML EXO ZFKBQFW =FKBQFW$ FRML _SJRDF FKBQF =((EXP(LOG(FKBQF(-1))+0.040000*(LOG(FXQF)-LOG(FXQF(-1)))-0.1*(LOG(FKBQF(-1))-LOG( FKBQFW(-1)))+ROFKBQF*((LOG(FKBQF(-1))-LOG(FKBQF(-2)))-(0.040000*(LOG( FXQF(-1))-LOG(FXQF(-2)))-0.1*(LOG(FKBQF(-2))-LOG(FKBQFW(-2)))))))*(1.0 +JRFKBQF))*(1.0-DFKBQF)+DFKBQF*ZFKBQF$ FRML JLED JRFKBQF =FKBQF/(EXP(LOG(FKBQF(-1))+0.040000*(LOG(FXQF)-LOG(FXQF(-1)))-0.1*(LOG(FKBQF(-1))-LOG( FKBQFW(-1)))+ROFKBQF*((LOG(FKBQF(-1))-LOG(FKBQF(-2)))-(0.040000*(LOG( FXQF(-1))-LOG(FXQF(-2)))-0.1*(LOG(FKBQF(-2))-LOG(FKBQFW(-2)))))))-1.0$ FRML EXO ZFKBQF =FKBQF$ FRML _KJRD FIBQF =((KFIBQF*(((FKBQF)-(FKBQF(-1)))+BIVBQF*FKBQF(-1)))*(1.0+JRFIBQF))*(1.0-DFIBQF)+ DFIBQF*ZFIBQF$ FRML JLED JRFIBQF =FIBQF/(KFIBQF*(((FKBQF)-(FKBQF(-1)))+BIVBQF*FKBQF(-1)))-1.0$ FRML EXO ZFIBQF =FIBQF$ FRML _I IBQF =PIBQF*FIBQF$ FRML _GJ_D OKNBQF =((PIBQF/PIBQF(-1)-1.)*(KNBQF(-1)+0.5*INBQF)+JOKNBQF)*(1.0-DOKNBQF)+DOKNBQF*ZOKNBQF$ FRML JLED JOKNBQF =OKNBQF-((PIBQF/PIBQF(-1)-1.)*(KNBQF(-1)+0.5*INBQF))$ FRML EXO ZOKNBQF =OKNBQF$ FRML _GJRD INVBQF =(((PIBQF/(0.5*PIBQF(-1)+0.5*PIBQF))*BINVBQF*KNBQF(-1))*(1.0+JRINVBQF))*(1.0-DINVBQF)+ DINVBQF*ZINVBQF$ FRML JLED JRINVBQF =INVBQF/((PIBQF/(0.5*PIBQF(-1)+0.5*PIBQF))*BINVBQF*KNBQF(-1))-1.0$ FRML EXO ZINVBQF =INVBQF$ FRML _I INBQF =IBQF-INVBQF$ FRML _I KNBQF =KNBQF(-1)+INBQF+OKNBQF$ FRML _DJRD YCBQQ =(((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQQ+(KNBQQ(-1)+0.5*INBQQ)*((1.-TSDSU1)*IWBZ+0.2* TQEJ-0.50*RPIBPE)))*(1.0+JRYCBQQ))*(1.0-DYCBQQ)+DYCBQQ*ZYCBQQ$ FRML JLED JRYCBQQ =YCBQQ/((1.-TSDSU1*BIVBU)/(1.-TSDSU1)*(INVBQQ+(KNBQQ(-1)+0.5*INBQQ)*((1.-TSDSU1)*IWBZ+ 0.2*TQEJ-0.50*RPIBPE)))-1.0$ FRML EXO ZYCBQQ =YCBQQ$ FRML _D UIBQQ =YCBQQ/(0.5*FKBQQ(-1)+0.5*FKBQQ)$ FRML _DJRDF FKBQQW =((EXP(0.51251+LOG(FXQQ)+(-0.12000)*LOG(UIBQQ/PXQQ)-LOG(DTFKBQQ)))*(1.0+JRFKBQQW))*(1.0 -DFKBQQW)+DFKBQQW*ZFKBQQW$ FRML JLED JRFKBQQW =FKBQQW/(EXP(0.51251+LOG(FXQQ)+(-0.12000)*LOG(UIBQQ/PXQQ)-LOG(DTFKBQQ)))-1.0$ FRML EXO ZFKBQQW =FKBQQW$ FRML _SJRDF FKBQQ =((EXP(LOG(FKBQQ(-1))+0.040000*(LOG(FXQQ)-LOG(FXQQ(-1)))-0.1*(LOG(FKBQQ(-1))-LOG( FKBQQW(-1)))+ROFKBQQ*((LOG(FKBQQ(-1))-LOG(FKBQQ(-2)))-(0.040000*(LOG( FXQQ(-1))-LOG(FXQQ(-2)))-0.1*(LOG(FKBQQ(-2))-LOG(FKBQQW(-2)))))))*(1.0 +JRFKBQQ))*(1.0-DFKBQQ)+DFKBQQ*ZFKBQQ$ FRML JLED JRFKBQQ =FKBQQ/(EXP(LOG(FKBQQ(-1))+0.040000*(LOG(FXQQ)-LOG(FXQQ(-1)))-0.1*(LOG(FKBQQ(-1))-LOG( FKBQQW(-1)))+ROFKBQQ*((LOG(FKBQQ(-1))-LOG(FKBQQ(-2)))-(0.040000*(LOG( FXQQ(-1))-LOG(FXQQ(-2)))-0.1*(LOG(FKBQQ(-2))-LOG(FKBQQW(-2)))))))-1.0$ FRML EXO ZFKBQQ =FKBQQ$ FRML _KJRD FIBQQ =((KFIBQQ*(((FKBQQ)-(FKBQQ(-1)))+BIVBQQ*FKBQQ(-1)))*(1.0+JRFIBQQ))*(1.0-DFIBQQ)+ DFIBQQ*ZFIBQQ$ FRML JLED JRFIBQQ =FIBQQ/(KFIBQQ*(((FKBQQ)-(FKBQQ(-1)))+BIVBQQ*FKBQQ(-1)))-1.0$ FRML EXO ZFIBQQ =FIBQQ$ FRML _I IBQQ =PIBQQ*FIBQQ$ FRML _GJ_D OKNBQQ =((PIBQQ/PIBQQ(-1)-1.)*(KNBQQ(-1)+0.5*INBQQ)+JOKNBQQ)*(1.0-DOKNBQQ)+DOKNBQQ*ZOKNBQQ$ FRML JLED JOKNBQQ =OKNBQQ-((PIBQQ/PIBQQ(-1)-1.)*(KNBQQ(-1)+0.5*INBQQ))$ FRML EXO ZOKNBQQ =OKNBQQ$ FRML _GJRD INVBQQ =(((PIBQQ/(0.5*PIBQQ(-1)+0.5*PIBQQ))*BINVBQQ*KNBQQ(-1))*(1.0+JRINVBQQ))*(1.0-DINVBQQ)+ DINVBQQ*ZINVBQQ$ FRML JLED JRINVBQQ =INVBQQ/((PIBQQ/(0.5*PIBQQ(-1)+0.5*PIBQQ))*BINVBQQ*KNBQQ(-1))-1.0$ FRML EXO ZINVBQQ =INVBQQ$ FRML _I INBQQ =IBQQ-INVBQQ$ FRML _I KNBQQ =KNBQQ(-1)+INBQQ+OKNBQQ$ FRML _I UAW =UA1-(Q1-QW1)$ FRML _D UL =UA1-Q1$ FRML _D BUL1 =UL/UAW$ FRML _K ULDP =KULDP*UL$ FRML _D ULU =UL-ULDP$ FRML _G UFDP =KUFDP*(0.75*ULDP(-1)+0.25*ULDP(-2))$ FRML _KJ_D QFP =(KQFP*UFPX+JQFP)*(1.0-DQFP)+DQFP*ZQFP$ FRML JLED JQFP =QFP-(KQFP*UFPX)$ FRML EXO ZQFP =QFP$ FRML _D UFPI =UFPX+QFP$ FRML _KJ_D UFPU =(KUFPU*(UFPX+QFP)+JUFPU)*(1.0-DUFPU)+DUFPU*ZUFPU$ FRML JLED JUFPU =UFPU-(KUFPU*(UFPX+QFP))$ FRML EXO ZUFPU =UFPU$ FRML _D UP =UPT+UFPX+QFP+UFPU$ FRML _KJ_D QFO =(KQFO*UFOX+JQFO)*(1.0-DQFO)+DQFO*ZQFO$ FRML JLED JQFO =QFO-(KQFO*UFOX)$ FRML EXO ZQFO =QFO$ FRML _D UFOI =QFO+UFOX$ FRML _KJ_D UFOU =(KUFOU*(QFO+UFOX)+JUFOU)*(1.0-DUFOU)+DUFOU*ZUFOU$ FRML JLED JUFOU =UFOU-(KUFOU*(QFO+UFOX))$ FRML EXO ZUFOU =UFOU$ FRML _D UFO =UFOX+QFO+UFOU$ FRML _KJ_D QSS =(KQSS*QW1+JQSS)*(1.0-DQSS)+DQSS*ZQSS$ FRML JLED JQSS =QSS-(KQSS*QW1)$ FRML EXO ZQSS =QSS$ FRML _D UW =U-UB-UFPX-UPT$ FRML _I UWXA =(UUXA+UAKX+UREV+ULY+UFDP+USXA+USB+UMF+UEF+UOV+UFOX+UKXA+UKAK+UR-(UR1+UR2))*(1.-DUWXA) +DUWXA*ZUWXA$ FRML _D UA1 =(UW-UWXA)*(1.-D7184)+UA1E*D7184$ FRML _G__D QAK =((D7194(-1)+(BQAK*(UL/UL(-1)-1.)+1.)*QAK(-1))*(1.+JRQAK)-D7194(-1))*(1.0-DQAK)+DQAK* ZQAK$ FRML EXO ZQAK =QAK$ FRML _G__D QLTJ =((D7194(-1)+(BQLTJ*(UL/UL(-1)-1.)+1.)*QLTJ(-1))*(1.+JRQLTJ)-D7194(-1))*(1.0-DQLTJ)+ DQLTJ*ZQLTJ$ FRML EXO ZQLTJ =QLTJ$ FRML _G__D QLTF =((D4799(-1)+(BQLTF*(UL/UL(-1)-1.)+1.)*QLTF(-1))*(1.+JRQLTF)-D4799(-1))*(1.0-DQLTF)+ DQLTF*ZQLTF$ FRML EXO ZQLTF =QLTF$ FRML _G__D QLTS =((D4799(-1)+(BQLTS*(UL/UL(-1)-1.)+1.)*QLTS(-1))*(1.+JRQLTS)-D4799(-1))*(1.0-DQLTS)+ DQLTS*ZQLTS$ FRML EXO ZQLTS =QLTS$ FRML _G__D QLTR =((D7194(-1)+(BQLTR*(UL/UL(-1)-1.)+1.)*QLTR(-1))*(1.+JRQLTR)-D7194(-1))*(1.0-DQLTR)+ DQLTR*ZQLTR$ FRML EXO ZQLTR =QLTR$ FRML _D QLT =QLTJ+QLTF+QLTS+QLTR$ FRML _D QMF =QAK+QLT$ FRML _G__D UAKX =((D7193(-1)+(BUAKX*(UL/UL(-1)-1.)+1.)*UAKX(-1))*(1.+JRUAKX)-D7193(-1))*(1.0-DUAKX)+ DUAKX*ZUAKX$ FRML EXO ZUAKX =UAKX$ FRML _G__D UKAK =((D7100(-1)+(BUKAK*(UL/UL(-1)-1.)+1.)*UKAK(-1))*(1.+JRUKAK)-D7100(-1))*(1.0-DUKAK)+ DUKAK*ZUKAK$ FRML EXO ZUKAK =UKAK$ FRML _G___ UEFW =(EXP(LOG(UEFE*(1.-D4778)+D4778)+EUEFYL*LOG(((YDUEF+D99(-1))*(1.-D4799)+D4799)/((YDUA+ D99(-1))*(1.-D4799)+D4799)*((YDUAE+D99(-1))*(1.-D4799)+D4799)/(( YDUEFE+D99(-1))*(1.-D4799)+D4799)))-D4778)*(1.+JRUEFW)*(1.-DUEF)+ DUEF*ZUEF$ FRML _G__ UEF =(EXP((LOG((UEFE)*(1.-D4778)+D4778)-LOG((UEFE(-1))*(1.-D4778(-1))+D4778(-1)))+EUEFYS*( LOG(((YDUEF+D99(-1))*(1.-D4799)+D4799)/((YDUA+D99(-1))*(1.-D4799)+ D4799)*((YDUAE+D99(-1))*(1.-D4799)+D4799)/((YDUEFE+D99(-1))*(1.- D4799)+D4799))-LOG(((YDUEF(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1))/(( YDUA(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1))*((YDUAE(-1)+D99(-2))*(1.- D4799(-1))+D4799(-1))/((YDUEFE(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1)) ))+0.25*LOG(((UEFW(-1))*(1.-D4778(-1))+D4778(-1))/((UEF(-1))*(1.- D4778(-1))+D4778(-1)))+LOG((UEF(-1))*(1.-D4778(-1))+D4778(-1)))- D4778)*(1.+JRUEF)*(1.-DUEF)+DUEF*ZUEF$ FRML _S__D UUXA =((-0.52017*((Q1/U1564)-(Q1(-1)/U1564(-1)))+UUXA(-1)/U1529(-1))*U1529*(1.-D7184)+ JDUUXA)*(1.0-DUUXA)+DUUXA*ZUUXA$ FRML EXO ZUUXA =UUXA$ FRML _GJ_D HAK =(EXP(LOG((HA+HDAG)*(1.-BQ1/2.)))+JHAK)*(1.0-DHAK)+DHAK*ZHAK$ FRML JLED JHAK =HAK-(EXP(LOG((HA+HDAG)*(1.-BQ1/2.))))$ FRML EXO ZHAK =HAK$ FRML _G HAW =EXP(LOG(DTHAW)+LOG(HAWE))$ FRML _GJ__ HA =EXP((LOG(HA(-1))+0.15*(LOG(DTHAW)-LOG(DTHAW(-1)))+0.15*(LOG(HAW(-1))-LOG(HA(-1)))+ KHA)*(1.-DDTHAW)+DDTHAW*LOG(ZHA))+JHA$ FRML JLED JHA =HA-(EXP((LOG(HA(-1))+0.15*(LOG(DTHAW)-LOG(DTHAW(-1)))+0.15*(LOG(HAW(-1))-LOG(HA(-1))) +KHA)*(1.-DDTHAW)+DDTHAW*LOG(ZHA)))$ FRML _GJRD HGWA =((HGWA(-1)*HAK/HAK(-1))*(1.0+JRHGWA))*(1.0-DHGWA)+DHGWA*ZHGWA$ FRML JLED JRHGWA =HGWA/(HGWA(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWA =HGWA$ FRML _GJRD HGWE =((HGWE(-1)*HAK/HAK(-1))*(1.0+JRHGWE))*(1.0-DHGWE)+DHGWE*ZHGWE$ FRML JLED JRHGWE =HGWE/(HGWE(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWE =HGWE$ FRML _GJRD HGWNG =((HGWNG(-1)*HAK/HAK(-1))*(1.0+JRHGWNG))*(1.0-DHGWNG)+DHGWNG*ZHGWNG$ FRML JLED JRHGWNG =HGWNG/(HGWNG(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNG =HGWNG$ FRML _GJRD HGWNE =((HGWNE(-1)*HAK/HAK(-1))*(1.0+JRHGWNE))*(1.0-DHGWNE)+DHGWNE*ZHGWNE$ FRML JLED JRHGWNE =HGWNE/(HGWNE(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNE =HGWNE$ FRML _GJRD HGWNF =((HGWNF(-1)*HAK/HAK(-1))*(1.0+JRHGWNF))*(1.0-DHGWNF)+DHGWNF*ZHGWNF$ FRML JLED JRHGWNF =HGWNF/(HGWNF(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNF =HGWNF$ FRML _GJRD HGWNN =((HGWNN(-1)*HAK/HAK(-1))*(1.0+JRHGWNN))*(1.0-DHGWNN)+DHGWNN*ZHGWNN$ FRML JLED JRHGWNN =HGWNN/(HGWNN(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNN =HGWNN$ FRML _GJRD HGWNB =((HGWNB(-1)*HAK/HAK(-1))*(1.0+JRHGWNB))*(1.0-DHGWNB)+DHGWNB*ZHGWNB$ FRML JLED JRHGWNB =HGWNB/(HGWNB(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNB =HGWNB$ FRML _GJRD HGWNM =((HGWNM(-1)*HAK/HAK(-1))*(1.0+JRHGWNM))*(1.0-DHGWNM)+DHGWNM*ZHGWNM$ FRML JLED JRHGWNM =HGWNM/(HGWNM(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNM =HGWNM$ FRML _GJRD HGWNT =((HGWNT(-1)*HAK/HAK(-1))*(1.0+JRHGWNT))*(1.0-DHGWNT)+DHGWNT*ZHGWNT$ FRML JLED JRHGWNT =HGWNT/(HGWNT(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNT =HGWNT$ FRML _GJRD HGWNK =((HGWNK(-1)*HAK/HAK(-1))*(1.0+JRHGWNK))*(1.0-DHGWNK)+DHGWNK*ZHGWNK$ FRML JLED JRHGWNK =HGWNK/(HGWNK(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNK =HGWNK$ FRML _GJRD HGWNQ =((HGWNQ(-1)*HAK/HAK(-1))*(1.0+JRHGWNQ))*(1.0-DHGWNQ)+DHGWNQ*ZHGWNQ$ FRML JLED JRHGWNQ =HGWNQ/(HGWNQ(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWNQ =HGWNQ$ FRML _GJRD HGWB =((HGWB(-1)*HAK/HAK(-1))*(1.0+JRHGWB))*(1.0-DHGWB)+DHGWB*ZHGWB$ FRML JLED JRHGWB =HGWB/(HGWB(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWB =HGWB$ FRML _GJRD HGWQH =((HGWQH(-1)*HAK/HAK(-1))*(1.0+JRHGWQH))*(1.0-DHGWQH)+DHGWQH*ZHGWQH$ FRML JLED JRHGWQH =HGWQH/(HGWQH(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWQH =HGWQH$ FRML _GJRD HGWQS =((HGWQS(-1)*HAK/HAK(-1))*(1.0+JRHGWQS))*(1.0-DHGWQS)+DHGWQS*ZHGWQS$ FRML JLED JRHGWQS =HGWQS/(HGWQS(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWQS =HGWQS$ FRML _GJRD HGWQT =((HGWQT(-1)*HAK/HAK(-1))*(1.0+JRHGWQT))*(1.0-DHGWQT)+DHGWQT*ZHGWQT$ FRML JLED JRHGWQT =HGWQT/(HGWQT(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWQT =HGWQT$ FRML _GJRD HGWQF =((HGWQF(-1)*HAK/HAK(-1))*(1.0+JRHGWQF))*(1.0-DHGWQF)+DHGWQF*ZHGWQF$ FRML JLED JRHGWQF =HGWQF/(HGWQF(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWQF =HGWQF$ FRML _GJRD HGWQQ =((HGWQQ(-1)*HAK/HAK(-1))*(1.0+JRHGWQQ))*(1.0-DHGWQQ)+DHGWQQ*ZHGWQQ$ FRML JLED JRHGWQQ =HGWQQ/(HGWQQ(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWQQ =HGWQQ$ FRML _GJRD HGWH =((HGWH(-1)*HAK/HAK(-1))*(1.0+JRHGWH))*(1.0-DHGWH)+DHGWH*ZHGWH$ FRML JLED JRHGWH =HGWH/(HGWH(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWH =HGWH$ FRML _GJRD HGWO =((HGWO(-1)*HAK/HAK(-1))*(1.0+JRHGWO))*(1.0-DHGWO)+DHGWO*ZHGWO$ FRML JLED JRHGWO =HGWO/(HGWO(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGWO =HGWO$ 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)*HAK/HAK(-1))*(1.0+JRHGSA))*(1.0-DHGSA)+DHGSA*ZHGSA$ FRML JLED JRHGSA =HGSA/(HGSA(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSA =HGSA$ FRML _GJRD HGSNF =((HGSNF(-1)*HAK/HAK(-1))*(1.0+JRHGSNF))*(1.0-DHGSNF)+DHGSNF*ZHGSNF$ FRML JLED JRHGSNF =HGSNF/(HGSNF(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNF =HGSNF$ FRML _GJRD HGSNN =((HGSNN(-1)*HAK/HAK(-1))*(1.0+JRHGSNN))*(1.0-DHGSNN)+DHGSNN*ZHGSNN$ FRML JLED JRHGSNN =HGSNN/(HGSNN(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNN =HGSNN$ FRML _GJRD HGSNB =((HGSNB(-1)*HAK/HAK(-1))*(1.0+JRHGSNB))*(1.0-DHGSNB)+DHGSNB*ZHGSNB$ FRML JLED JRHGSNB =HGSNB/(HGSNB(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNB =HGSNB$ FRML _GJRD HGSNM =((HGSNM(-1)*HAK/HAK(-1))*(1.0+JRHGSNM))*(1.0-DHGSNM)+DHGSNM*ZHGSNM$ FRML JLED JRHGSNM =HGSNM/(HGSNM(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNM =HGSNM$ FRML _GJRD HGSNT =((HGSNT(-1)*HAK/HAK(-1))*(1.0+JRHGSNT))*(1.0-DHGSNT)+DHGSNT*ZHGSNT$ FRML JLED JRHGSNT =HGSNT/(HGSNT(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNT =HGSNT$ FRML _GJRD HGSNK =((HGSNK(-1)*HAK/HAK(-1))*(1.0+JRHGSNK))*(1.0-DHGSNK)+DHGSNK*ZHGSNK$ FRML JLED JRHGSNK =HGSNK/(HGSNK(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNK =HGSNK$ FRML _GJRD HGSNQ =((HGSNQ(-1)*HAK/HAK(-1))*(1.0+JRHGSNQ))*(1.0-DHGSNQ)+DHGSNQ*ZHGSNQ$ FRML JLED JRHGSNQ =HGSNQ/(HGSNQ(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSNQ =HGSNQ$ FRML _GJRD HGSB =((HGSB(-1)*HAK/HAK(-1))*(1.0+JRHGSB))*(1.0-DHGSB)+DHGSB*ZHGSB$ FRML JLED JRHGSB =HGSB/(HGSB(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSB =HGSB$ FRML _GJRD HGSQH =((HGSQH(-1)*HAK/HAK(-1))*(1.0+JRHGSQH))*(1.0-DHGSQH)+DHGSQH*ZHGSQH$ FRML JLED JRHGSQH =HGSQH/(HGSQH(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSQH =HGSQH$ FRML _GJRD HGSQS =((HGSQS(-1)*HAK/HAK(-1))*(1.0+JRHGSQS))*(1.0-DHGSQS)+DHGSQS*ZHGSQS$ FRML JLED JRHGSQS =HGSQS/(HGSQS(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSQS =HGSQS$ FRML _GJRD HGSQT =((HGSQT(-1)*HAK/HAK(-1))*(1.0+JRHGSQT))*(1.0-DHGSQT)+DHGSQT*ZHGSQT$ FRML JLED JRHGSQT =HGSQT/(HGSQT(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSQT =HGSQT$ FRML _GJRD HGSQQ =((HGSQQ(-1)*HAK/HAK(-1))*(1.0+JRHGSQQ))*(1.0-DHGSQQ)+DHGSQQ*ZHGSQQ$ FRML JLED JRHGSQQ =HGSQQ/(HGSQQ(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSQQ =HGSQQ$ FRML _GJRD HGSH =((HGSH(-1)*HAK/HAK(-1))*(1.0+JRHGSH))*(1.0-DHGSH)+DHGSH*ZHGSH$ FRML JLED JRHGSH =HGSH/(HGSH(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSH =HGSH$ FRML _GJRD HGSO =((HGSO(-1)*HAK/HAK(-1))*(1.0+JRHGSO))*(1.0-DHGSO)+DHGSO*ZHGSO$ FRML JLED JRHGSO =HGSO/(HGSO(-1)*HAK/HAK(-1))-1.0$ FRML EXO ZHGSO =HGSO$ 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 =BQSO2*HGSO+(1.-BQSO2)*HGWO$ FRML _G DTLNAP =(1.+EHGWL*LOG(HAW/HAWE)+EBTYDDL*LOG(((BTYDD+D99(-1))*(1.-D4799)+D4799)/((BTYDDE+D99(-1) )*(1.-D4799)+D4799))+BWB*ETSS0WL*LOG((1.-TSS0WB)/(1.-TSS0WBE))+BWM* ETSS0WL*LOG((1.-TSS0WM)/(1.-TSS0WME))+BWT*ETSS0WL*LOG((1.-TSS0WT)/(1. -TSS0WTE))+BWB*ETSSMWL*LOG((1.-TSSMWB)/(1.-TSSMWBE))+BWM*ETSSMWL*LOG( (1.-TSSMWM)/(1.-TSSMWME))+BWT*ETSSMWL*LOG((1.-TSSMWT)/(1.-TSSMWTE))+ EPCPL*LOG((1.-TSDA)/(1.-TSDAE))+EPCPL*LOG(PCP/PCPE))*(1.-DDTLNAP)+ DDTLNAP*ZDTLNAP$ FRML _G DTHAW =(1.+BWB*ETSS0WH*LOG((1.-TSS0WB)/(1.-TSS0WBE))+BWM*ETSS0WH*LOG((1.-TSS0WM)/(1.- TSS0WME))+BWT*ETSS0WH*LOG((1.-TSS0WT)/(1.-TSS0WTE))+BWB*ETSSMWH*LOG(( 1.-TSSMWB)/(1.-TSSMWBE))+BWM*ETSSMWH*LOG((1.-TSSMWM)/(1.-TSSMWME))+ BWT*ETSSMWH*LOG((1.-TSSMWT)/(1.-TSSMWTE))+EPCPH*LOG((1.-TSDA)/(1.- TSDAE))+EPCPH*LOG((PCP/LNAP)*(LNAPE/PCPE)))*(1.-DDTHAW)+DDTHAW* ZDTHAW$ FRML _GJ_D YDNA =((LNAP*HGWN*(1.-(TSDA+TAQWY1))-TSAQW1)*(1.-TSS0W)*(1.-D4799)+JYDNA)*(1.0-DYDNA)+ DYDNA*ZYDNA$ FRML JLED JYDNA =YDNA-((LNAP*HGWN*(1.-(TSDA+TAQWY1))-TSAQW1)*(1.-TSS0W)*(1.-D4799))$ FRML EXO ZYDNA =YDNA$ FRML _GJRD TTYD =((TTYD(-1)*(1.+(LOG(LIH*HA)-LOG(LIH(-1)*HA(-1)))))*(1.0+JRTTYD))*(1.0-DTTYD)+DTTYD* ZTTYD$ FRML JLED JRTTYD =TTYD/(TTYD(-1)*(1.+(LOG(LIH*HA)-LOG(LIH(-1)*HA(-1)))))-1.0$ FRML EXO ZTTYD =TTYD$ FRML _GJ_D YDL =(TTYD*(1.-TAQWY1)*(1.-TSS0L)*(1.-D4799)+JYDL)*(1.0-DYDL)+DYDL*ZYDL$ FRML JLED JYDL =YDL-(TTYD*(1.-TAQWY1)*(1.-TSS0L)*(1.-D4799))$ FRML EXO ZYDL =YDL$ FRML _G__D BTYDD =((YDL*(1.-D4799)+D4799)/(YDNA*(1.-D4799)+D4799)-D4799)*(1.0-DBTYDD)+DBTYDD*ZBTYDD$ FRML EXO ZBTYDD =BTYDD$ FRML _GJ_D YDUA =(BUL1*YDL+(1.-BUL1)*YDNA+JYDUA)*(1.0-DYDUA)+DYDUA*ZYDUA$ FRML JLED JYDUA =YDUA-(BUL1*YDL+(1.-BUL1)*YDNA)$ FRML EXO ZYDUA =YDUA$ FRML _D TTYSAE1 =(TYPEF+TYPOV)/((UEF+UOV)*PTTY1*0.001)$ FRML _GJ_D YDUEF =(TTYSAE1*PTTY1*(1.-TSS0EF)*(1.-D4799)+JYDUEF)*(1.0-DYDUEF)+DYDUEF*ZYDUEF$ FRML JLED JYDUEF =YDUEF-(TTYSAE1*PTTY1*(1.-TSS0EF)*(1.-D4799))$ FRML EXO ZYDUEF =YDUEF$ 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-QSO2-QSNG1-QSNE1-QSNF1-QSNN1-QSNB1-QSNM1-QSNT1-QSNK1-QSNQ1- QSQH1-QSQS1-QSQT1-QSQF1-QSQQ1$ FRML _I QS1 =Q1-QW1$ FRML _I QWP1 =QW1-QWO2$ FRML _I QSP1 =QS1-QSO2$ FRML _I PEE3R =(BOIL/28.37000)*(EWUS/8.09029)*KPEE3R$ FRML _SJRDF PM3R =((EXP(LOG(PM3R(-1))+0.79812*(LOG(PEE3R)-LOG(PEE3R(-1)))+(1.-0.79812)*(1.-0.43561)*(LOG (PEE3R(-1))-LOG(PEE3R(-2)))-0.43561*(LOG(PM3R(-1))-LOG(PEE3R(-1)))-0.022252 ))*(1.0+JRPM3R))*(1.0-DPM3R)+DPM3R*ZPM3R$ FRML JLED JRPM3R =PM3R/(EXP(LOG(PM3R(-1))+0.79812*(LOG(PEE3R)-LOG(PEE3R(-1)))+(1.-0.79812)*(1.-0.43561) *(LOG(PEE3R(-1))-LOG(PEE3R(-2)))-0.43561*(LOG(PM3R(-1))-LOG(PEE3R(-1) ))-0.022252))-1.0$ FRML EXO ZPM3R =PM3R$ FRML _SJRDF PM3K =((EXP(LOG(PM3K(-1))+0.35404*(LOG(PEE3R)-LOG(PEE3R(-1)))-0.87310*(LOG(PM3K(-1))-0.63923 *LOG(PEE3R(-1)))+0.247535))*(1.0+JRPM3K))*(1.0-DPM3K)+DPM3K*ZPM3K$ FRML JLED JRPM3K =PM3K/(EXP(LOG(PM3K(-1))+0.35404*(LOG(PEE3R)-LOG(PEE3R(-1)))-0.87310*(LOG(PM3K(-1))-0.63923 *LOG(PEE3R(-1)))+0.247535))-1.0$ FRML EXO ZPM3K =PM3K$ FRML _SJRDF PM3Q =((EXP(LOG(PM3Q(-1))+0.68961*(LOG(PEE3R)-LOG(PEE3R(-1)))+(0.88159-0.68961)*(1.-0.47655 )*(LOG(PEE3R(-1))-LOG(PEE3R(-2)))-0.47655*(LOG(PM3Q(-1))-0.88159*LOG( PEE3R(-1)))+0.017361))*(1.0+JRPM3Q))*(1.0-DPM3Q)+DPM3Q*ZPM3Q$ FRML JLED JRPM3Q =PM3Q/(EXP(LOG(PM3Q(-1))+0.68961*(LOG(PEE3R)-LOG(PEE3R(-1)))+(0.88159-0.68961)*(1.-0.47655 )*(LOG(PEE3R(-1))-LOG(PEE3R(-2)))-0.47655*(LOG(PM3Q(-1))-0.88159*LOG( PEE3R(-1)))+0.017361))-1.0$ FRML EXO ZPM3Q =PM3Q$ FRML _I BYWA1 =YWA1/(YRA1+YWA1)$ FRML _DJRD PWAW1 =(((UIMA*FKMAW1+UIBA*FKBAW+LA1*HQAW1+PVEA*FVEAW1+PVMA*FVMA+SIQA-0.094*SIQEJ-SIQAL)/ FXA)*(1.0+JRPWAW1))*(1.0-DPWAW1)+DPWAW1*ZPWAW1$ FRML JLED JRPWAW1 =PWAW1/((UIMA*FKMAW1+UIBA*FKBAW+LA1*HQAW1+PVEA*FVEAW1+PVMA*FVMA+SIQA-0.094*SIQEJ- SIQAL)/FXA)-1.0$ FRML EXO ZPWAW1 =PWAW1$ FRML _SJRD PXA =((EXP(LOG(PXA(-1))+0.89219*(LOG(PNE0)-LOG(PNE0(-1)))+0.10781*(LOG(PNE0(-1))-LOG(PNE0(-2) ))))*(1.0+JRPXA))*(1.0-DPXA)+DPXA*ZPXA$ FRML JLED JRPXA =PXA/(EXP(LOG(PXA(-1))+0.89219*(LOG(PNE0)-LOG(PNE0(-1)))+0.10781*(LOG(PNE0(-1))-LOG( PNE0(-2)))))-1.0$ FRML EXO ZPXA =PXA$ FRML _I BYWE1 =YWE1/(YRE1+YWE1)$ FRML _GJR PXE =(PXE(-1)*((PM3R+TM3R)/(PM3R(-1)+TM3R(-1))))*(1.0+JRPXE)$ FRML JLED JRPXE =PXE/(PXE(-1)*((PM3R+TM3R)/(PM3R(-1)+TM3R(-1))))-1.0$ FRML _I BYWNG1 =YWNG1/(YRNG1+YWNG1)$ FRML _GJR PXNG =(PXNG(-1)*((PM3Q+TM3Q)/(PM3Q(-1)+TM3Q(-1))))*(1.0+JRPXNG)$ FRML JLED JRPXNG =PXNG/(PXNG(-1)*((PM3Q+TM3Q)/(PM3Q(-1)+TM3Q(-1))))-1.0$ FRML _I BYWH1 =YWH1/(YRH1+YWH1)$ FRML _GJ_D PXH =(KPXH*(PNCH-(ABCH*PXB+AQQCH*PXQQ))/AHCH+JPXH)*(1.0-DPXH)+DPXH*ZPXH$ FRML JLED JPXH =PXH-(KPXH*(PNCH-(ABCH*PXB+AQQCH*PXQQ))/AHCH)$ FRML EXO ZPXH =PXH$ FRML _I BYWNF1 =YWNF1/(YRNF1+YWNF1)$ FRML _D PWNFW1 =(UIMNF*FKMNFW1+UIBNF*FKBNFW+LNF1*HQNFW1+PVENF*FVENFW1+PVMNF*FVMNF+SIQNF-0.008*SIQEJ- SIQNFL)/FXNF$ FRML _D PWNFVV =VNF/FXNF$ FRML _D PWNFVL1 =(LNF1*HQNFN1)/FXNF$ FRML _DJRD PXNFW1 =((EXP(LOG(PWNFW1)))*(1.0+JRPXNFW1))*(1.0-DPXNFW1)+DPXNFW1*ZPXNFW1$ FRML JLED JRPXNFW1 =PXNFW1/(EXP(LOG(PWNFW1)))-1.0$ FRML EXO ZPXNFW1 =PXNFW1$ FRML _SJRD PXNF =((EXP(LOG(PXNF(-1))+0.83994*(LOG(PNE0)-LOG(PNE0(-1)))+0.16006*(LOG(PNE0(-1))-LOG( PNE0(-2)))))*(1.0+JRPXNF))*(1.0-DPXNF)+DPXNF*ZPXNF$ FRML JLED JRPXNF =PXNF/(EXP(LOG(PXNF(-1))+0.83994*(LOG(PNE0)-LOG(PNE0(-1)))+0.16006*(LOG(PNE0(-1))-LOG( PNE0(-2)))))-1.0$ FRML EXO ZPXNF =PXNF$ FRML _I BYWNN1 =(YWNN1/(YRNN1+YWNN1))*(1.-DBYW)+DBYW*ZBYWNN1$ 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 PXNNW1 =((EXP(LOG(PWNNW1)+0.047655/0.20000))*(1.0+JRPXNNW1))*(1.0-DPXNNW1)+DPXNNW1*ZPXNNW1$ FRML JLED JRPXNNW1 =PXNNW1/(EXP(LOG(PWNNW1)+0.047655/0.20000))-1.0$ FRML EXO ZPXNNW1 =PXNNW1$ FRML _S PXNN =(1.-DBYW)*(((EXP(LOG(PXNN(-1))+0.50371*(LOG(PWNNVL1)-LOG(PWNNVL1(-1)))*PWNNVL1(-1)/ PXNN(-1)+0.65486*(LOG(PWNNVV)-LOG(PWNNVV(-1)))*PWNNVV(-1)/PXNN(-1)+0.49629 *(LOG(PWNNVL1(-1))-LOG(PWNNVL1(-2)))*PWNNVL1(-1)/PXNN(-1)+0.34514*(LOG (PWNNVV(-1))-LOG(PWNNVV(-2)))*PWNNVV(-1)/PXNN(-1)-0.20000*LOG(PXNN(-1) /PXNNW1(-1))))*(1.0+JRPXNN))*(1.0-DPXNN)+DPXNN*ZPXNN)+DBYW*(((YWNN1/ BYWNN1)+SIQNN+VNN)/FXNN)$ FRML _I BYWNB1 =(YWNB1/(YRNB1+YWNB1))*(1.-DBYW)+DBYW*ZBYWNB1$ 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 PXNBW1 =((EXP(LOG(PWNBW1)+0.0064149/0.20000))*(1.0+JRPXNBW1))*(1.0-DPXNBW1)+DPXNBW1*ZPXNBW1$ FRML JLED JRPXNBW1 =PXNBW1/(EXP(LOG(PWNBW1)+0.0064149/0.20000))-1.0$ FRML EXO ZPXNBW1 =PXNBW1$ FRML _S PXNB =(1.-DBYW)*(((EXP(LOG(PXNB(-1))+0.66081*(LOG(PWNBVL1)-LOG(PWNBVL1(-1)))*PWNBVL1(-1)/ PXNB(-1)+0.95405*(LOG(PWNBVV)-LOG(PWNBVV(-1)))*PWNBVV(-1)/PXNB(-1)+0.33919 *(LOG(PWNBVL1(-1))-LOG(PWNBVL1(-2)))*PWNBVL1(-1)/PXNB(-1)+0.21207*(LOG (PWNBVV(-1))-LOG(PWNBVV(-2)))*PWNBVV(-1)/PXNB(-1)-0.20000*LOG(PXNB(-1) /PXNBW1(-1))))*(1.0+JRPXNB))*(1.0-DPXNB)+DPXNB*ZPXNB)+DBYW*(((YWNB1/ BYWNB1)+SIQNB+VNB)/FXNB)$ FRML _I BYWNM1 =(YWNM1/(YRNM1+YWNM1))*(1.-DBYW)+DBYW*ZBYWNM1$ 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 PXNMW1 =((EXP(LOG(PWNMW1)+0.0053746/0.20000))*(1.0+JRPXNMW1))*(1.0-DPXNMW1)+DPXNMW1*ZPXNMW1$ FRML JLED JRPXNMW1 =PXNMW1/(EXP(LOG(PWNMW1)+0.0053746/0.20000))-1.0$ FRML EXO ZPXNMW1 =PXNMW1$ FRML _S PXNM =(1.-DBYW)*(((EXP(LOG(PXNM(-1))+0.46913*(LOG(PWNMVL1)-LOG(PWNMVL1(-1)))*PWNMVL1(-1)/ PXNM(-1)+0.74061*(LOG(PWNMVV)-LOG(PWNMVV(-1)))*PWNMVV(-1)/PXNM(-1)+0.53087 *(LOG(PWNMVL1(-1))-LOG(PWNMVL1(-2)))*PWNMVL1(-1)/PXNM(-1)+0.25939*(LOG (PWNMVV(-1))-LOG(PWNMVV(-2)))*PWNMVV(-1)/PXNM(-1)-0.20000*LOG(PXNM(-1) /PXNMW1(-1))))*(1.0+JRPXNM))*(1.0-DPXNM)+DPXNM*ZPXNM)+DBYW*(((YWNM1/ BYWNM1)+SIQNM+VNM)/FXNM)$ FRML _I BYWNT1 =(YWNT1/(YRNT1+YWNT1))*(1.-DBYW)+DBYW*ZBYWNT1$ 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 PXNTW1 =((EXP(LOG(PWNTW1)+0.0071235/0.20000))*(1.0+JRPXNTW1))*(1.0-DPXNTW1)+DPXNTW1*ZPXNTW1$ FRML JLED JRPXNTW1 =PXNTW1/(EXP(LOG(PWNTW1)+0.0071235/0.20000))-1.0$ FRML EXO ZPXNTW1 =PXNTW1$ FRML _S PXNT =(1.-DBYW)*(((EXP(LOG(PXNT(-1))+0.09876*(LOG(PWNTVL1)-LOG(PWNTVL1(-1)))*PWNTVL1(-1)/ PXNT(-1)+0.749374*(LOG(PWNTVV)-LOG(PWNTVV(-1)))*PWNTVV(-1)/PXNT(-1)+0.90124 *(LOG(PWNTVL1(-1))-LOG(PWNTVL1(-2)))*PWNTVL1(-1)/PXNT(-1)+0.25063*(LOG (PWNTVV(-1))-LOG(PWNTVV(-2)))*PWNTVV(-1)/PXNT(-1)-0.20000*LOG(PXNT(-1) /PXNTW1(-1))))*(1.0+JRPXNT))*(1.0-DPXNT)+DPXNT*ZPXNT)+DBYW*(((YWNT1/ BYWNT1)+SIQNT+VNT)/FXNT)$ FRML _I BYWNK1 =(YWNK1/(YRNK1+YWNK1))*(1.-DBYW)+DBYW*ZBYWNK1$ 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 PXNKW1 =((EXP(LOG(PWNKW1)+(0.0081281/0.20000)))*(1.0+JRPXNKW1))*(1.0-DPXNKW1)+DPXNKW1* ZPXNKW1$ FRML JLED JRPXNKW1 =PXNKW1/(EXP(LOG(PWNKW1)+(0.0081281/0.20000)))-1.0$ FRML EXO ZPXNKW1 =PXNKW1$ FRML _S PXNK =(1.-DBYW)*(((EXP(LOG(PXNK(-1))+0.32028*(LOG(PWNKVL1)-LOG(PWNKVL1(-1)))*PWNKVL1(-1)/ PXNK(-1)+0.87126*(LOG(PWNKVV)-LOG(PWNKVV(-1)))*PWNKVV(-1)/PXNK(-1)+0.67972 *(LOG(PWNKVL1(-1))-LOG(PWNKVL1(-2)))*PWNKVL1(-1)/PXNK(-1)+0.12874*(LOG (PWNKVV(-1))-LOG(PWNKVV(-2)))*PWNKVV(-1)/PXNK(-1)-0.20000*LOG(PXNK(-1) /PXNKW1(-1))))*(1.0+JRPXNK))*(1.0-DPXNK)+DPXNK*ZPXNK)+DBYW*(((YWNK1/ BYWNK1)+SIQNK+VNK)/FXNK)$ FRML _I BYWNQ1 =(YWNQ1/(YRNQ1+YWNQ1))*(1.-DBYW)+DBYW*ZBYWNQ1$ 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 PXNQW1 =((EXP(LOG(PWNQW1)+0.00186155/0.26889))*(1.0+JRPXNQW1))*(1.0-DPXNQW1)+DPXNQW1*ZPXNQW1$ FRML JLED JRPXNQW1 =PXNQW1/(EXP(LOG(PWNQW1)+0.00186155/0.26889))-1.0$ FRML EXO ZPXNQW1 =PXNQW1$ FRML _S PXNQ =(1.-DBYW)*(((EXP(LOG(PXNQ(-1))+0.645322*(LOG(PWNQVL1)-LOG(PWNQVL1(-1)))*PWNQVL1(-1)/ PXNQ(-1)+0.855308*(LOG(PWNQVV)-LOG(PWNQVV(-1)))*PWNQVV(-1)/PXNQ(-1)+0.354678 *(LOG(PWNQVL1(-1))-LOG(PWNQVL1(-2)))*PWNQVL1(-1)/PXNQ(-1)+0.184350*(LOG (PWNQVV(-1))-LOG(PWNQVV(-2)))*PWNQVV(-1)/PXNQ(-1)-0.268886*LOG(PXNQ(-1) /PXNQW1(-1))))*(1.0+JRPXNQ))*(1.0-DPXNQ)+DPXNQ*ZPXNQ)+DBYW*(((YWNQ1/ BYWNQ1)+SIQNQ+VNQ)/FXNQ)$ FRML _I BYWB1 =(YWB1/(YRB1+YWB1))*(1.-DBYW)+DBYW*ZBYWB1$ 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 PXBW1 =((EXP(LOG(PWBW1)-0.00216234/0.20000))*(1.0+JRPXBW1))*(1.0-DPXBW1)+DPXBW1*ZPXBW1$ FRML JLED JRPXBW1 =PXBW1/(EXP(LOG(PWBW1)-0.00216234/0.20000))-1.0$ FRML EXO ZPXBW1 =PXBW1$ FRML _S PXB =(1.-DBYW)*(((EXP(LOG(PXB(-1))+0.539263*(LOG(PWBVL1)-LOG(PWBVL1(-1)))*PWBVL1(-1)/PXB(-1) +0.751764*(LOG(PWBVV)-LOG(PWBVV(-1)))*PWBVV(-1)/PXB(-1)+0.460737*(LOG (PWBVL1(-1))-LOG(PWBVL1(-2)))*PWBVL1(-1)/PXB(-1)+0.248236*(LOG(PWBVV(-1) )-LOG(PWBVV(-2)))*PWBVV(-1)/PXB(-1)-0.20000*LOG(PXB(-1)/PXBW1(-1))))* (1.0+JRPXB))*(1.0-DPXB)+DPXB*ZPXB)+DBYW*(((YWB1/BYWB1)+SIQB+VB)/FXB)$ FRML _I BYWQH1 =(YWQH1/(YRQH1+YWQH1))*(1.-DBYW)+DBYW*ZBYWQH1$ 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 PXQHW1 =((EXP(LOG(PWQHW1)+0.0049781/0.20000))*(1.0+JRPXQHW1))*(1.0-DPXQHW1)+DPXQHW1*ZPXQHW1$ FRML JLED JRPXQHW1 =PXQHW1/(EXP(LOG(PWQHW1)+0.0049781/0.20000))-1.0$ FRML EXO ZPXQHW1 =PXQHW1$ FRML _S PXQH =(1.-DBYW)*(((EXP(LOG(PXQH(-1))+1.01665*(LOG(PWQHVL1)-LOG(PWQHVL1(-1)))*PWQHVL1(-1)/ PXQH(-1)+1.21235*(LOG(PWQHVV)-LOG(PWQHVV(-1)))*PWQHVV(-1)/PXQH(-1)+0.29358 *(LOG(PWQHVL1(-1))-LOG(PWQHVL1(-2)))*PWQHVL1(-1)/PXQH(-1)+0.00000*(LOG (PWQHVV(-1))-LOG(PWQHVV(-2)))*PWQHVV(-1)/PXQH(-1)-0.20000*LOG(PXQH(-1) /PXQHW1(-1))))*(1.0+JRPXQH))*(1.0-DPXQH)+DPXQH*ZPXQH)+DBYW*(((YWQH1/ BYWQH1)+SIQQH+VQH)/FXQH)$ FRML _I BYWQT1 =(YWQT1/(YRQT1+YWQT1))*(1.-DBYW)+DBYW*ZBYWQT1$ 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 PXQTW1 =((EXP(LOG(PWQTW1)+0.00000))*(1.0+JRPXQTW1))*(1.0-DPXQTW1)+DPXQTW1*ZPXQTW1$ FRML JLED JRPXQTW1 =PXQTW1/(EXP(LOG(PWQTW1)+0.00000))-1.0$ FRML EXO ZPXQTW1 =PXQTW1$ FRML _S PXQT =(1.-DBYW)*(((EXP(LOG(PXQT(-1))+0.356266*(LOG(PWQTVL1)-LOG(PWQTVL1(-1)))*PWQTVL1(-1)/ PXQT(-1)+0.85*(LOG(PWQTVV)-LOG(PWQTVV(-1)))*PWQTVV(-1)/PXQT(-1)+0.00000 *(LOG(PWQTVL1(-1))-LOG(PWQTVL1(-2)))*PWQTVL1(-1)/PXQT(-1)+0.00000*(LOG (PWQTVV(-1))-LOG(PWQTVV(-2)))*PWQTVV(-1)/PXQT(-1)-0.20000*LOG(PXQT(-1) /PXQTW1(-1))))*(1.0+JRPXQT))*(1.0-DPXQT)+DPXQT*ZPXQT)+DBYW*(((YWQT1/ BYWQT1)+SIQQT+VQT)/FXQT)$ FRML _I BYWQQ1 =(YWQQ1/(YRQQ1+YWQQ1))*(1.-DBYW)+DBYW*ZBYWQQ1$ 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 PXQQW1 =((EXP(LOG(PWQQW1)+0.0039855/0.20000))*(1.0+JRPXQQW1))*(1.0-DPXQQW1)+DPXQQW1*ZPXQQW1$ FRML JLED JRPXQQW1 =PXQQW1/(EXP(LOG(PWQQW1)+0.0039855/0.20000))-1.0$ FRML EXO ZPXQQW1 =PXQQW1$ FRML _S PXQQ =(1.-DBYW)*(((EXP(LOG(PXQQ(-1))+0.67039*(LOG(PWQQVL1)-LOG(PWQQVL1(-1)))*PWQQVL1(-1)/ PXQQ(-1)+0.88296*(LOG(PWQQVV)-LOG(PWQQVV(-1)))*PWQQVV(-1)/PXQQ(-1)+0.49131 *(LOG(PWQQVL1(-1))-LOG(PWQQVL1(-2)))*PWQQVL1(-1)/PXQQ(-1)+0.11704*(LOG (PWQQVV(-1))-LOG(PWQQVV(-2)))*PWQQVV(-1)/PXQQ(-1)-0.20000*LOG(PXQQ(-1) /PXQQW1(-1))))*(1.0+JRPXQQ))*(1.0-DPXQQ)+DPXQQ*ZPXQQ)+DBYW*(((YWQQ1/ BYWQQ1)+SIQQQ+VQQ)/FXQQ)$ FRML _I BYWQF1 =(YWQF1/(YRQF1+YWQF1))*(1.-DBYW)+DBYW*ZBYWQF1$ 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 PXQF =(1.-DBYW)*((1.-DPXQF)*(EXP(LOG(PXQF(-1))+0.30074*((LOG(PWQFWV1)-LOG(PWQFWV1(-1)))-(LOG (PWQFWV1(-1))-LOG(PWQFWV1(-2))))-0.78730*((LOG(PXQF(-1))-LOG(PXQF(-2) ))-(LOG(PWQFW1(-1))-LOG(PWQFW1(-2))))+(LOG(PXQF(-1))-LOG(PXQF(-2)))+( LOG(1.+JRPXQF)-LOG(1.+JRPXQF(-1)))))+DPXQF*ZPXQF)+DBYW*(((YWQF1/ BYWQF1)+SIQQF+VQF)/FXQF)$ FRML _I PXN =PXN(-1)*(PXNE*FXNE+PXNG*FXNG+PXNF*FXNF+PXNN*FXNN+PXNB*FXNB+PXNK*FXNK+PXNQ*FXNQ+PXNM* FXNM+PXNT*FXNT)/(PXNE(-1)*FXNE+PXNG(-1)*FXNG+PXNF(-1)*FXNF+PXNN(-1)* FXNN+PXNB(-1)*FXNB+PXNK(-1)*FXNK+PXNQ(-1)*FXNQ+PXNM(-1)*FXNM+PXNT(-1) *FXNT)$ FRML _I PXQ =PXQ(-1)*(PXQF*FXQF+PXQH*FXQH+PXQT*FXQT+PXQS*FXQS+PXQQ*FXQQ)/(PXQF(-1)*FXQF+PXQH(-1)* FXQH+PXQT(-1)*FXQT+PXQS(-1)*FXQS+PXQQ(-1)*FXQQ)$ 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+JVA)*(1.0 -DVA)+DVA*ZVA$ FRML JLED JVA =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 EXO ZVA =VA$ 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+JVE)*(1.0-DVE)+DVE*ZVE$ FRML JLED JVE =VE-((ANGE*PXNG+ANME*PXNM+ANTE*PXNT+AQTE*PXQT+AQQE*PXQQ+AM3QE*(PM3Q+TM3Q)+AM7QE*(PM7Q+ TM7Q)+AMSE*PMS)*KPNVE*FXE+SIPXE+SIGXE)$ FRML EXO ZVE =VE$ 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+JVNG)*(1.0- DVNG)+DVNG*ZVNG$ FRML JLED JVNG =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 EXO ZVNG =VNG$ 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+ JVNE)*(1.0-DVNE)+DVNE*ZVNE$ FRML JLED JVNE =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 EXO ZVNE =VNE$ 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+JVNF)*(1.0-DVNF)+DVNF* ZVNF$ FRML JLED JVNF =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 EXO ZVNF =VNF$ 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+JVNN)*(1.0-DVNN)+DVNN*ZVNN$ FRML JLED JVNN =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 EXO ZVNN =VNN$ 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+JVNB)*(1.0-DVNB)+DVNB*ZVNB$ FRML JLED JVNB =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 EXO ZVNB =VNB$ 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+JVNM)*(1.0-DVNM)+DVNM*ZVNM$ FRML JLED JVNM =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 EXO ZVNM =VNM$ 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+ JVNT)*(1.0-DVNT)+DVNT*ZVNT$ FRML JLED JVNT =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 EXO ZVNT =VNT$ 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+JVNK)*(1.0-DVNK)+DVNK*ZVNK$ FRML JLED JVNK =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 EXO ZVNK =VNK$ 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+JVNQ)*(1.0-DVNQ)+DVNQ*ZVNQ$ FRML JLED JVNQ =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 EXO ZVNQ =VNQ$ 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+JVB)*(1.0- DVB)+DVB*ZVB$ FRML JLED JVB =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 EXO ZVB =VB$ 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+JVQH)*(1.0-DVQH)+DVQH*ZVQH$ FRML JLED JVQH =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 EXO ZVQH =VQH$ 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+JVQS)*(1.0-DVQS)+DVQS* ZVQS$ FRML JLED JVQS =VQS-((ANGQS*PXNG+ANEQS*PXNE+ANTQS*PXNT+AQSQS*PXQS+AQTQS*PXQT+AQQQS*PXQQ+AM3QQS*(PM3Q+ TM3Q)+AMSQS*PMS)*KPNVQS*FXQS+SIPXQS+SIGXQS)$ FRML EXO ZVQS =VQS$ 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+JVQT)*(1.0- DVQT)+DVQT*ZVQT$ FRML JLED JVQT =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 EXO ZVQT =VQT$ 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+JVQF)*(1.0 -DVQF)+DVQF*ZVQF$ FRML JLED JVQF =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 EXO ZVQF =VQF$ 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+JVQQ)*(1.0-DVQQ)+DVQQ*ZVQQ$ FRML JLED JVQQ =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 EXO ZVQQ =VQQ$ FRML _GJ_D VH =((ANGH*PXNG+ANEH*PXNE+ABH*PXB+AQQH*PXQQ+AM3QH*(PM3Q+TM3Q)+AM8H*(PM8+TM8))*KPNVH*FXH+ SIPXH+SIGXH+JVH)*(1.0-DVH)+DVH*ZVH$ FRML JLED JVH =VH-((ANGH*PXNG+ANEH*PXNE+ABH*PXB+AQQH*PXQQ+AM3QH*(PM3Q+TM3Q)+AM8H*(PM8+TM8))*KPNVH* FXH+SIPXH+SIGXH)$ FRML EXO ZVH =VH$ 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+JVO)*(1.0-DVO)+DVO*ZVO$ FRML JLED JVO =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 EXO ZVO =VO$ FRML _KJ_D PNCF =((AACF*PXA+ANFCF*PXNF+AQHCF*PXQH+AM0CF*(PM0+TM0))*KPNCF*KKP+JPNCF)*(1.0-DPNCF)+DPNCF* ZPNCF$ FRML JLED JPNCF =PNCF-((AACF*PXA+ANFCF*PXNF+AQHCF*PXQH+AM0CF*(PM0+TM0))*KPNCF*KKP)$ FRML EXO ZPNCF =PNCF$ FRML _KJ_D PNCN =((ANFCN*PXNF+ANNCN*PXNN+AQHCN*PXQH+AM0CN*(PM0+TM0)+AM1CN*(PM1+TM1))*KPNCN*KKP+JPNCN)* (1.0-DPNCN)+DPNCN*ZPNCN$ FRML JLED JPNCN =PNCN-((ANFCN*PXNF+ANNCN*PXNN+AQHCN*PXQH+AM0CN*(PM0+TM0)+AM1CN*(PM1+TM1))*KPNCN*KKP)$ FRML EXO ZPNCN =PNCN$ FRML _KJ_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+JPNCI)*(1.0-DPNCI)+DPNCI*ZPNCI$ FRML JLED JPNCI =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 EXO ZPNCI =PNCI$ FRML _KJ_D PNCE =((AECE*PXE+ANGCE*PXNG+ANECE*PXNE+AQHCE*PXQH+AM3KCE*(PM3K+TM3K)+AM3QCE*(PM3Q+TM3Q))* KPNCE*KKP+JPNCE)*(1.0-DPNCE)+DPNCE*ZPNCE$ FRML JLED JPNCE =PNCE-((AECE*PXE+ANGCE*PXNG+ANECE*PXNE+AQHCE*PXQH+AM3KCE*(PM3K+TM3K)+AM3QCE*(PM3Q+ TM3Q))*KPNCE*KKP)$ FRML EXO ZPNCE =PNCE$ FRML _KJ_D PNCG =((ANGCG*PXNG+AQHCG*PXQH+AM3QCG*(PM3Q+TM3Q))*KPNCG*KKP+JPNCG)*(1.0-DPNCG)+DPNCG*ZPNCG$ FRML JLED JPNCG =PNCG-((ANGCG*PXNG+AQHCG*PXQH+AM3QCG*(PM3Q+TM3Q))*KPNCG*KKP)$ FRML EXO ZPNCG =PNCG$ FRML _KJ_D PNCB =((ANTCB*PXNT+AQHCB*PXQH+AM7BCB*(PM7B+TM7B)+AM7QCB*(PM7Q+TM7Q))*KPNCB*KKP+JPNCB)*(1.0- DPNCB)+DPNCB*ZPNCB$ FRML JLED JPNCB =PNCB-((ANTCB*PXNT+AQHCB*PXQH+AM7BCB*(PM7B+TM7B)+AM7QCB*(PM7Q+TM7Q))*KPNCB*KKP)$ FRML EXO ZPNCB =PNCB$ FRML _KJ_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+JPNCV)*(1.0-DPNCV)+DPNCV*ZPNCV$ FRML JLED JPNCV =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 EXO ZPNCV =PNCV$ FRML _GJRD PNCH =((EXP(LOG(PNCH(-1))+0.1488*(LOG(PIBH)-LOG(PIBH(-1)))+0.06808*LOG((INVBH(-1)+(KNBH(-2) +0.5*INBH(-1))*(IWBZ(-1)-0.5*RPIBHE(-1)))/(YRH1(-1)-FKBHE(-1)/FKBHL(-1) *(YWH1+SIQH-SIQEJH)))))*(1.0+JRPNCH))*(1.0-DPNCH)+DPNCH*ZPNCH$ FRML JLED JRPNCH =PNCH/(EXP(LOG(PNCH(-1))+0.1488*(LOG(PIBH)-LOG(PIBH(-1)))+0.06808*LOG((INVBH(-1)+( KNBH(-2)+0.5*INBH(-1))*(IWBZ(-1)-0.5*RPIBHE(-1)))/(YRH1(-1)-FKBHE(-1) /FKBHL(-1)*(YWH1+SIQH-SIQEJH)))))-1.0$ FRML EXO ZPNCH =PNCH$ FRML _KJ_D PNCK =((AQSCK*PXQS+AQTCK*PXQT+AMSCK*PMS)*KPNCK*KKP+JPNCK)*(1.0-DPNCK)+DPNCK*ZPNCK$ FRML JLED JPNCK =PNCK-((AQSCK*PXQS+AQTCK*PXQT+AMSCK*PMS)*KPNCK*KKP)$ FRML EXO ZPNCK =PNCK$ FRML _KJ_D PNCS =((ANMCS*PXNM+ANQCS*PXNQ+AQHCS*PXQH+AQTCS*PXQT+AQFCS*PXQF+AQQCS*PXQQ+AOCS*PXO+AMSCS* PMS)*KPNCS*KKP+JPNCS)*(1.0-DPNCS)+DPNCS*ZPNCS$ FRML JLED JPNCS =PNCS-((ANMCS*PXNM+ANQCS*PXNQ+AQHCS*PXQH+AQTCS*PXQT+AQFCS*PXQF+AQQCS*PXQQ+AOCS*PXO+ AMSCS*PMS)*KPNCS*KKP)$ FRML EXO ZPNCS =PNCS$ FRML _I PCT =PMT$ FRML _KJ_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+ JPNIM)*(1.0-DPNIM)+DPNIM*ZPNIM$ FRML JLED JPNIM =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 EXO ZPNIM =PNIM$ FRML _KJ_ PNIMP11 =PNIM*KPNIMP1+JPNIMP11$ FRML JLED JPNIMP11 =PNIMP11-(PNIM*KPNIMP1)$ FRML _KJ_ PNIMO11 =PNIM*KPNIMO1+JPNIMO11$ FRML JLED JPNIMO11 =PNIMO11-(PNIM*KPNIMO1)$ FRML _KJ_D PNIB =((ABIB*PXB+AQQIB*PXQQ+AM5IB*(PM5+TM5)+AM6QIB*(PM6Q+TM6Q))*KPNIB*KKP+JPNIB)*(1.0- DPNIB)+DPNIB*ZPNIB$ FRML JLED JPNIB =PNIB-((ABIB*PXB+AQQIB*PXQQ+AM5IB*(PM5+TM5)+AM6QIB*(PM6Q+TM6Q))*KPNIB*KKP)$ FRML EXO ZPNIB =PNIB$ FRML _KJ_ PNIBP11 =PNIB*KPNIBP1+JPNIBP11$ FRML JLED JPNIBP11 =PNIBP11-(PNIB*KPNIBP1)$ FRML _KJ_ PNIBO11 =PNIB*KPNIBO1+JPNIBO11$ FRML JLED JPNIBO11 =PNIBO11-(PNIB*KPNIBO1)$ FRML _KJ_ PNIBH =PNIB*KPNIBH+JPNIBH$ FRML JLED JPNIBH =PNIBH-(PNIB*KPNIBH)$ FRML _GJ_ PIT =AAIT*PXA+AM0IT*(PM0+TM0)+JPIT$ FRML JLED JPIT =PIT-(AAIT*PXA+AM0IT*(PM0+TM0))$ FRML _GJ_D 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)+JPNIL)*(1.0-DPNIL)+DPNIL*ZPNIL$ FRML JLED JPNIL =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))$ FRML EXO ZPNIL =PNIL$ 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)*(1.0+JRPNE0))*(1.0-DPNE0)+DPNE0*ZPNE0$ FRML JLED JRPNE0 =PNE0/(PE0-SIPE0/FE0)-1.0$ FRML EXO ZPNE0 =PNE0$ FRML _KJ_D PE1 =((ANNE1*PXNN+AQHE1*PXQH+AM1E1*(PM1+TM1))*KPE1+JPE1)*(1.0-DPE1)+DPE1*ZPE1$ FRML JLED JPE1 =PE1-((ANNE1*PXNN+AQHE1*PXQH+AM1E1*(PM1+TM1))*KPE1)$ FRML EXO ZPE1 =PE1$ FRML _KJ_D PE2 =((AAE2*PXA+ANFE2*PXNF+ANBE2*PXNB+ANME2*PXNM+ANKE2*PXNK+AQHE2*PXQH+AM2E2*(PM2+TM2))* KPE2+JPE2)*(1.0-DPE2)+DPE2*ZPE2$ FRML JLED JPE2 =PE2-((AAE2*PXA+ANFE2*PXNF+ANBE2*PXNB+ANME2*PXNM+ANKE2*PXNK+AQHE2*PXQH+AM2E2*(PM2+TM2) )*KPE2)$ FRML EXO ZPE2 =PE2$ FRML _KJ_D PE3 =((AEE3*PXE+ANGE3*PXNG+ANEE3*PXNE+AQHE3*PXQH+AM3KE3*(PM3K+TM3K)+AM3RE3*(PM3R+TM3R)+ AM3QE3*(PM3Q+TM3Q))*KPE3+JPE3)*(1.0-DPE3)+DPE3*ZPE3$ FRML JLED JPE3 =PE3-((AEE3*PXE+ANGE3*PXNG+ANEE3*PXNE+AQHE3*PXQH+AM3KE3*(PM3K+TM3K)+AM3RE3*(PM3R+TM3R) +AM3QE3*(PM3Q+TM3Q))*KPE3)$ FRML EXO ZPE3 =PE3$ FRML _KJ_D PE5 =((ANFE5*PXNF+ANKE5*PXNK+AQHE5*PXQH+AM5E5*(PM5+TM5))*KPE5+JPE5)*(1.0-DPE5)+DPE5*ZPE5$ FRML JLED JPE5 =PE5-((ANFE5*PXNF+ANKE5*PXNK+AQHE5*PXQH+AM5E5*(PM5+TM5))*KPE5)$ FRML EXO ZPE5 =PE5$ FRML _KJ_D PE6 =((ANBE6*PXNB+ANME6*PXNM+ANKE6*PXNK+ANQE6*PXNQ+AQHE6*PXQH+AM6ME6*(PM6M+TM6M)+AM6QE6*( PM6Q+TM6Q))*KPE6+JPE6)*(1.0-DPE6)+DPE6*ZPE6$ FRML JLED JPE6 =PE6-((ANBE6*PXNB+ANME6*PXNM+ANKE6*PXNK+ANQE6*PXNQ+AQHE6*PXQH+AM6ME6*(PM6M+TM6M)+ AM6QE6*(PM6Q+TM6Q))*KPE6)$ FRML EXO ZPE6 =PE6$ FRML _KJ_D PNE7Y =((ANTE7Y*PXNT+AM7YE7Y*(PM7Y+TM7Y))*KPNE7Y+JPNE7Y)*(1.0-DPNE7Y)+DPNE7Y*ZPNE7Y$ FRML JLED JPNE7Y =PNE7Y-((ANTE7Y*PXNT+AM7YE7Y*(PM7Y+TM7Y))*KPNE7Y)$ FRML EXO ZPNE7Y =PNE7Y$ FRML _KJ_D PE7Q =((ANME7Q*PXNM+ANTE7Q*PXNT+AQHE7Q*PXQH+AM7BE7Q*(PM7B+TM7B)+AM7QE7Q*(PM7Q+TM7Q))*KPE7Q+ JPE7Q)*(1.0-DPE7Q)+DPE7Q*ZPE7Q$ FRML JLED JPE7Q =PE7Q-((ANME7Q*PXNM+ANTE7Q*PXNT+AQHE7Q*PXQH+AM7BE7Q*(PM7B+TM7B)+AM7QE7Q*(PM7Q+TM7Q))* KPE7Q)$ FRML EXO ZPE7Q =PE7Q$ FRML _KJ_D PE8 =((ANME8*PXNM+ANKE8*PXNK+ANQE8*PXNQ+AQHE8*PXQH+AQQE8*PXQQ+AM8E8*(PM8+TM8))*KPE8+JPE8)* (1.0-DPE8)+DPE8*ZPE8$ FRML JLED JPE8 =PE8-((ANME8*PXNM+ANKE8*PXNK+ANQE8*PXNQ+AQHE8*PXQH+AQQE8*PXQQ+AM8E8*(PM8+TM8))*KPE8)$ FRML EXO ZPE8 =PE8$ FRML _KJ_D PESQ =((AQHESQ*PXQH+AQTESQ*PXQT+AQFESQ*PXQF+AQQESQ*PXQQ+AOESQ*PXO)*KPESQ+JPESQ)*(1.0-DPESQ) +DPESQ*ZPESQ$ FRML JLED JPESQ =PESQ-((AQHESQ*PXQH+AQTESQ*PXQT+AQFESQ*PXQF+AQQESQ*PXQQ+AOESQ*PXO)*KPESQ)$ FRML EXO ZPESQ =PESQ$ FRML _KJ_D PESS =(PXQS*KPESS+JPESS)*(1.0-DPESS)+DPESS*ZPESS$ FRML JLED JPESS =PESS-(PXQS*KPESS)$ FRML EXO ZPESS =PESS$ FRML _GJ_D PES =((FESQ/FES)*PESQ+(FESS/FES)*PESS+JPES)*(1.0-DPES)+DPES*ZPES$ FRML JLED JPES =PES-((FESQ/FES)*PESQ+(FESS/FES)*PESS)$ FRML EXO ZPES =PES$ FRML _KJ_D PET =((0.25*PCF+0.14*PCN+0.05*PCI+0.06*PCG+0.05*PCV+0.07*PCK+0.38*PCS)*KPET+JPET)*(1.0- DPET)+DPET*ZPET$ FRML JLED JPET =PET-((0.25*PCF+0.14*PCN+0.05*PCI+0.06*PCG+0.05*PCV+0.07*PCK+0.38*PCS)*KPET)$ FRML EXO ZPET =PET$ 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 _K PIBP =PIBP11*KPIBP$ FRML _K PIMP =PIMP11*KPIMP$ FRML _G PIL =(1.+BTGIL*TG)*(PNIL+TPIL)$ FRML _G PE7Y =PNE7Y+SIPE7Y/FE7Y$ FRML _K PVEA =(1.+BTGXA*TG)*(TVEA+BHVEA*PXQH+(ANGA*PXNG+ANEA*PXNE+AM3KA*(PM3K+TM3K)+AM3QA*(PM3Q+ TM3Q))*KPVEA*FXA/FVEA)$ FRML _K PVEE =(1.+BTGXE*TG)*(TVEE+BHVEE*PXQH+(ANGE*PXNG+AM3QE*(PM3Q+TM3Q))*KPVEE*FXE/FVEE)$ FRML _K PVENG =(1.+BTGXNG*TG)*(TVENG+BHVENG*PXQH+(AENG*PXE+ANGNG*PXNG+ANENG*PXNE+AM3RNG*(PM3R+TM3R)+ AM3QNG*(PM3Q+TM3Q))*KPVENG*FXNG/FVENG)$ FRML _K 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 _K PVENF =(1.+BTGXNF*TG)*(TVENF+BHVENF*PXQH+(ANGNF*PXNG+ANENF*PXNE+AM3KNF*(PM3K+TM3K)+AM3QNF*( PM3Q+TM3Q))*KPVENF*FXNF/FVENF)$ FRML _K PVENN =(1.+BTGXNN*TG)*(TVENN+BHVENN*PXQH+(ANGNN*PXNG+ANENN*PXNE+AM3KNN*(PM3K+TM3K)+AM3QNN*( PM3Q+TM3Q))*KPVENN*FXNN/FVENN)$ FRML _K PVENB =(1.+BTGXNB*TG)*(TVENB+BHVENB*PXQH+(ANGNB*PXNG+ANENB*PXNE+AM3KNB*(PM3K+TM3K)+AM3QNB*( PM3Q+TM3Q))*KPVENB*FXNB/FVENB)$ FRML _K PVENM =(1.+BTGXNM*TG)*(TVENM+BHVENM*PXQH+(ANGNM*PXNG+ANENM*PXNE+AM3QNM*(PM3Q+TM3Q))*KPVENM* FXNM/FVENM)$ FRML _K PVENT =(1.+BTGXNT*TG)*(TVENT+BHVENT*PXQH+(ANGNT*PXNG+ANENT*PXNE+AM3QNT*(PM3Q+TM3Q))*KPVENT* FXNT/FVENT)$ FRML _K PVENK =(1.+BTGXNK*TG)*(TVENK+BHVENK*PXQH+(ANGNK*PXNG+ANENK*PXNE+AM3QNK*(PM3Q+TM3Q))*KPVENK* FXNK/FVENK)$ FRML _K PVENQ =(1.+BTGXNQ*TG)*(TVENQ+BHVENQ*PXQH+(ANGNQ*PXNG+ANENQ*PXNE+AM3KNQ*(PM3K+TM3K)+AM3QNQ*( PM3Q+TM3Q))*KPVENQ*FXNQ/FVENQ)$ FRML _K PVEB =(1.+BTGXB*TG)*(TVEB+BHVEB*PXQH+(ANGB*PXNG+ANEB*PXNE+AM3QB*(PM3Q+TM3Q))*KPVEB*FXB/ FVEB)$ FRML _K PVEQH =(1.+BTGXQH*TG)*(TVEQH+BHVEQH*PXQH+(ANGQH*PXNG+ANEQH*PXNE+AM3QQH*(PM3Q+TM3Q))*KPVEQH* FXQH/FVEQH)$ FRML _K PVEQS =(1.+BTGXQS*TG)*(TVEQS+BHVEQS*PXQH+(ANGQS*PXNG+ANEQS*PXNE+AM3QQS*(PM3Q+TM3Q))*KPVEQS* FXQS/FVEQS)$ FRML _K PVEQT =(1.+BTGXQT*TG)*(TVEQT+BHVEQT*PXQH+(ANGQT*PXNG+ANEQT*PXNE+AM3QQT*(PM3Q+TM3Q))*KPVEQT* FXQT/FVEQT)$ FRML _K PVEQF =(1.+BTGXQF*TG)*(TVEQF+BHVEQF*PXQH+(ANGQF*PXNG+ANEQF*PXNE+AM3QQF*(PM3Q+TM3Q))*KPVEQF* FXQF/FVEQF)$ FRML _K PVEQQ =(1.+BTGXQQ*TG)*(TVEQQ+BHVEQQ*PXQH+(ANGQQ*PXNG+ANEQQ*PXNE+AM3QQQ*(PM3Q+TM3Q))*KPVEQQ* FXQQ/FVEQQ)$ FRML _K PVEH =(1.+BTGXH*TG)*(TVEH+BHVEH*PXQH+(ANGH*PXNG+ANEH*PXNE+AM3QH*(PM3Q+TM3Q))*KPVEH*FXH/ FVEH)$ FRML _K 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)$ FRML _DJRD BTYD1 =(((TYD/ULDP)/(LAH1*(1.-TSDA)*0.001))*(1.0+JRBTYD1))*(1.0-DBTYD1)+DBTYD1*ZBTYD1$ FRML JLED JRBTYD1 =BTYD1/((TYD/ULDP)/(LAH1*(1.-TSDA)*0.001))-1.0$ FRML EXO ZBTYD1 =BTYD1$ FRML _D YFNL =YFNF+YFNN+YFNB+YFNK+YFNM+YFNQ+YFNT$ FRML _D FYFNL =(FYFNF*PYFNF(-1)+FYFNN*PYFNN(-1)+FYFNB*PYFNB(-1)+FYFNK*PYFNK(-1)+FYFNM*PYFNM(-1)+ FYFNQ*PYFNQ(-1)+FYFNT*PYFNT(-1))/PYFNL(-1)$ FRML _D PYFNL =YFNL/FYFNL$ FRML _D KQYFNL1 =FYFNL/(HQNF1+HQNN1+HQNB1+HQNK1+HQNM1+HQNQ1+HQNT1)$ FRML _D KQYFN1 =FYFN/(HQNG1+HQNE1+HQNF1+HQNN1+HQNB1+HQNM1+HQNT1+HQNK1+HQNQ1)$ FRML _DJ_D TSS0U =(TSDA+(1.-TSDA)*(TSS0+TSSP0)+JTSS0U)*(1.0-DTSS0U)+DTSS0U*ZTSS0U$ FRML JLED JTSS0U =TSS0U-(TSDA+(1.-TSDA)*(TSS0+TSSP0))$ FRML EXO ZTSS0U =TSS0U$ FRML _D TATP =TPATPI/(QW1*HGWN*0.001)$ FRML _D LNAP =LNA1+TATP$ FRML _SJRDF BYWNW =((EXP(1.24994*LOG(PCPN/PXN)-3.00000*BUL1+1.59679*BTYD1*DDTLNAP+(1.-DDTLNAP)*(1.59679* BTYD1E+LOG(DTLNAP))-1.14834))*(1.0+JRBYWNW))*(1.0-DBYWNW)+DBYWNW* ZBYWNW$ FRML JLED JRBYWNW =BYWNW/(EXP(1.24994*LOG(PCPN/PXN)-3.00000*BUL1+1.59679*BTYD1*DDTLNAP+(1.-DDTLNAP)*(1.59679 *BTYD1E+LOG(DTLNAP))-1.14834))-1.0$ FRML EXO ZBYWNW =BYWNW$ FRML _I YWN1 =YWNG1+YWNE1+YWNF1+YWNN1+YWNB1+YWNM1+YWNT1+YWNK1+YWNQ1$ FRML _I YRN1 =YRNG1+YRNE1+YRNF1+YRNN1+YRNB1+YRNM1+YRNT1+YRNK1+YRNQ1$ FRML _D BYWNL =(YWN1-YWNE1-YWNG1)/(YWN1-YWNE1-YWNG1+YRN1-YRNE1-YRNG1)$ FRML _SJRDF LNA1 =((EXP(LOG(LNA1(-1))+0.655083*(LOG(PYFN)-LOG(PYFN(-1)))+0.544074*(LOG(KQYFN1)-LOG( KQYFN1(-1)))+(1.-0.655083)*(LOG(PYFN(-1))-LOG(PYFN(-2)))+(1.-0.544074 )*(LOG(KQYFN1(-1))-LOG(KQYFN1(-2)))-(LOG((LNA1+BTATP*TATP)/LNA1)-LOG( (LNA1(-1)+BTATP(-1)*TATP(-1))/LNA1(-1)))-0.760890*(((1./3.)*(BUL1- BUL1(-1))+(2./3.)*(BUL1(-1)-BUL1(-2))))+0.238705*(LOG(LNDEU)-LOG( LNDEU(-1)))+0.532259*(LOG(PCPN/PXN)-LOG(PCPN(-1)/PXN(-1)))+0.000000*( BTYD1-BTYD1(-1))+0.100000*(1.-DDTLNAP)*(LOG(DTLNAP)-LOG(DTLNAP(-1)))- 0.100000*(LOG(BYWNL(-1))-LOG(BYWNW(-1)))+0.030787*D87+0.046271*D7376) )*(1.0+JRLNA1))*(1.0-DLNA1)+DLNA1*ZLNA1$ FRML JLED JRLNA1 =LNA1/(EXP(LOG(LNA1(-1))+0.655083*(LOG(PYFN)-LOG(PYFN(-1)))+0.544074*(LOG(KQYFN1)-LOG( KQYFN1(-1)))+(1.-0.655083)*(LOG(PYFN(-1))-LOG(PYFN(-2)))+(1.-0.544074 )*(LOG(KQYFN1(-1))-LOG(KQYFN1(-2)))-(LOG((LNA1+BTATP*TATP)/LNA1)-LOG( (LNA1(-1)+BTATP(-1)*TATP(-1))/LNA1(-1)))-0.760890*(((1./3.)*(BUL1- BUL1(-1))+(2./3.)*(BUL1(-1)-BUL1(-2))))+0.238705*(LOG(LNDEU)-LOG( LNDEU(-1)))+0.532259*(LOG(PCPN/PXN)-LOG(PCPN(-1)/PXN(-1)))+0.000000*( BTYD1-BTYD1(-1))+0.100000*(1.-DDTLNAP)*(LOG(DTLNAP)-LOG(DTLNAP(-1)))- 0.100000*(LOG(BYWNL(-1))-LOG(BYWNW(-1)))+0.030787*D87+0.046271*D7376) )-1.0$ FRML EXO ZLNA1 =LNA1$ FRML _GJ_ LNAKK1 =LNA1+TATP+(TAQP1+TADF)*(1.-BQN1/2.)/HGWN+JLNAKK1$ FRML JLED JLNAKK1 =LNAKK1-(LNA1+TATP+(TAQP1+TADF)*(1.-BQN1/2.)/HGWN)$ FRML _GJ_ LNAK1 =LNAKK1+(TQU1+TIQAB1)*(1.-BQN1/2.)/HGWN+JLNAK1$ FRML JLED JLNAK1 =LNAK1-(LNAKK1+(TQU1+TIQAB1)*(1.-BQN1/2.)/HGWN)$ FRML _GJ_ LAH1 =LNA1*HA+JLAH1$ FRML JLED JLAH1 =LAH1-(LNA1*HA)$ FRML _GJ_ LNAHK1 =LNAK1*HGWN/(1.-BQN1/2.)+JLNAHK1$ FRML JLED JLNAHK1 =LNAHK1-(LNAK1*HGWN/(1.-BQN1/2.))$ FRML _GJDD LOH1 =(LOH1(-1)*((LAH1/LAH1(-1))*(1.+JRLOH))+JDLOH1)*(1.0-DLOH1)+DLOH1*ZLOH1$ FRML JLED JDLOH1 =LOH1-(LOH1(-1)*((LAH1/LAH1(-1))*(1.+JRLOH)))$ FRML EXO ZLOH1 =LOH1$ FRML _GJ_ LOHKK1 =LOH1+(TPATPI/(QW1*0.001))+JLOHKK1$ FRML JLED JLOHKK1 =LOHKK1-(LOH1+(TPATPI/(QW1*0.001)))$ FRML _GJ_ LOHK1 =LOHKK1+2./3.*TQU1+TIQAB1+JLOHK1$ FRML JLED JLOHK1 =LOHK1-(LOHKK1+2./3.*TQU1+TIQAB1)$ FRML _GJRD LIH =((LIH(-1)*(LNAP/LNAP(-1)))*(1.0+JRLIH))*(1.0-DLIH)+DLIH*ZLIH$ FRML JLED JRLIH =LIH/(LIH(-1)*(LNAP/LNAP(-1)))-1.0$ FRML EXO ZLIH =LIH$ 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$ FRML _GJ_D RLISA =(((LIH(-2)*HA(-2))/(LIH(-3)*HA(-3))-1.)*(1.-DLISA)+DLISA*(PCPN(-2)/PCPN(-3)-1.)+ JRLISA)*(1.0-DRLISA)+DRLISA*ZRLISA$ FRML JLED JRLISA =RLISA-(((LIH(-2)*HA(-2))/(LIH(-3)*HA(-3))-1.)*(1.-DLISA)+DLISA*(PCPN(-2)/PCPN(-3)-1.) )$ FRML EXO ZRLISA =RLISA$ FRML _GJRD BTB2 =(((TBHSL+TBHSK+TPATPI)/YSDA3)*(1.0+JRBTB2))*(1.0-DBTB2)+DBTB2*ZBTB2$ FRML JLED JRBTB2 =BTB2/((TBHSL+TBHSK+TPATPI)/YSDA3)-1.0$ FRML EXO ZBTB2 =BTB2$ 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))*(1.0+JRPTTY1))*(1.0-DPTTY1) +DPTTY1*ZPTTY1$ FRML JLED JRPTTY1 =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))-1.0$ FRML EXO ZPTTY1 =PTTY1$ FRML _GJRD PTTY2 =((PTTY2(-1)*(PCPDK(-2)/PCPDK(-3)))*(1.0+JRPTTY2))*(1.0-DPTTY2)+DPTTY2*ZPTTY2$ FRML JLED JRPTTY2 =PTTY2/(PTTY2(-1)*(PCPDK(-2)/PCPDK(-3)))-1.0$ FRML EXO ZPTTY2 =PTTY2$ FRML _GJ_D TYD =(0.001*TTYD1*PTTY1*ULDP+JTYD)*(1.0-DTYD)+DTYD*ZTYD$ FRML JLED JTYD =TYD-(0.001*TTYD1*PTTY1*ULDP)$ FRML EXO ZTYD =TYD$ FRML _GJ_D TYULY =(0.001*TTYULY*PTTY1*ULY+JTYULY)*(1.0-DTYULY)+DTYULY*ZTYULY$ FRML JLED JTYULY =TYULY-(0.001*TTYULY*PTTY1*ULY)$ FRML EXO ZTYULY =TYULY$ FRML _GJ_D TYUAK =(0.001*TTYUAK*PTTY1*UAKX+JTYUAK)*(1.0-DTYUAK)+DTYUAK*ZTYUAK$ FRML JLED JTYUAK =TYUAK-(0.001*TTYUAK*PTTY1*UAKX)$ FRML EXO ZTYUAK =TYUAK$ FRML _GJ_D TYUREV =(0.001*TTYUREV*PTTY1*UREV+JTYUREV)*(1.0-DTYUREV)+DTYUREV*ZTYUREV$ FRML JLED JTYUREV =TYUREV-(0.001*TTYUREV*PTTY1*UREV)$ FRML EXO ZTYUREV =TYUREV$ FRML _GJ_D TYUSU =(0.001*TTYUSU*PTTY1*USU+JTYUSU)*(1.0-DTYUSU)+DTYUSU*ZTYUSU$ FRML JLED JTYUSU =TYUSU-(0.001*TTYUSU*PTTY1*USU)$ FRML EXO ZTYUSU =TYUSU$ FRML _I TYU =TYULY+TYUAK+TYUREV+TYUSU$ FRML _D USS =USXA+QSS$ FRML _GJ_D TYMFDP =(0.001*TTYMFDP*PTTY1*UFDP+JTYMFDP)*(1.0-DTYMFDP)+DTYMFDP*ZTYMFDP$ FRML JLED JTYMFDP =TYMFDP-(0.001*TTYMFDP*PTTY1*UFDP)$ FRML EXO ZTYMFDP =TYMFDP$ FRML _GJ_D TYMS =(0.001*TTYMS*PTTY1*USS+JTYMS)*(1.0-DTYMS)+DTYMS*ZTYMS$ FRML JLED JTYMS =TYMS-(0.001*TTYMS*PTTY1*USS)$ FRML EXO ZTYMS =TYMS$ FRML _GJ_D TYMB =(0.001*TTYMB*PTTY1*USB+JTYMB)*(1.0-DTYMB)+DTYMB*ZTYMB$ FRML JLED JTYMB =TYMB-(0.001*TTYMB*PTTY1*USB)$ FRML EXO ZTYMB =TYMB$ FRML _GJ_D TYMF =(0.001*TTYMF*PTTY1*UMF+JTYMF)*(1.0-DTYMF)+DTYMF*ZTYMF$ FRML JLED JTYMF =TYMF-(0.001*TTYMF*PTTY1*UMF)$ FRML EXO ZTYMF =TYMF$ FRML _I TYM =TYMFDP+TYMS+TYMB+TYMF$ FRML _GJ_D TYPFP =(0.001*TTYPFP*PTTY1*(UFPX+QFP)+JTYPFP)*(1.0-DTYPFP)+DTYPFP*ZTYPFP$ FRML JLED JTYPFP =TYPFP-(0.001*TTYPFP*PTTY1*(UFPX+QFP))$ FRML EXO ZTYPFP =TYPFP$ FRML _GJ_D TYPFO =(0.001*TTYPFO*PTTY1*(UFOX+QFO)+JTYPFO)*(1.0-DTYPFO)+DTYPFO*ZTYPFO$ FRML JLED JTYPFO =TYPFO-(0.001*TTYPFO*PTTY1*(UFOX+QFO))$ FRML EXO ZTYPFO =TYPFO$ FRML _GJ_D TYPEF =(0.001*TTYPEF*PTTY1*UEF+JTYPEF)*(1.0-DTYPEF)+DTYPEF*ZTYPEF$ FRML JLED JTYPEF =TYPEF-(0.001*TTYPEF*PTTY1*UEF)$ FRML EXO ZTYPEF =TYPEF$ FRML _GJ_D TYPOV =(0.001*TTYPOV*PTTY1*UOV+JTYPOV)*(1.0-DTYPOV)+DTYPOV*ZTYPOV$ FRML JLED JTYPOV =TYPOV-(0.001*TTYPOV*PTTY1*UOV)$ FRML EXO ZTYPOV =TYPOV$ FRML _GJ_D TYPT =(TYPTD*PTTY1+JTYPT)*(1.0-DTYPT)+DTYPT*ZTYPT$ FRML JLED JTYPT =TYPT-(TYPTD*PTTY1)$ FRML EXO ZTYPT =TYPT$ FRML _GJ_D TYPPT =(TYPPTD*PTTY1+JTYPPT)*(1.0-DTYPPT)+DTYPPT*ZTYPPT$ FRML JLED JTYPPT =TYPPT-(TYPPTD*PTTY1)$ FRML EXO ZTYPPT =TYPPT$ FRML _GJ_D TYPDP =(TYPDPD*PTTY1+JTYPDP)*(1.0-DTYPDP)+DTYPDP*ZTYPDP$ FRML JLED JTYPDP =TYPDP-(TYPDPD*PTTY1)$ FRML EXO ZTYPDP =TYPDP$ FRML _GJ_D TYPI =(TYPID*PTTY1+JTYPI)*(1.0-DTYPI)+DTYPI*ZTYPI$ FRML JLED JTYPI =TYPI-(TYPID*PTTY1)$ FRML EXO ZTYPI =TYPI$ FRML _I TYPR =TYPT+TYPPT+TYPDP+TYPI$ FRML _GJ_D TYPRI =(TYPRI(-1)*(YWO2/YWO2(-1))+JTYPRI)*(1.0-DTYPRI)+DTYPRI*ZTYPRI$ FRML JLED JTYPRI =TYPRI-(TYPRI(-1)*(YWO2/YWO2(-1)))$ FRML EXO ZTYPRI =TYPRI$ FRML _I TYP =TYPFP+TYPFO+TYPEF+TYPOV+TYPR$ FRML _D UK =UKXA+ULU+UKAK$ FRML _GJ_D TYRKS =(0.001*TTYRKS*PTTY1*(UK-UKAK)*(1.-DSR2)+JTYRKS)*(1.0-DTYRKS)+DTYRKS*ZTYRKS$ FRML JLED JTYRKS =TYRKS-(0.001*TTYRKS*PTTY1*(UK-UKAK)*(1.-DSR2))$ FRML EXO ZTYRKS =TYRKS$ FRML _GJ_D TYRKR =(TYRKRD*PTTY1*(1.-DSR2)+(0.001*TTYK1*PTTY1*(UK-UKAK))*DSR2+JTYRKR)*(1.0-DTYRKR)+ DTYRKR*ZTYRKR$ FRML JLED JTYRKR =TYRKR-(TYRKRD*PTTY1*(1.-DSR2)+(0.001*TTYK1*PTTY1*(UK-UKAK))*DSR2)$ FRML EXO ZTYRKR =TYRKR$ FRML _I TYRK =TYRKS+TYRKR$ FRML _GJ_D TYRBF =(D4703*0.001*PTTY1*TTYRBF*UB+(1.-D4703)*0.001*PTTY2*TTYRBF1*UB+JTYRBF)*(1.0-DTYRBF)+ DTYRBF*ZTYRBF$ FRML JLED JTYRBF =TYRBF-(D4703*0.001*PTTY1*TTYRBF*UB+(1.-D4703)*0.001*PTTY2*TTYRBF1*UB)$ FRML EXO ZTYRBF =TYRBF$ FRML _GJ_D TYRHS =(TYRHSD*PTTY1+JTYRHS)*(1.0-DTYRHS)+DTYRHS*ZTYRHS$ FRML JLED JTYRHS =TYRHS-(TYRHSD*PTTY1)$ FRML EXO ZTYRHS =TYRHS$ FRML _GJ_D TYRHY =(0.001*TTYRHY*PTTY1*(UFPX+UFOX+QFP+QFO)+JTYRHY)*(1.0-DTYRHY)+DTYRHY*ZTYRHY$ FRML JLED JTYRHY =TYRHY-(0.001*TTYRHY*PTTY1*(UFPX+UFOX+QFP+QFO))$ FRML EXO ZTYRHY =TYRHY$ FRML _I TYRH =TYRHS+TYRHY$ FRML _GJ_D TYRRS =(TYRRSD*PTTY1+JTYRRS)*(1.0-DTYRRS)+DTYRRS*ZTYRRS$ FRML JLED JTYRRS =TYRRS-(TYRRSD*PTTY1)$ FRML EXO ZTYRRS =TYRRS$ FRML _GJ_D TYRRR =(TYRRRD*PTTY1+JTYRRR)*(1.0-DTYRRR)+DTYRRR*ZTYRRR$ FRML JLED JTYRRR =TYRRR-(TYRRRD*PTTY1)$ FRML EXO ZTYRRR =TYRRR$ FRML _I TYRR =TYRRS+TYRRR$ FRML _I TYR =TYRK+TYRBF+TYRH+TYRR$ FRML _I TY =TYU+TYD+TYM+TYP+TYR$ FRML _I TYS =TY-(TYRKR+TYRBF+TYRH+TYRRR)$ FRML _GJDD PCRS1 =(PCRS1(-1)*(1.+RLISA)*(1.-BTB2(-2))/(1.-BTB2(-3))*(1.-TSDA)/(1.-TSDA(-1))+JDPCRS1)*(1.0 -DPCRS1)+DPCRS1*ZPCRS1$ FRML JLED JDPCRS1 =PCRS1-(PCRS1(-1)*(1.+RLISA)*(1.-BTB2(-2))/(1.-BTB2(-3))*(1.-TSDA)/(1.-TSDA(-1)))$ FRML EXO ZPCRS1 =PCRS1$ FRML _KJ_D YAS =((YW1+TWEN+TYS+TYPSHL+TPHHLU+TPDMPU+TPSPU+TPATPU-SDU-TPATPI/(1.-TSDA)-SAQP-SAQO-( TBHSL+TBHSK)/(1.-TSDA)-TYPRI)*KYAS+JYAS)*(1.0-DYAS)+DYAS*ZYAS$ FRML JLED JYAS =YAS-((YW1+TWEN+TYS+TYPSHL+TPHHLU+TPDMPU+TPSPU+TPATPU-SDU-TPATPI/(1.-TSDA)-SAQP-SAQO-( TBHSL+TBHSK)/(1.-TSDA)-TYPRI)*KYAS)$ FRML EXO ZYAS =YAS$ FRML _GJ_D YASW =(KYAS*(YW1+TWEN-TYPRI)+JYASW)*(1.0-DYASW)+DYASW*ZYASW$ FRML JLED JYASW =YASW-(KYAS*(YW1+TWEN-TYPRI))$ FRML EXO ZYASW =YASW$ FRML _GJ_D YASD =(KYAS*(TYD+TYMFDP)+JYASD)*(1.0-DYASD)+DYASD*ZYASD$ FRML JLED JYASD =YASD-(KYAS*(TYD+TYMFDP))$ FRML EXO ZYASD =YASD$ FRML _GJ_D YASE =(KYAS*(TYPEF+TYPOV)+JYASE)*(1.0-DYASE)+DYASE*ZYASE$ FRML JLED JYASE =YASE-(KYAS*(TYPEF+TYPOV))$ FRML EXO ZYASE =YASE$ FRML _GJ_D YASP =(KYAS*TYPFP+JYASP)*(1.0-DYASP)+DYASP*ZYASP$ FRML JLED JYASP =YASP-(KYAS*TYPFP)$ FRML EXO ZYASP =YASP$ FRML _D YASR =YAS-(YASW+YASD+YASE+YASP)$ 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))+JIVMPS1)*(1.0-DIVMPS1)+DIVMPS1*ZIVMPS1$ FRML JLED JIVMPS1 =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 EXO ZIVMPS1 =IVMPS1$ 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))+JIVBPS1)*(1.0-DIVBPS1)+DIVBPS1* ZIVBPS1$ FRML JLED JIVBPS1 =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 EXO ZIVBPS1 =IVBPS1$ FRML _D IVPS1 =IVMPS1+IVBPS1$ FRML _GJ_D IVSK =(BIVSK*(IBE+IME)+(1.-((BIVSK+BIVSK(-1))/2.)/(NIVSK*BIVSK))*IVSK(-1)+JIVSK)*(1.0- DIVSK)+DIVSK*ZIVSK$ FRML JLED JIVSK =IVSK-(BIVSK*(IBE+IME)+(1.-((BIVSK+BIVSK(-1))/2.)/(NIVSK*BIVSK))*IVSK(-1))$ FRML EXO ZIVSK =IVSK$ FRML _D YRR2 =YRP-0.85*YRH1-(IPH/(I-IO11))*IVPS1$ FRML _KJ_D YRPSS1 =((0.5*YRR2+0.5*YRR2(-1))*KYRPSS3+JYRPSS1)*(1.0-DYRPSS1)+DYRPSS1*ZYRPSS1$ FRML JLED JYRPSS1 =YRPSS1-((0.5*YRR2+0.5*YRR2(-1))*KYRPSS3)$ FRML EXO ZYRPSS1 =YRPSS1$ FRML _KJ_D TOPS =(KTOPS*(TPHHLI+TPHHKI)+JTOPS)*(1.0-DTOPS)+DTOPS*ZTOPS$ FRML JLED JTOPS =TOPS-(KTOPS*(TPHHLI+TPHHKI))$ FRML EXO ZTOPS =TOPS$ FRML _KJ_D YSPPS =((TPDMPI+SAQWY+TPSPI)*KYSPPS+JYSPPS)*(1.0-DYSPPS)+DYSPPS*ZYSPPS$ FRML JLED JYSPPS =YSPPS-((TPDMPI+SAQWY+TPSPI)*KYSPPS)$ FRML EXO ZYSPPS =YSPPS$ FRML _KJ_D SDAS =(KSDAS*(SDA-TSDA*(TBHSK+TBHSL))+JSDAS)*(1.0-DSDAS)+DSDAS*ZSDAS$ FRML JLED JSDAS =SDAS-(KSDAS*(SDA-TSDA*(TBHSK+TBHSL)))$ FRML EXO ZSDAS =SDAS$ FRML _KJ_D YSPRS =(KYSPRS*(YW1+YRR2)+JYSPRS)*(1.0-DYSPRS)+DYSPRS*ZYSPRS$ FRML JLED JYSPRS =YSPRS-(KYSPRS*(YW1+YRR2))$ FRML EXO ZYSPRS =YSPRS$ FRML _KJ_D YRPHS =(PHV*(KNBHE(-1)/PIBH(-1))*TSDL*KYRPHS+JYRPHS)*(1.0-DYRPHS)+DYRPHS*ZYRPHS$ FRML JLED JYRPHS =YRPHS-(PHV*(KNBHE(-1)/PIBH(-1))*TSDL*KYRPHS)$ FRML EXO ZYRPHS =YRPHS$ FRML _KJ_D TIPPPS1 =(TIIN_H*KTIPPPS1+JTIPPPS1)*(1.0-DTIPPPS1)+DTIPPPS1*ZTIPPPS1$ FRML JLED JTIPPPS1 =TIPPPS1-(TIIN_H*KTIPPPS1)$ FRML EXO ZTIPPPS1 =TIPPPS1$ FRML _KJ_D YLWS =(SAFM+KYLWS*YW1+JYLWS)*(1.0-DYLWS)+DYLWS*ZYLWS$ FRML JLED JYLWS =YLWS-(SAFM+KYLWS*YW1)$ FRML EXO ZYLWS =YLWS$ FRML _KJ_D YL3S =(KYL3S*(YW1+YRR2)+JYL3S)*(1.0-DYL3S)+DYL3S*ZYL3S$ FRML JLED JYL3S =YL3S-(KYL3S*(YW1+YRR2))$ FRML EXO ZYL3S =YL3S$ FRML _KJ_D YSRS =(KYSRS*(YW1+YRR2)+JYSRS)*(1.0-DYSRS)+DYSRS*ZYSRS$ FRML JLED JYSRS =YSRS-(KYSRS*(YW1+YRR2))$ FRML EXO ZYSRS =YSRS$ FRML _DJ_D YSP =(YAS+YRPSS1-TOPS-SDAS-YSPPS+YSPRS+JYSP)*(1.0-DYSP)+DYSP*ZYSP$ FRML JLED JYSP =YSP-(YAS+YRPSS1-TOPS-SDAS-YSPPS+YSPRS)$ FRML EXO ZYSP =YSP$ FRML _DJ_D YS =(YSP+YRPHS+TIPPPS1-YLWS-YL3S+YSRS+JYS)*(1.0-DYS)+DYS*ZYS$ FRML JLED JYS =YS-(YSP+YRPHS+TIPPPS1-YLWS-YL3S+YSRS)$ FRML EXO ZYS =YS$ FRML _KJ_D USSY =(KUSSY*(Q1-QW1)+JUSSY)*(1.0-DUSSY)+DUSSY*ZUSSY$ FRML JLED JUSSY =USSY-(KUSSY*(Q1-QW1))$ FRML EXO ZUSSY =USSY$ FRML _KJ_D YSPS =(KKYSP*KYSPS*(0.017*YASW+0.000*YASD+0.000*YASE+0.000*YASP+0.036*YASR+0.852*YRPSS1-0.260 *TOPS-0.032*SDAS-0.032*YSPPS+0.034*YSPRS)+JYSPS)*(1.0-DYSPS)+DYSPS* ZYSPS$ FRML JLED JYSPS =YSPS-(KKYSP*KYSPS*(0.017*YASW+0.000*YASD+0.000*YASE+0.000*YASP+0.036*YASR+0.852* YRPSS1-0.260*TOPS-0.032*SDAS-0.032*YSPPS+0.034*YSPRS))$ FRML EXO ZYSPS =YSPS$ FRML _KJ_D YSS =(KKYS*KYSS*(YSPS+0.033*(YRPHS+TIPPPS1)-0.017*YLWS-0.034*YL3S+0.034*YSRS)+JYSS)*(1.0- DYSS)+DYSS*ZYSS$ FRML JLED JYSS =YSS-(KKYS*KYSS*(YSPS+0.033*(YRPHS+TIPPPS1)-0.017*YLWS-0.034*YL3S+0.034*YSRS))$ FRML EXO ZYSS =YSS$ 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$ FRML _KJ_D UWSY =(KUWSY*QW1+JUWSY)*(1.0-DUWSY)+DUWSY*ZUWSY$ FRML JLED JUWSY =UWSY-(KUWSY*QW1)$ FRML EXO ZUWSY =UWSY$ FRML _KJ_D YSPW =(KKYSP*KYSPW*(0.969*YASW+0.421*YASD+0.000*YASE+0.000*YASP+0.192*YASR+0.127*YRPSS1-0.581 *TOPS-0.953*SDAS-0.953*YSPPS+0.951*YSPRS)+JYSPW)*(1.0-DYSPW)+DYSPW* ZYSPW$ FRML JLED JYSPW =YSPW-(KKYSP*KYSPW*(0.969*YASW+0.421*YASD+0.000*YASE+0.000*YASP+0.192*YASR+0.127* YRPSS1-0.581*TOPS-0.953*SDAS-0.953*YSPPS+0.951*YSPRS))$ FRML EXO ZYSPW =YSPW$ FRML _KJ_D YSW =(KKYS*KYSW*(YSPW+1.003*(YRPHS+TIPPPS1)-0.969*YLWS-0.951*YL3S+0.951*YSRS)+JYSW)*(1.0- DYSW)+DYSW*ZYSW$ FRML JLED JYSW =YSW-(KKYS*KYSW*(YSPW+1.003*(YRPHS+TIPPPS1)-0.969*YLWS-0.951*YL3S+0.951*YSRS))$ FRML EXO ZYSW =YSW$ 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$ FRML _KJ_D ULSY =(KULSY*(UL+UFDP)+JULSY)*(1.0-DULSY)+DULSY*ZULSY$ FRML JLED JULSY =ULSY-(KULSY*(UL+UFDP))$ FRML EXO ZULSY =ULSY$ FRML _KJ_D YSPL =(KKYSP*KYSPL*(0.005*YASW+0.579*YASD+0.000*YASE+0.000*YASP+0.013*YASR+0.000*YRPSS1-0.086 *TOPS-0.006*SDAS-0.006*YSPPS+0.006*YSPRS)+JYSPL)*(1.0-DYSPL)+DYSPL* ZYSPL$ FRML JLED JYSPL =YSPL-(KKYSP*KYSPL*(0.005*YASW+0.579*YASD+0.000*YASE+0.000*YASP+0.013*YASR+0.000* YRPSS1-0.086*TOPS-0.006*SDAS-0.006*YSPPS+0.006*YSPRS))$ FRML EXO ZYSPL =YSPL$ FRML _KJ_D YSL =(KKYS*KYSL*(YSPL+0.021*(YRPHS+TIPPPS1)-0.005*YLWS-0.006*YL3S+0.006*YSRS)+JYSL)*(1.0- DYSL)+DYSL*ZYSL$ FRML JLED JYSL =YSL-(KKYS*KYSL*(YSPL+0.021*(YRPHS+TIPPPS1)-0.005*YLWS-0.006*YL3S+0.006*YSRS))$ FRML EXO ZYSL =YSL$ 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$ FRML _KJ_D UEFSY =(KUEFSY*(UEF+UOV)+JUEFSY)*(1.0-DUEFSY)+DUEFSY*ZUEFSY$ FRML JLED JUEFSY =UEFSY-(KUEFSY*(UEF+UOV))$ FRML EXO ZUEFSY =UEFSY$ FRML _KJ_D YSPEF =(KKYSP*KYSPEF*(0.001*YASW+0.000*YASD+1.00*YASE+0.000*YASP+0.057*YASR+0.000*YRPSS1-0.000 *TOPS-0.001*SDAS-0.001*YSPPS+0.001*YSPRS)+JYSPEF)*(1.0-DYSPEF)+ DYSPEF*ZYSPEF$ FRML JLED JYSPEF =YSPEF-(KKYSP*KYSPEF*(0.001*YASW+0.000*YASD+1.00*YASE+0.000*YASP+0.057*YASR+0.000* YRPSS1-0.000*TOPS-0.001*SDAS-0.001*YSPPS+0.001*YSPRS))$ FRML EXO ZYSPEF =YSPEF$ FRML _KJ_D YSEF =(KKYS*KYSEF*(YSPEF+0.010*(YRPHS+TIPPPS1)-0.001*YLWS-0.001*YL3S+0.001*YSRS)+JYSEF)*(1.0 -DYSEF)+DYSEF*ZYSEF$ FRML JLED JYSEF =YSEF-(KKYS*KYSEF*(YSPEF+0.010*(YRPHS+TIPPPS1)-0.001*YLWS-0.001*YL3S+0.001*YSRS))$ FRML EXO ZYSEF =YSEF$ 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$ FRML _KJ_D UFPSY =(KUFPSY*UFPX+JUFPSY)*(1.0-DUFPSY)+DUFPSY*ZUFPSY$ FRML JLED JUFPSY =UFPSY-(KUFPSY*UFPX)$ FRML EXO ZUFPSY =UFPSY$ FRML _KJ_D YSPFP =(KKYSP*KYSPFP*(0.001*YASW+0.000*YASD+0.000*YASE+1.00*YASP+0.045*YASR+0.021*YRPSS1-0.000 *TOPS-0.001*SDAS-0.001*YSPPS+0.001*YSPRS)+JYSPFP)*(1.0-DYSPFP)+ DYSPFP*ZYSPFP$ FRML JLED JYSPFP =YSPFP-(KKYSP*KYSPFP*(0.001*YASW+0.000*YASD+0.000*YASE+1.00*YASP+0.045*YASR+0.021* YRPSS1-0.000*TOPS-0.001*SDAS-0.001*YSPPS+0.001*YSPRS))$ FRML EXO ZYSPFP =YSPFP$ FRML _KJ_D YSFP =(KKYS*KYSFP*(YSPFP-0.108*(YRPHS+TIPPPS1)-0.001*YLWS-0.001*YL3S+0.001*YSRS)+JYSFP)*(1.0 -DYSFP)+DYSFP*ZYSFP$ FRML JLED JYSFP =YSFP-(KKYS*KYSFP*(YSPFP-0.108*(YRPHS+TIPPPS1)-0.001*YLWS-0.001*YL3S+0.001*YSRS))$ FRML EXO ZYSFP =YSFP$ 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$ FRML _KJ_D UQSY =(KUQSY*(UWXA-UEF-UOV)+JUQSY)*(1.0-DUQSY)+DUQSY*ZUQSY$ FRML JLED JUQSY =UQSY-(KUQSY*(UWXA-UEF-UOV))$ FRML EXO ZUQSY =UQSY$ FRML _KJ_D YSPQ =(KKYSP*KYSPQ*(0.007*YASW+0.000*YASD+0.000*YASE+0.000*YASP+0.647*YASR+0.000*YRPSS1-0.073 *TOPS-0.007*SDAS-0.007*YSPPS+0.007*YSPRS)+JYSPQ)*(1.0-DYSPQ)+DYSPQ* ZYSPQ$ FRML JLED JYSPQ =YSPQ-(KKYSP*KYSPQ*(0.007*YASW+0.000*YASD+0.000*YASE+0.000*YASP+0.647*YASR+0.000* YRPSS1-0.073*TOPS-0.007*SDAS-0.007*YSPPS+0.007*YSPRS))$ FRML EXO ZYSPQ =YSPQ$ FRML _KJ_D YSQ =(KKYS*KYSQ*(YSPQ+0.041*(YRPHS+TIPPPS1)-0.007*YLWS-0.007*YL3S+0.007*YSRS)+JYSQ)*(1.0- DYSQ)+DYSQ*ZYSQ$ FRML JLED JYSQ =YSQ-(KKYS*KYSQ*(YSPQ+0.041*(YRPHS+TIPPPS1)-0.007*YLWS-0.007*YL3S+0.007*YSRS))$ FRML EXO ZYSQ =YSQ$ 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$ FRML _D____Z KKYSP =KKYSP*(1.-D4799)+1.-((YSPS+YSPW+YSPL+YSPEF+YSPFP+YSPQ)/YSP)*(1.-D4799)$ FRML _D____Z KKYS =KKYS*(1.-D4799)+1.-((YSS+YSW+YSL+YSEF+YSFP+YSQ)/YS)*(1.-D4799)$ FRML _G USY =(1.-DUSY)*((1.-DSK2)*((UW+UFPX)*KUSY2*(1.-DSK1)+DSK1*(UA1+UFPX+UFOX+UEF+UOV+UMF)* KUSY1)+DSK2*(USSY+UWSY+ULSY+UEFSY+UFPSY+UQSY)+JUSY)+DUSY*ZUSY$ 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+JBYSP11)+(1.-DSK2)*BYSP11E$ FRML _G BYSP21 =DSK2*((BYSP21S*YSPS+BYSP21W*YSPW+BYSP21L*YSPL+BYSP21EF*YSPEF+BYSP21FP*YSPFP+BYSP21Q* YSPQ)/YSP+JBYSP21)+(1.-DSK2)*BYSP21E$ FRML _G BYSP31 =DSK2*((BYSP31S*YSPS+BYSP31W*YSPW+BYSP31L*YSPL+BYSP31EF*YSPEF+BYSP31FP*YSPFP+BYSP31Q* YSPQ)/YSP+JBYSP31)+(1.-DSK2)*BYSP31E$ FRML _G BYSP41 =DSK2*((BYSP41S*YSPS+BYSP41W*YSPW+BYSP41L*YSPL+BYSP41EF*YSPEF+BYSP41FP*YSPFP+BYSP41Q* YSPQ)/YSP+JBYSP41)+(1.-DSK2)*BYSP41E$ FRML _G BYSP51 =DSK2*((BYSP51S*YSPS+BYSP51W*YSPW+BYSP51L*YSPL+BYSP51EF*YSPEF+BYSP51FP*YSPFP+BYSP51Q* YSPQ)/YSP+JBYSP51)+(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+ JBYS11)+(1.-DSK2)*BYS11E$ FRML _G BYS21 =DSK2*((BYS21S*YSS+BYS21W*YSW+BYS21L*YSL+BYS21EF*YSEF+BYS21FP*YSFP+BYS21Q*YSQ)/YS+ JBYS21)+(1.-DSK2)*BYS21E$ FRML _G BYS31 =DSK2*((BYS31S*YSS+BYS31W*YSW+BYS31L*YSL+BYS31EF*YSEF+BYS31FP*YSFP+BYS31Q*YSQ)/YS+ JBYS31)+(1.-DSK2)*BYS31E$ FRML _G BYS41 =DSK2*((BYS41S*YSS+BYS41W*YSW+BYS41L*YSL+BYS41EF*YSEF+BYS41FP*YSFP+BYS41Q*YSQ)/YS+ JBYS41)+(1.-DSK2)*BYS41E$ FRML _G BYS51 =DSK2*((BYS51S*YSS+BYS51W*YSW+BYS51L*YSL+BYS51EF*YSEF+BYS51FP*YSFP+BYS51Q*YSQ)/YS+ JBYS51)+(1.-DSK2)*BYS51E$ FRML _D KBYSP1 =(1.-DSK2)*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+ JKBYSP1)+DSK2*(((YSP1/YSP)-BYSP10)/(100.*BYSP11+10.**(-15.)))$ FRML _D KBYSP2 =(1.-DSK2)*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+ JKBYSP2)+DSK2*(((YSP2/YSP)-BYSP20)/(100.*BYSP21+10.**(-15.)))$ FRML _D KBYSP3 =(1.-DSK2)*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+ JKBYSP3)+DSK2*(((YSP3/YSP)-BYSP30)/(100.*BYSP31+10.**(-15.)))$ FRML _D KBYSP4 =(1.-DSK2)*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+ JKBYSP4)+DSK2*(((YSP4/YSP)-BYSP40)/(100.*BYSP41+10.**(-15.)))$ FRML _D KBYSP5 =(1.-DSK2)*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+ JKBYSP5)+DSK2*(((YSP5/YSP)-BYSP50)/(100.*BYSP51+10.**(-15.)))$ FRML _GJ_D YSP1 =((1.-DSK2)*(BYSP10+100.*BYSP11*KBYSP1)*YSP+DSK2*(YSPS1+YSPW1+YSPL1+YSPEF1+YSPFP1+ YSPQ1)+JYSP1)*(1.0-DYSP1)+DYSP1*ZYSP1$ FRML JLED JYSP1 =YSP1-((1.-DSK2)*(BYSP10+100.*BYSP11*KBYSP1)*YSP+DSK2*(YSPS1+YSPW1+YSPL1+YSPEF1+ YSPFP1+YSPQ1))$ FRML EXO ZYSP1 =YSP1$ FRML _GJ_D YSP2 =((1.-DSK2)*(BYSP20+100.*BYSP21*KBYSP2)*YSP+DSK2*(YSPS2+YSPW2+YSPL2+YSPEF2+YSPFP2+ YSPQ2)+JYSP2)*(1.0-DYSP2)+DYSP2*ZYSP2$ FRML JLED JYSP2 =YSP2-((1.-DSK2)*(BYSP20+100.*BYSP21*KBYSP2)*YSP+DSK2*(YSPS2+YSPW2+YSPL2+YSPEF2+ YSPFP2+YSPQ2))$ FRML EXO ZYSP2 =YSP2$ FRML _GJ_D YSP3 =((1.-DSK2)*(BYSP30+100.*BYSP31*KBYSP3)*YSP+DSK2*(YSPS3+YSPW3+YSPL3+YSPEF3+YSPFP3+ YSPQ3)+JYSP3)*(1.0-DYSP3)+DYSP3*ZYSP3$ FRML JLED JYSP3 =YSP3-((1.-DSK2)*(BYSP30+100.*BYSP31*KBYSP3)*YSP+DSK2*(YSPS3+YSPW3+YSPL3+YSPEF3+ YSPFP3+YSPQ3))$ FRML EXO ZYSP3 =YSP3$ FRML _GJ_D YSP4 =((1.-DSK2)*(BYSP40+100.*BYSP41*KBYSP4)*YSP+DSK2*(YSPS4+YSPW4+YSPL4+YSPEF4+YSPFP4+ YSPQ4)+JYSP4)*(1.0-DYSP4)+DYSP4*ZYSP4$ FRML JLED JYSP4 =YSP4-((1.-DSK2)*(BYSP40+100.*BYSP41*KBYSP4)*YSP+DSK2*(YSPS4+YSPW4+YSPL4+YSPEF4+ YSPFP4+YSPQ4))$ FRML EXO ZYSP4 =YSP4$ FRML _GJ_D YSP5 =((1.-DSK2)*(BYSP50+100.*BYSP51*KBYSP5)*YSP+DSK2*(YSPS5+YSPW5+YSPL5+YSPEF5+YSPFP5+ YSPQ5)+JYSP5)*(1.0-DYSP5)+DYSP5*ZYSP5$ FRML JLED JYSP5 =YSP5-((1.-DSK2)*(BYSP50+100.*BYSP51*KBYSP5)*YSP+DSK2*(YSPS5+YSPW5+YSPL5+YSPEF5+ YSPFP5+YSPQ5))$ FRML EXO ZYSP5 =YSP5$ FRML _D KBYS1 =(1.-DSK2)*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS1)+DSK2*(((YS1/YS)- BYS10)/(100.*BYS11+10.**(-15.)))$ FRML _D KBYS2 =(1.-DSK2)*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS2)+DSK2*(((YS2/YS)- BYS20)/(100.*BYS21+10.**(-15.)))$ FRML _D KBYS3 =(1.-DSK2)*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS3)+DSK2*(((YS3/YS)- BYS30)/(100.*BYS31+10.**(-15.)))$ FRML _D KBYS4 =(1.-DSK2)*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS4)+DSK2*(((YS4/YS)- BYS40)/(100.*BYS41+10.**(-15.)))$ FRML _D KBYS5 =(1.-DSK2)*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS5)+DSK2*(((YS5/YS)- BYS50)/(100.*BYS51+10.**(-15.)))$ FRML _GJ_D YS1 =((1.-DSK2)*(BYS10+100.*BYS11*KBYS1)*YS+DSK2*(YSS1+YSW1+YSL1+YSEF1+YSFP1+YSQ1)+JYS1)*( 1.0-DYS1)+DYS1*ZYS1$ FRML JLED JYS1 =YS1-((1.-DSK2)*(BYS10+100.*BYS11*KBYS1)*YS+DSK2*(YSS1+YSW1+YSL1+YSEF1+YSFP1+YSQ1))$ FRML EXO ZYS1 =YS1$ FRML _GJ_D YS2 =((1.-DSK2)*(BYS20+100.*BYS21*KBYS2)*YS+DSK2*(YSS2+YSW2+YSL2+YSEF2+YSFP2+YSQ2)+JYS2)*( 1.0-DYS2)+DYS2*ZYS2$ FRML JLED JYS2 =YS2-((1.-DSK2)*(BYS20+100.*BYS21*KBYS2)*YS+DSK2*(YSS2+YSW2+YSL2+YSEF2+YSFP2+YSQ2))$ FRML EXO ZYS2 =YS2$ FRML _GJ_D YS3 =((1.-DSK2)*(BYS30+100.*BYS31*KBYS3)*YS+DSK2*(YSS3+YSW3+YSL3+YSEF3+YSFP3+YSQ3)+JYS3)*( 1.0-DYS3)+DYS3*ZYS3$ FRML JLED JYS3 =YS3-((1.-DSK2)*(BYS30+100.*BYS31*KBYS3)*YS+DSK2*(YSS3+YSW3+YSL3+YSEF3+YSFP3+YSQ3))$ FRML EXO ZYS3 =YS3$ FRML _GJ_D YS4 =((1.-DSK2)*(BYS40+100.*BYS41*KBYS4)*YS+DSK2*(YSS4+YSW4+YSL4+YSEF4+YSFP4+YSQ4)+JYS4)*( 1.0-DYS4)+DYS4*ZYS4$ FRML JLED JYS4 =YS4-((1.-DSK2)*(BYS40+100.*BYS41*KBYS4)*YS+DSK2*(YSS4+YSW4+YSL4+YSEF4+YSFP4+YSQ4))$ FRML EXO ZYS4 =YS4$ FRML _GJ_D YS5 =((1.-DSK2)*(BYS50+100.*BYS51*KBYS5)*YS+DSK2*(YSS5+YSW5+YSL5+YSEF5+YSFP5+YSQ5)+JYS5)*( 1.0-DYS5)+DYS5*ZYS5$ FRML JLED JYS5 =YS5-((1.-DSK2)*(BYS50+100.*BYS51*KBYS5)*YS+DSK2*(YSS5+YSW5+YSL5+YSEF5+YSFP5+YSQ5))$ FRML EXO ZYS5 =YS5$ FRML _GJ_D SSYSP1 =((1.-DSK2)*TSYSP1*YSP1*(1.+JRSSYSP1)+DSK2*(SSYSPS1+SSYSPW1+SSYSPL1+SSYSPEF1+SSYSPFP1+ SSYSPQ1)+JSSYSP1)*(1.0-DSSYSP1)+DSSYSP1*ZSSYSP1$ FRML JLED JSSYSP1 =SSYSP1-((1.-DSK2)*TSYSP1*YSP1*(1.+JRSSYSP1)+DSK2*(SSYSPS1+SSYSPW1+SSYSPL1+SSYSPEF1+ SSYSPFP1+SSYSPQ1))$ FRML EXO ZSSYSP1 =SSYSP1$ FRML _GJ_D SSYSP2 =((1.-DSK2)*TSYSP2*YSP2*(1.+JRSSYSP2)+DSK2*(SSYSPS2+SSYSPW2+SSYSPL2+SSYSPEF2+SSYSPFP2+ SSYSPQ2)+JSSYSP2)*(1.0-DSSYSP2)+DSSYSP2*ZSSYSP2$ FRML JLED JSSYSP2 =SSYSP2-((1.-DSK2)*TSYSP2*YSP2*(1.+JRSSYSP2)+DSK2*(SSYSPS2+SSYSPW2+SSYSPL2+SSYSPEF2+ SSYSPFP2+SSYSPQ2))$ FRML EXO ZSSYSP2 =SSYSP2$ FRML _GJ_D SSYSP3 =((1.-DSK2)*TSYSP3*YSP3*(1.+JRSSYSP3)+DSK2*(SSYSPS3+SSYSPW3+SSYSPL3+SSYSPEF3+SSYSPFP3+ SSYSPQ3)+JSSYSP3)*(1.0-DSSYSP3)+DSSYSP3*ZSSYSP3$ FRML JLED JSSYSP3 =SSYSP3-((1.-DSK2)*TSYSP3*YSP3*(1.+JRSSYSP3)+DSK2*(SSYSPS3+SSYSPW3+SSYSPL3+SSYSPEF3+ SSYSPFP3+SSYSPQ3))$ FRML EXO ZSSYSP3 =SSYSP3$ FRML _GJ_D SSYSP4 =((1.-DSK2)*TSYSP4*YSP4*(1.+JRSSYSP3)+DSK2*(SSYSPS4+SSYSPW4+SSYSPL4+SSYSPEF4+SSYSPFP4+ SSYSPQ4)+JSSYSP4)*(1.0-DSSYSP4)+DSSYSP4*ZSSYSP4$ FRML JLED JSSYSP4 =SSYSP4-((1.-DSK2)*TSYSP4*YSP4*(1.+JRSSYSP3)+DSK2*(SSYSPS4+SSYSPW4+SSYSPL4+SSYSPEF4+ SSYSPFP4+SSYSPQ4))$ FRML EXO ZSSYSP4 =SSYSP4$ FRML _GJ_D SSYSP5 =((1.-DSK2)*TSYSP5*YSP5*(1.+JRSSYSP3)+DSK2*(SSYSPS5+SSYSPW5+SSYSPL5+SSYSPEF5+SSYSPFP5+ SSYSPQ5)+JSSYSP5)*(1.0-DSSYSP5)+DSSYSP5*ZSSYSP5$ FRML JLED JSSYSP5 =SSYSP5-((1.-DSK2)*TSYSP5*YSP5*(1.+JRSSYSP3)+DSK2*(SSYSPS5+SSYSPW5+SSYSPL5+SSYSPEF5+ SSYSPFP5+SSYSPQ5))$ FRML EXO ZSSYSP5 =SSYSP5$ FRML _GJ_D SSYS1 =((1.-DSK2)*TSYS1*YS1*(1.+JRSSYS1)+DSK2*(SSYSS1+SSYSW1+SSYSL1+SSYSEF1+SSYSFP1+SSYSQ1)+ JSSYS1)*(1.0-DSSYS1)+DSSYS1*ZSSYS1$ FRML JLED JSSYS1 =SSYS1-((1.-DSK2)*TSYS1*YS1*(1.+JRSSYS1)+DSK2*(SSYSS1+SSYSW1+SSYSL1+SSYSEF1+SSYSFP1+ SSYSQ1))$ FRML EXO ZSSYS1 =SSYS1$ FRML _GJ_D SSYS2 =((1.-DSK2)*TSYS2*YS2*(1.+JRSSYS2)+DSK2*(SSYSS2+SSYSW2+SSYSL2+SSYSEF2+SSYSFP2+SSYSQ2)+ JSSYS2)*(1.0-DSSYS2)+DSSYS2*ZSSYS2$ FRML JLED JSSYS2 =SSYS2-((1.-DSK2)*TSYS2*YS2*(1.+JRSSYS2)+DSK2*(SSYSS2+SSYSW2+SSYSL2+SSYSEF2+SSYSFP2+ SSYSQ2))$ FRML EXO ZSSYS2 =SSYS2$ FRML _GJ_D SSYS3 =((1.-DSK2)*TSYS3*YS3*(1.+JRSSYS3)+DSK2*(SSYSS3+SSYSW3+SSYSL3+SSYSEF3+SSYSFP3+SSYSQ3)+ JSSYS3)*(1.0-DSSYS3)+DSSYS3*ZSSYS3$ FRML JLED JSSYS3 =SSYS3-((1.-DSK2)*TSYS3*YS3*(1.+JRSSYS3)+DSK2*(SSYSS3+SSYSW3+SSYSL3+SSYSEF3+SSYSFP3+ SSYSQ3))$ FRML EXO ZSSYS3 =SSYS3$ FRML _GJ_D SSYS4 =((1.-DSK2)*TSYS4*YS4*(1.+JRSSYS4)+DSK2*(SSYSS4+SSYSW4+SSYSL4+SSYSEF4+SSYSFP4+SSYSQ4)+ JSSYS4)*(1.0-DSSYS4)+DSSYS4*ZSSYS4$ FRML JLED JSSYS4 =SSYS4-((1.-DSK2)*TSYS4*YS4*(1.+JRSSYS4)+DSK2*(SSYSS4+SSYSW4+SSYSL4+SSYSEF4+SSYSFP4+ SSYSQ4))$ FRML EXO ZSSYS4 =SSYS4$ FRML _GJ_D SSYS5 =((1.-DSK2)*TSYS5*YS5*(1.+JRSSYS5)+DSK2*(SSYSS5+SSYSW5+SSYSL5+SSYSEF5+SSYSFP5+SSYSQ5)+ JSSYS5)*(1.0-DSSYS5)+DSSYS5*ZSSYS5$ FRML JLED JSSYS5 =SSYS5-((1.-DSK2)*TSYS5*YS5*(1.+JRSSYS5)+DSK2*(SSYSS5+SSYSW5+SSYSL5+SSYSEF5+SSYSFP5+ SSYSQ5))$ FRML EXO ZSSYS5 =SSYS5$ 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*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$ FRML _KJ_D SSYA =((KNMP+KNBP)*IWBZ*KSSYA+JSSYA)*(1.0-DSSYA)+DSSYA*ZSSYA$ FRML JLED JSSYA =SSYA-((KNMP+KNBP)*IWBZ*KSSYA)$ FRML EXO ZSSYA =SSYA$ FRML _KJ_D SSYEJ =((KNBHE(-1)/PIBH(-1))*PHV*TQKEJ*KSSYEJ*(1.+JRSSSYEJ)+JSSYEJ)*(1.0-DSSYEJ)+DSSYEJ* ZSSYEJ$ FRML JLED JSSYEJ =SSYEJ-((KNBHE(-1)/PIBH(-1))*PHV*TQKEJ*KSSYEJ*(1.+JRSSSYEJ))$ FRML EXO ZSSYEJ =SSYEJ$ FRML _KJ_D SSYV =(TSDS1*YSDS*KSSYV+JSSYV)*(1.0-DSSYV)+DSSYV*ZSSYV$ FRML JLED JSSYV =SSYV-(TSDS1*YSDS*KSSYV)$ FRML EXO ZSSYV =SSYV$ FRML _D KBYSP =DSK1*(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)+JKBYSP)+(1. -DSK1)*(((SSYSP/(KSSYSP*YSP))-TSSP0)/(TSSP1+10.**(-15.)))$ FRML _GJ_D SSYSP =(DSK1*(TSSP0+TSSP1*KBYSP)*YSP*KSSYSP+(1.-DSK1)*(SSYSP1+SSYSP2+SSYSP3+SSYSP4+SSYSP5)+ JSSYSP)*(1.0-DSSYSP)+DSSYSP*ZSSYSP$ FRML JLED JSSYSP =SSYSP-(DSK1*(TSSP0+TSSP1*KBYSP)*YSP*KSSYSP+(1.-DSK1)*(SSYSP1+SSYSP2+SSYSP3+SSYSP4+ SSYSP5))$ FRML EXO ZSSYSP =SSYSP$ FRML _D KBYS =DSK1*((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1)+JKBYS)+(1.-DSK1)*(((SSYS/(KSSYS* YS))-TSS0)/TSS1)$ FRML _GJ_D SSYS =(DSK1*(TSS0+TSS1*KBYS)*YS*KSSYS+(1.-DSK1)*(SSYS1+SSYS2+SSYS3+SSYS4+SSYS5)+JSSYS)*(1.0 -DSSYS)+DSSYS*ZSSYS$ FRML JLED JSSYS =SSYS-(DSK1*(TSS0+TSS1*KBYS)*YS*KSSYS+(1.-DSK1)*(SSYS1+SSYS2+SSYS3+SSYS4+SSYS5))$ FRML EXO ZSSYS =SSYS$ FRML _G SSY2 =SSYS+SSYSP+SSYEJ+SSYA+SSYV+SSYD$ FRML _G SDK1 =SSY2+SKSI1(-1)+SSF+SSSO$ FRML _G SDU =TDU1*QW1*(1.-BQ1/2.)*0.001$ FRML _DJ_D YSDA3 =(YW1-TYPRI+0.75*(0.5*YRR2+0.5*YRR2(-1))+JYSDA3)*(1.0-DYSDA3)+DYSDA3*ZYSDA3$ FRML JLED JYSDA3 =YSDA3-(YW1-TYPRI+0.75*(0.5*YRR2+0.5*YRR2(-1)))$ FRML EXO ZYSDA3 =YSDA3$ FRML _DJ_D TARN =(TYD+TYPEF+TYPOV+TYM+TYUAK-SAFM-SAQP+JTARN)*(1.0-DTARN)+DTARN*ZTARN$ FRML JLED JTARN =TARN-(TYD+TYPEF+TYPOV+TYM+TYUAK-SAFM-SAQP)$ FRML EXO ZTARN =TARN$ FRML _G TSDA =TSDAE+((TARN(-2)-TARNE(-2))/(YSDA3(-2)*3.))*(1.-DTSDA)$ FRML _KJ_D SDA =(TSDA*(YSDA3*KSDA)+JSDA)*(1.0-DSDA)+DSDA*ZSDA$ FRML JLED JSDA =SDA-(TSDA*(YSDA3*KSDA))$ FRML EXO ZSDA =SDA$ FRML _GJ_D SDV =(TSDV1*FKCB(-1)+JSDV)*(1.0-DSDV)+DSDV*ZSDV$ FRML JLED JSDV =SDV-(TSDV1*FKCB(-1))$ FRML EXO ZSDV =SDV$ FRML _DJRD YSDS =((YRS1+(TIN_CR+TIU_CR_Z)+YRQF1+(TIN_CF+TIU_CF_Z)-TIORE-((1.-(IPH/(I-IO11)))*IVPS1+(1. -IPH(-1)/(I(-1)-IO11(-1)))*IVPS1(-1))/2.)*(1.0+JRYSDS))*(1.0-DYSDS)+ DYSDS*ZYSDS$ FRML JLED JRYSDS =YSDS/(YRS1+(TIN_CR+TIU_CR_Z)+YRQF1+(TIN_CF+TIU_CF_Z)-TIORE-((1.-(IPH/(I-IO11)))* IVPS1+(1.-IPH(-1)/(I(-1)-IO11(-1)))*IVPS1(-1))/2.)-1.0$ FRML EXO ZYSDS =YSDS$ FRML _KJ_D SDSK =(KSDSK*TSDSK*((1.-TSDS1)*YRE1-TIORE-IVSK)-(1.-D4703)*SIPXE+JSDSK)*(1.0-DSDSK)+DSDSK* ZSDSK$ FRML JLED JSDSK =SDSK-(KSDSK*TSDSK*((1.-TSDS1)*YRE1-TIORE-IVSK)-(1.-D4703)*SIPXE)$ FRML EXO ZSDSK =SDSK$ FRML _KJRD SDSR =((KSDSR*TSDS1*(BSDS+KTSDS*(1.-BSDS))*(YSDS+YSDS(-1))/2.)*(1.0+JRSDSR))*(1.0-DSDSR)+ DSDSR*ZSDSR$ FRML JLED JRSDSR =SDSR/(KSDSR*TSDS1*(BSDS+KTSDS*(1.-BSDS))*(YSDS+YSDS(-1))/2.)-1.0$ FRML EXO ZSDSR =SDSR$ FRML _I SDS =SDSR+SDSK$ FRML _GJRD IWBR =((0.9*((TIPPHLP(-1)+TIPPHLP(-2))/(2.*WP_Z_IQ(-2)))+0.1*IWBZ-0.0003)*(1.0+JRIWBR))*(1.0 -DIWBR)+DIWBR*ZIWBR$ FRML JLED JRIWBR =IWBR/(0.9*((TIPPHLP(-1)+TIPPHLP(-2))/(2.*WP_Z_IQ(-2)))+0.1*IWBZ-0.0003)-1.0$ FRML EXO ZIWBR =IWBR$ FRML _D PCPN =PCPN(-1)*(PNCB*FCB+PNCE*FCE+PNCF*FCF+PNCG*FCG+PNCH*FCH+PNCI*FCI+PNCK*FCK+PNCN*FCN+ PNCS*FCS+PCT*FCT+PNCV*FCV)/(PNCB(-1)*FCB+PNCE(-1)*FCE+PNCF(-1)*FCF+ PNCG(-1)*FCG+PNCH(-1)*FCH+PNCI(-1)*FCI+PNCK(-1)*FCK+PNCN(-1)*FCN+ PNCS(-1)*FCS+PCT(-1)*FCT+PNCV(-1)*FCV)$ 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)+JTSDR)*(1.0-DTSDR)+DTSDR*ZTSDR$ FRML JLED JTSDR =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 EXO ZTSDR =TSDR$ FRML _KJ_D SDRLD =(KSDRLD*(TSDR*TILD+TSDRA*OLD)+JSDRLD)*(1.0-DSDRLD)+DSDRLD*ZSDRLD$ FRML JLED JSDRLD =SDRLD-(KSDRLD*(TSDR*TILD+TSDRA*OLD))$ FRML EXO ZSDRLD =SDRLD$ FRML _KJ_D SDRDMP =(KSDRDMP*(TSDR*TIDMP+TSDRA*ODMP)+JSDRDMP)*(1.0-DSDRDMP)+DSDRDMP*ZSDRDMP$ FRML JLED JSDRDMP =SDRDMP-(KSDRDMP*(TSDR*TIDMP+TSDRA*ODMP))$ FRML EXO ZSDRDMP =SDRDMP$ FRML _KJ_D SDRSP =(KSDRSP*(TSDR*TISP+TSDRA*OSP)+JSDRSP)*(1.0-DSDRSP)+DSDRSP*ZSDRSP$ FRML JLED JSDRSP =SDRSP-(KSDRSP*(TSDR*TISP+TSDRA*OSP))$ FRML EXO ZSDRSP =SDRSP$ FRML _KJ_D SDRATP =(KSDRATP*(TSDR*TIATP+TSDRA*(OSEATP+OSDKATP+OBATP))+JSDRATP)*(1.0-DSDRATP)+DSDRATP* ZSDRATP$ FRML JLED JSDRATP =SDRATP-(KSDRATP*(TSDR*TIATP+TSDRA*(OSEATP+OSDKATP+OBATP)))$ FRML EXO ZSDRATP =SDRATP$ FRML _KJ_D SDRP =(KSDRP*(TSDR*BSDR*(TIPPHPP+TIPPHPB)+TSDRA*(OSPL+OSPK+OHPL+OHPK))+JSDRP)*(1.0-DSDRP)+ DSDRP*ZSDRP$ FRML JLED JSDRP =SDRP-(KSDRP*(TSDR*BSDR*(TIPPHPP+TIPPHPB)+TSDRA*(OSPL+OSPK+OHPL+OHPK)))$ FRML EXO ZSDRP =SDRP$ FRML _KJ_D SDRPP =(KSDRPP*(TSDR*BSDR*TIPPHPP+TSDRA*(OSELP+OSDKLP+OBLP))+JSDRPP)*(1.0-DSDRPP)+DSDRPP* ZSDRPP$ FRML JLED JSDRPP =SDRPP-(KSDRPP*(TSDR*BSDR*TIPPHPP+TSDRA*(OSELP+OSDKLP+OBLP)))$ FRML EXO ZSDRPP =SDRPP$ FRML _I SDRPH =SDRP-SDRPP$ FRML _I SDR =SDRP+SDRLD+SDRDMP+SDRSP+SDRATP$ FRML _KJ_D SDP1 =(KSDP*TSDP*(TYPSHK+TPHHKU+TPLDU)+SDPR+JSDP1)*(1.0-DSDP1)+DSDP1*ZSDP1$ FRML JLED JSDP1 =SDP1-(KSDP*TSDP*(TYPSHK+TPHHKU+TPLDU)+SDPR)$ FRML EXO ZSDP1 =SDP1$ FRML _I SD =SDK1+SDA+SDU+SDP1+SDV+SDS+SDR$ FRML _G SAQW1 =TSAQW1*QW1$ FRML _G SAQWY =TAQWY1*(KSDA*YSDA3-(TBHSK+TBHSL)+(TYD+TYMFDP+TYMS+TYMB+TYRKS+TYULY+TYUAK+TYUREV))$ FRML _I SAQW =SAQW1+SAQWY$ FRML _G SAQO =TAQO1*QWO2*(1.-BQO/2.)*0.001$ FRML _G SAQP =TAQP1*QWP1*(1.-BQP1/2.)*0.001$ FRML _GJ_D SAFMA =(TAFMA1*PTTY1*(QW1*(1.-BQ1/2.)+ULDP+UMF+UEF+QS1)*0.001+JSAFMA)*(1.0-DSAFMA)+DSAFMA* ZSAFMA$ FRML JLED JSAFMA =SAFMA-(TAFMA1*PTTY1*(QW1*(1.-BQ1/2.)+ULDP+UMF+UEF+QS1)*0.001)$ FRML EXO ZSAFMA =SAFMA$ FRML _GJ_D SAFME =(TAFME*PTTY1*BSAFME1*(QW1*(1.-BQ1/2.)+ULDP+UMF+QS1)*0.001+JSAFME)*(1.0-DSAFME)+ DSAFME*ZSAFME$ FRML JLED JSAFME =SAFME-(TAFME*PTTY1*BSAFME1*(QW1*(1.-BQ1/2.)+ULDP+UMF+QS1)*0.001)$ FRML EXO ZSAFME =SAFME$ FRML _I SAFM =SAFMA+SAFME$ FRML _I SASO =SAQW+SAQO+SAQP+SAFM+SASR$ FRML _I SA =SAK+SASO$ FRML _I S =SD+SIAF+SA$ 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)$ 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)$ FRML _G TSSMWB =TSYS1*D1WB+TSYS2*D2WB+TSYS3*D3WB+TSYS4*D4WB+TSYS5*D5WB+TSYSP1*DP1WB+TSYSP2*DP2WB+ TSYSP3*DP3WB+TSYSP4*DP4WB+TSYSP5*DP5WB$ 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)$ FRML _G TSSMWM =TSYS1*D1WM+TSYS2*D2WM+TSYS3*D3WM+TSYS4*D4WM+TSYS5*D5WM+TSYSP1*DP1WM+TSYSP2*DP2WM+ TSYSP3*DP3WM+TSYSP4*DP4WM+TSYSP5*DP5WM$ 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)$ FRML _G TSSMWT =TSYS1*D1WT+TSYS2*D2WT+TSYS3*D3WT+TSYS4*D4WT+TSYS5*D5WT+TSYSP1*DP1WT+TSYSP2*DP2WT+ TSYSP3*DP3WT+TSYSP4*DP4WT+TSYSP5*DP5WT$ 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)$ 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)$ FRML _G TPF =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPF(-1)+JDTPF)+DTP*ZTPF$ FRML _G TPN =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPN(-1)+JDTPN)+DTP*ZTPN$ FRML _G TPI =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPI(-1)+JDTPI)+DTP*ZTPI$ FRML _G TPB =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPB(-1)+JDTPB)+DTP*ZTPB$ FRML _G TPH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPH(-1)+JDTPH)+DTP*ZTPH$ FRML _G TPE =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPE(-1)+JDTPE)+DTP*ZTPE$ FRML _G TPG =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPG(-1)+JDTPG)+DTP*ZTPG$ FRML _G TPV =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPV(-1)+JDTPV)+DTP*ZTPV$ FRML _G TPS =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPS(-1)+JDTPS)+DTP*ZTPS$ FRML _G TPKR =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPKR(-1)+JDTPKR)+DTP*ZTPKR$ FRML _G TPIMO1 =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIMO1(-1)+JDTPIMO1)+DTP*ZTPIMO1$ FRML _G TPIMP1 =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIMP1(-1)+JDTPIMP1)+DTP*ZTPIMP1$ FRML _G TPIBH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIBH(-1)+JDTPIBH)+DTP*ZTPIBH$ FRML _G TPIBP1 =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIBP1(-1)+JDTPIBP1)+DTP*ZTPIBP1$ FRML _G TPIBO1 =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIBO1(-1)+JDTPIBO1)+DTP*ZTPIBO1$ FRML _G TPIL =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TPIL(-1)+JDTPIL)+DTP*ZTPIL$ FRML _G TVMA =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMA(-1)+JDTVMA)+DTP*ZTVMA$ FRML _G TVME =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVME(-1)+JDTVME)+DTP*ZTVME$ FRML _G TVMNG =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNG(-1)+JDTVMNG)+DTP*ZTVMNG$ FRML _G TVMNE =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNE(-1)+JDTVMNE)+DTP*ZTVMNE$ FRML _G TVMNF =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNF(-1)+JDTVMNF)+DTP*ZTVMNF$ FRML _G TVMNN =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNN(-1)+JDTVMNN)+DTP*ZTVMNN$ FRML _G TVMNB =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNB(-1)+JDTVMNB)+DTP*ZTVMNB$ FRML _G TVMNM =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNM(-1)+JDTVMNM)+DTP*ZTVMNM$ FRML _G TVMNT =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNT(-1)+JDTVMNT)+DTP*ZTVMNT$ FRML _G TVMNK =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNK(-1)+JDTVMNK)+DTP*ZTVMNK$ FRML _G TVMNQ =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMNQ(-1)+JDTVMNQ)+DTP*ZTVMNQ$ FRML _G TVMB =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMB(-1)+JDTVMB)+DTP*ZTVMB$ FRML _G TVMQH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMQH(-1)+JDTVMQH)+DTP*ZTVMQH$ FRML _G TVMQS =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMQS(-1)+JDTVMQS)+DTP*ZTVMQS$ FRML _G TVMQT =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMQT(-1)+JDTVMQT)+DTP*ZTVMQT$ FRML _G TVMQF =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMQF(-1)+JDTVMQF)+DTP*ZTVMQF$ FRML _G TVMQQ =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMQQ(-1)+JDTVMQQ)+DTP*ZTVMQQ$ FRML _G TVMH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMH(-1)+JDTVMH)+DTP*ZTVMH$ FRML _G TVMO =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVMO(-1)+JDTVMO)+DTP*ZTVMO$ FRML _G TVEA =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEA(-1)+JDTVEA)+DTP*ZTVEA$ FRML _G TVEE =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEE(-1)+JDTVEE)+DTP*ZTVEE$ FRML _G TVENG =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENG(-1)+JDTVENG)+DTP*ZTVENG$ FRML _G TVENE =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENE(-1)+JDTVENE)+DTP*ZTVENE$ FRML _G TVENF =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENF(-1)+JDTVENF)+DTP*ZTVENF$ FRML _G TVENN =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENN(-1)+JDTVENN)+DTP*ZTVENN$ FRML _G TVENB =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENB(-1)+JDTVENB)+DTP*ZTVENB$ FRML _G TVENM =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENM(-1)+JDTVENM)+DTP*ZTVENM$ FRML _G TVENT =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENT(-1)+JDTVENT)+DTP*ZTVENT$ FRML _G TVENK =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENK(-1)+JDTVENK)+DTP*ZTVENK$ FRML _G TVENQ =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVENQ(-1)+JDTVENQ)+DTP*ZTVENQ$ FRML _G TVEB =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEB(-1)+JDTVEB)+DTP*ZTVEB$ FRML _G TVEQH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEQH(-1)+JDTVEQH)+DTP*ZTVEQH$ FRML _G TVEQS =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEQS(-1)+JDTVEQS)+DTP*ZTVEQS$ FRML _G TVEQT =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEQT(-1)+JDTVEQT)+DTP*ZTVEQT$ FRML _G TVEQF =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEQF(-1)+JDTVEQF)+DTP*ZTVEQF$ FRML _G TVEQQ =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEQQ(-1)+JDTVEQQ)+DTP*ZTVEQQ$ FRML _G TVEH =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEH(-1)+JDTVEH)+DTP*ZTVEH$ FRML _G TVEO =(1.-DTP)*((PCPN(-1)/PCPN(-2))*TVEO(-1)+JDTVEO)+DTP*ZTVEO$ 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.-BQ1/2.)*0.001$ FRML _G TQAB =TQABE+((TARN(-2)-TARNE(-2))/((YW1(-2)-TYPRI(-2))*3.))*(1.-DTSDA)$ FRML _KJ_D SIQAB =(TQAB*(YW1-TYPRI)*KSIQAB+JSIQAB)*(1.0-DSIQAB)+DSIQAB*ZSIQAB$ FRML JLED JSIQAB =SIQAB-(TQAB*(YW1-TYPRI)*KSIQAB)$ FRML EXO ZSIQAB =SIQAB$ FRML _GJRD SIQEJ =((0.21044*((KNBP(-2)+KNBH(-2))/PIBH(-2))*(PHGK(-1)+PHGK(-2))/2.*TQEJ)*(1.0+JRSIQEJ))* (1.0-DSIQEJ)+DSIQEJ*ZSIQEJ$ FRML JLED JRSIQEJ =SIQEJ/(0.21044*((KNBP(-2)+KNBH(-2))/PIBH(-2))*(PHGK(-1)+PHGK(-2))/2.*TQEJ)-1.0$ FRML EXO ZSIQEJ =SIQEJ$ FRML _GJ_ SIQEJH =0.8*SIQEJ*KNBH(-2)/(KNBP(-2)+KNBH(-2))+JSIQEJH$ FRML JLED JSIQEJH =SIQEJH-(0.8*SIQEJ*KNBH(-2)/(KNBP(-2)+KNBH(-2)))$ FRML _GJ_D SIQAM =(1.9*(TSIQAMF*YWQF1+TSIQAM*(0.07*YWQQ1+YWH1))*(1.+JRSIQAM)+JSIQAM)*(1.0-DSIQAM)+ DSIQAM*ZSIQAM$ FRML JLED JSIQAM =SIQAM-(1.9*(TSIQAMF*YWQF1+TSIQAM*(0.07*YWQQ1+YWH1))*(1.+JRSIQAM))$ FRML EXO ZSIQAM =SIQAM$ FRML _G SIQLT =0.001*TSIQLT*PTTY1*QLT$ FRML _G SIQAK =0.001*TSIQAK*PTTY1*(QAK+UKAK)$ FRML _I SIQS =SIQSQR+SIQEUR+SIQLT+SIQAK+SIQAA+SIQSH$ FRML _I SIQ =SIQU+SIQAB+SIQEJ+SIQV+SIQAM+SIQR+SIQS$ FRML _I SIQSQ =SIQSQR+SIQEUR$ FRML _I SIQEU =SIQAA+SIQEUR$ FRML _I SI =SIM+SIP+SIG+SIR+SIQ$ FRML _KJ_D SIPUR2 =(-KSIPUR2*(0.006007*FCS+0.031287*(FVEQQ+FVMQQ)+0.00445*(FVEA+FVMA)+0.002297*(FVEQQ+ FVMQQ))+JSIPUR2)*(1.0-DSIPUR2)+DSIPUR2*ZSIPUR2$ FRML JLED JSIPUR2 =SIPUR2-(-KSIPUR2*(0.006007*FCS+0.031287*(FVEQQ+FVMQQ)+0.00445*(FVEA+FVMA)+0.002297*( FVEQQ+FVMQQ)))$ FRML EXO ZSIPUR2 =SIPUR2$ FRML _GJ_D SIPEE =(SIPEEM+TPE0*FE0*PNE0+JSIPEE)*(1.0-DSIPEE)+DSIPEE*ZSIPEE$ FRML JLED JSIPEE =SIPEE-(SIPEEM+TPE0*FE0*PNE0)$ FRML EXO ZSIPEE =SIPEE$ FRML _I SIPSUE =SIPEE+SIPAA+SIPSUER$ FRML _I SIPSU =SIPKTO+SIPE7Y+SIPUR2+SIPSUE$ FRML _I SIPSUO =SIPSU-SIPSUE$ FRML _I SIPAF =SIP-SIPSU$ FRML _I SIPAFO =SIPAF-SIPEU$ 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$ 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$ FRML _I PEV =EV/FEV$ FRML _I PE =E/FE$ 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$ FRML _I PM =M/FM$ FRML _I PMV =MV/FMV$ FRML _I ENVT =E-M$ FRML _GJ_D TEUBY =(TTEUBY*(YI)+JTEUBY)*(1.0-DTEUBY)+DTEUBY*ZTEUBY$ FRML JLED JTEUBY =TEUBY-(TTEUBY*(YI))$ FRML EXO ZTEUBY =TEUBY$ FRML _GJ_D TEUBG =(TTEUBG*(SIG/TG)+JTEUBG)*(1.0-DTEUBG)+DTEUBG*ZTEUBG$ FRML JLED JTEUBG =TEUBG-(TTEUBG*(SIG/TG))$ FRML EXO ZTEUBG =TEUBG$ FRML _GJ_D TEUB =(TEUBY+TEUBG+TEUBR+DEUSIM*SIM+SIPEU+JTEUB)*(1.0-DTEUB)+DTEUB*ZTEUB$ FRML JLED JTEUB =TEUB-(TEUBY+TEUBG+TEUBR+DEUSIM*SIM+SIPEU)$ FRML EXO ZTEUB =TEUB$ FRML _I TEUN =(-SIPSUE-SIQEU)+TEUR-TEUB$ FRML _GJ_D IWBU =(KWFGUD*IWBUD+KWFGDM*IWBDM+JIWBU)*(1.0-DIWBU)+DIWBU*ZIWBU$ FRML JLED JIWBU =IWBU-(KWFGUD*IWBUD+KWFGDM*IWBDM)$ FRML EXO ZIWBU =IWBU$ FRML _I TIEN =-TIN_E$ FRML _GJ_D TAOERFP =(0.001*PTTY1*TTYOEFP*UFPU*(1.+JRTAOERFP)+JTAOERFP)*(1.0-DTAOERFP)+DTAOERFP*ZTAOERFP$ FRML JLED JTAOERFP =TAOERFP-(0.001*PTTY1*TTYOEFP*UFPU*(1.+JRTAOERFP))$ FRML EXO ZTAOERFP =TAOERFP$ FRML _GJ_D TAOERFO =(0.001*PTTY1*TTYOEFO*UFOU*(1.+JRTAOERFO)+JTAOERFO)*(1.0-DTAOERFO)+DTAOERFO*ZTAOERFO$ FRML JLED JTAOERFO =TAOERFO-(0.001*PTTY1*TTYOEFO*UFOU*(1.+JRTAOERFO))$ FRML EXO ZTAOERFO =TAOERFO$ FRML _GJ_D TAOERR =(KTAOERR*0.5*(Y(-1)+TIEN(-1)+TWEN(-1)+Y(-2)+TIEN(-2)+TWEN(-2))+JTAOERR)*(1.0-DTAOERR) +DTAOERR*ZTAOERR$ FRML JLED JTAOERR =TAOERR-(KTAOERR*0.5*(Y(-1)+TIEN(-1)+TWEN(-1)+Y(-2)+TIEN(-2)+TWEN(-2)))$ FRML EXO ZTAOERR =TAOERR$ FRML _I TAOER =TAOERFP+TAOERFO+TAOERR$ FRML _I TAOE =TAOEFO+TAOEGR+TAOER$ 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 _GJ_ KEN =-(WN_E-WG_E_CF)+JKEN$ FRML JLED JKEN =KEN-(-(WN_E-WG_E_CF))$ FRML _KJ_ IWBOS =IWBDM*KIWBOS+JIWBOS$ FRML JLED JIWBOS =IWBOS-(IWBDM*KIWBOS)$ FRML _GJRDF IWBZ =((IWBZ(-1)*IWBOS/IWBOS(-1))*(1.0+JRIWBZ))*(1.0-DIWBZ)+DIWBZ*ZIWBZ$ FRML JLED JRIWBZ =IWBZ/(IWBZ(-1)*IWBOS/IWBOS(-1))-1.0$ FRML EXO ZIWBZ =IWBZ$ FRML _GJ_ IWBOSU =IWBOS+JIWBOSU$ FRML JLED JIWBOSU =IWBOSU-(IWBOS)$ FRML _KJ_ IWMM =IWDM*KIWMM+JIWMM$ FRML JLED JIWMM =IWMM-(IWDM*KIWMM)$ FRML _GJ_DF IWDE =(1.16169*(0.257815*DWRAD*IWBZ+0.686266*DWRAD*IWDI+0.408538*(1.-DWRAD)*IWLO+0.0895399* (1.-DWRAD)*IWMM-0.0338057*DWRAD+0.0003984)+JIWDE)*(1.0-DIWDE)+DIWDE* ZIWDE$ FRML JLED JIWDE =IWDE-(1.16169*(0.257815*DWRAD*IWBZ+0.686266*DWRAD*IWDI+0.408538*(1.-DWRAD)*IWLO+0.0895399 *(1.-DWRAD)*IWMM-0.0338057*DWRAD+0.0003984))$ FRML EXO ZIWDE =IWDE$ 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 )+JIWLO)*(1.0-DIWLO)+DIWLO*ZIWLO$ FRML JLED JIWLO =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 EXO ZIWLO =IWLO$ FRML _K IKU =KIKU*IWLO$ FRML _K IWBDM =KIWBDM*IWDM$ FRML _GJD DTTIIN_E =DTTIIN_E(-1)*RHOTII+JDDTTIIN_E$ FRML JLED JDDTTIIN_E =DTTIIN_E-(DTTIIN_E(-1)*RHOTII)$ FRML _GJD DTTIIN_H =DTTIIN_H(-1)*RHOTII+JDDTTIIN_H$ FRML JLED JDDTTIIN_H =DTTIIN_H-(DTTIIN_H(-1)*RHOTII)$ FRML _GJD DTTIIN_CR =DTTIIN_CR(-1)*RHOTII+JDDTTIIN_CR$ FRML JLED JDDTTIIN_CR =DTTIIN_CR-(DTTIIN_CR(-1)*RHOTII)$ FRML _GJD DTTIIN_OK =DTTIIN_OK(-1)*RHOTII+JDDTTIIN_OK$ FRML JLED JDDTTIIN_OK =DTTIIN_OK-(DTTIIN_OK(-1)*RHOTII)$ FRML _GJD DTTIIN_OO =DTTIIN_OO(-1)*RHOTII+JDDTTIIN_OO$ FRML JLED JDDTTIIN_OO =DTTIIN_OO-(DTTIIN_OO(-1)*RHOTII)$ FRML _GJD DTTIIR_Z_OS =DTTIIR_Z_OS(-1)*RHOTII+JDDTTIIR_Z_OS$ FRML JLED JDDTTIIR_Z_OS =DTTIIR_Z_OS-(DTTIIR_Z_OS(-1)*RHOTII)$ FRML _GJ_D TIIN_E =(IWMM*(WNQ1_E(-1)+WNQ1_E)/2.+BIWB*(WNB_E(-1)-WLM_E_CF(-1))+IUWP*WP_CF_E(-1)+DTTIIN_E+ JTIIN_E)*(1.0-DTIIN_E)+DTIIN_E*ZTIIN_E$ FRML JLED JTIIN_E =TIIN_E-(IWMM*(WNQ1_E(-1)+WNQ1_E)/2.+BIWB*(WNB_E(-1)-WLM_E_CF(-1))+IUWP*WP_CF_E(-1)+ DTTIIN_E)$ FRML EXO ZTIIN_E =TIIN_E$ FRML _GJ_D TIIN_H =(IWMM*(WNQ1_H(-1)+WNQ1_H)/2.+BIWB*(WNB_H(-1)-WLM_H_CF(-1))+IUWP*WCP_CF_H(-1)+ DTTIIN_H+JTIIN_H)*(1.0-DTIIN_H)+DTIIN_H*ZTIIN_H$ FRML JLED JTIIN_H =TIIN_H-(IWMM*(WNQ1_H(-1)+WNQ1_H)/2.+BIWB*(WNB_H(-1)-WLM_H_CF(-1))+IUWP*WCP_CF_H(-1)+ DTTIIN_H)$ FRML EXO ZTIIN_H =TIIN_H$ FRML _GJ_D TIIN_CR =(IWMM*(WNQ1_CR(-1)+WNQ1_CR)/2.+BIWB*(WNB_CR(-1)-WLM_CR_CF(-1))+DTTIIN_CR+JTIIN_CR)*(1.0 -DTIIN_CR)+DTIIN_CR*ZTIIN_CR$ FRML JLED JTIIN_CR =TIIN_CR-(IWMM*(WNQ1_CR(-1)+WNQ1_CR)/2.+BIWB*(WNB_CR(-1)-WLM_CR_CF(-1))+DTTIIN_CR)$ FRML EXO ZTIIN_CR =TIIN_CR$ FRML _GJ_D TIIN_OK =(IWMM*(WNQ1_OK(-1)+WNQ1_OK)/2.+BIWB*(WNB_OK(-1)-WLM_OK_CF(-1))+DTTIIN_OK+JTIIN_OK)*(1.0 -DTIIN_OK)+DTIIN_OK*ZTIIN_OK$ FRML JLED JTIIN_OK =TIIN_OK-(IWMM*(WNQ1_OK(-1)+WNQ1_OK)/2.+BIWB*(WNB_OK(-1)-WLM_OK_CF(-1))+DTTIIN_OK)$ FRML EXO ZTIIN_OK =TIIN_OK$ FRML _GJ_D TIIN_OO =(IWMM*(WNQ1_OO(-1)+WNQ1_OO)/2.+BIWB*WNB_OO(-1)+DTTIIN_OO+JTIIN_OO)*(1.0-DTIIN_OO)+ DTIIN_OO*ZTIIN_OO$ FRML JLED JTIIN_OO =TIIN_OO-(IWMM*(WNQ1_OO(-1)+WNQ1_OO)/2.+BIWB*WNB_OO(-1)+DTTIIN_OO)$ FRML EXO ZTIIN_OO =TIIN_OO$ FRML _GJ_D TISUU =(TISUU(-1)*(1.-BRWBE_OS_Z)+KIWBNU*IWBOS*TFBGE_OS_Z/KTFBGE_OS_Z+JTISUU)*(1.0-DTISUU)+ DTISUU*ZTISUU$ FRML JLED JTISUU =TISUU-(TISUU(-1)*(1.-BRWBE_OS_Z)+KIWBNU*IWBOS*TFBGE_OS_Z/KTFBGE_OS_Z)$ FRML EXO ZTISUU =TISUU$ FRML _GJ_D TISUI =(TISUI(-1)*(1.-BRWBD_OS_Z)+KIWBND*IWBOS*TFBGD_OS_Z/KTFBGD_OS_Z+JTISUI)*(1.0-DTISUI)+ DTISUI*ZTISUI$ FRML JLED JTISUI =TISUI-(TISUI(-1)*(1.-BRWBD_OS_Z)+KIWBND*IWBOS*TFBGD_OS_Z/KTFBGD_OS_Z)$ FRML EXO ZTISUI =TISUI$ FRML _GJ_D TIIR_Z_OS =(IWDI*(WNQ1_OS(-1)+WNQ1_OS)/2.+BIWB*WB_Z_OS(-1)+DTTIIR_Z_OS+JTIIR_Z_OS)*(1.0- DTIIR_Z_OS)+DTIIR_Z_OS*ZTIIR_Z_OS$ FRML JLED JTIIR_Z_OS =TIIR_Z_OS-(IWDI*(WNQ1_OS(-1)+WNQ1_OS)/2.+BIWB*WB_Z_OS(-1)+DTTIIR_Z_OS)$ FRML EXO ZTIIR_Z_OS =TIIR_Z_OS$ FRML _I TIIN_OS =TIIR_Z_OS-TISUI-TISUU$ FRML _GJDD TIIM_CF_X =(TIIM_CF_X(-1)*(1.-BRWBM_CF_X)+(TFLM_H_CF+TFLM_CR_CF+TFLM_OK_CF+TFLM_E_CF+BRWBM_CF_X* WBM_CF_X(-1))*IWBZ*KTFLM_CF_X+JDTIIM_CF_X)*(1.0-DTIIM_CF_X)+ DTIIM_CF_X*ZTIIM_CF_X$ FRML JLED JDTIIM_CF_X =TIIM_CF_X-(TIIM_CF_X(-1)*(1.-BRWBM_CF_X)+(TFLM_H_CF+TFLM_CR_CF+TFLM_OK_CF+TFLM_E_CF+ BRWBM_CF_X*WBM_CF_X(-1))*IWBZ*KTFLM_CF_X)$ FRML EXO ZTIIM_CF_X =TIIM_CF_X$ FRML _I TIIN_CF =-(TIIN_E+TIIN_OS+TIIN_OK+TIIN_OO+TIIN_CR+TIIN_H)$ FRML _D BIWB =(TISUI+TIIM_CF_X)/(WBD_OS_Z(-1)+WBM_CF_X(-1))$ FRML _GJD DTTIFP_CF_H =DTTIFP_CF_H(-1)*RHOTII+JDDTTIFP_CF_H$ FRML JLED JDDTTIFP_CF_H =DTTIFP_CF_H-(DTTIFP_CF_H(-1)*RHOTII)$ FRML _GJ_D TIFP_CF_H =(IUWSD*WSP_D_CF(-1)+IUWSE*WSP_E_CF(-1)+BIWB*WBP_Z_CF(-1)+DTTIFP_CF_H+JTIFP_CF_H)*(1.0 -DTIFP_CF_H)+DTIFP_CF_H*ZTIFP_CF_H$ FRML JLED JTIFP_CF_H =TIFP_CF_H-(IUWSD*WSP_D_CF(-1)+IUWSE*WSP_E_CF(-1)+BIWB*WBP_Z_CF(-1)+DTTIFP_CF_H)$ FRML EXO ZTIFP_CF_H =TIFP_CF_H$ FRML _KJ_D TIFS_CF_H =(KTIFS_CF_H*(TIIN_CF-TIFP_CF_H)+JTIFS_CF_H)*(1.0-DTIFS_CF_H)+DTIFS_CF_H*ZTIFS_CF_H$ FRML JLED JTIFS_CF_H =TIFS_CF_H-(KTIFS_CF_H*(TIIN_CF-TIFP_CF_H))$ FRML EXO ZTIFS_CF_H =TIFS_CF_H$ FRML _GJ_D TIU_CR_Z =(WS_CR_Z(-1)*IUWSD+JTIU_CR_Z)*(1.0-DTIU_CR_Z)+DTIU_CR_Z*ZTIU_CR_Z$ FRML JLED JTIU_CR_Z =TIU_CR_Z-(WS_CR_Z(-1)*IUWSD)$ FRML EXO ZTIU_CR_Z =TIU_CR_Z$ FRML _GJ_D TIU_CF_Z =(WS_CF_Z(-1)*IUWSD+JTIU_CF_Z)*(1.0-DTIU_CF_Z)+DTIU_CF_Z*ZTIU_CF_Z$ FRML JLED JTIU_CF_Z =TIU_CF_Z-(WS_CF_Z(-1)*IUWSD)$ FRML EXO ZTIU_CF_Z =TIU_CF_Z$ FRML _GJ_D TIU_E_Z =(WS_E_Z(-1)*IUWSE+JTIU_E_Z)*(1.0-DTIU_E_Z)+DTIU_E_Z*ZTIU_E_Z$ FRML JLED JTIU_E_Z =TIU_E_Z-(WS_E_Z(-1)*IUWSE)$ FRML EXO ZTIU_E_Z =TIU_E_Z$ FRML _GJ_D TIU_Z_E =(IUWSD*WS_Z_E(-1)+JTIU_Z_E)*(1.0-DTIU_Z_E)+DTIU_Z_E*ZTIU_Z_E$ FRML JLED JTIU_Z_E =TIU_Z_E-(IUWSD*WS_Z_E(-1))$ FRML EXO ZTIU_Z_E =TIU_Z_E$ FRML _GJ_D TIU_Z_CR =(IUWSD*WS_D_CR(-1)+IUWSE*WS_E_CR(-1)+JTIU_Z_CR)*(1.0-DTIU_Z_CR)+DTIU_Z_CR*ZTIU_Z_CR$ FRML JLED JTIU_Z_CR =TIU_Z_CR-(IUWSD*WS_D_CR(-1)+IUWSE*WS_E_CR(-1))$ FRML EXO ZTIU_Z_CR =TIU_Z_CR$ FRML _GJ_D TIU_Z_H =(IUWSD*WS_D_H(-1)+IUWSE*WS_E_H(-1)+JTIU_Z_H)*(1.0-DTIU_Z_H)+DTIU_Z_H*ZTIU_Z_H$ FRML JLED JTIU_Z_H =TIU_Z_H-(IUWSD*WS_D_H(-1)+IUWSE*WS_E_H(-1))$ FRML EXO ZTIU_Z_H =TIU_Z_H$ FRML _GJ_D TIU_Z_OO =(IUWSD*WS_X_OO(-1)+JTIU_Z_OO)*(1.0-DTIU_Z_OO)+DTIU_Z_OO*ZTIU_Z_OO$ FRML JLED JTIU_Z_OO =TIU_Z_OO-(IUWSD*WS_X_OO(-1))$ FRML EXO ZTIU_Z_OO =TIU_Z_OO$ FRML _KJ_D TIU_Z_OS =((TIOV-TIKOV)*KTIU_Z_OS+JTIU_Z_OS)*(1.0-DTIU_Z_OS)+DTIU_Z_OS*ZTIU_Z_OS$ FRML JLED JTIU_Z_OS =TIU_Z_OS-((TIOV-TIKOV)*KTIU_Z_OS)$ FRML EXO ZTIU_Z_OS =TIU_Z_OS$ FRML _KJ_D TIU_Z_OK =(TIKOV*KTIU_Z_OK+JTIU_Z_OK)*(1.0-DTIU_Z_OK)+DTIU_Z_OK*ZTIU_Z_OK$ FRML JLED JTIU_Z_OK =TIU_Z_OK-(TIKOV*KTIU_Z_OK)$ FRML EXO ZTIU_Z_OK =TIU_Z_OK$ FRML _I TIU_Z_CF =TIU_CR_Z+TIU_CF_Z+TIU_E_Z-TIU_Z_H-TIU_Z_CR-TIU_Z_E-TIU_Z_OO-TIU_Z_OS-TIU_Z_OK$ FRML _D IUWP =TIFP_CF_H/WP_CF_H(-1)$ FRML _I TIN_H =TIIN_H+TIFP_CF_H+TIFS_CF_H+TIU_Z_H$ FRML _I TIN_CR =TIIN_CR+TIU_Z_CR-TIU_CR_Z-TIOR$ FRML _I TIN_CF =TIIN_CF-TIFP_CF_H-TIFS_CF_H+TIU_Z_CF-TIU_CF_Z$ FRML _I TIN_OS =TIIN_OS+(TIOR-TIOKR)+TIU_Z_OS$ FRML _I TIN_OK =TIIN_OK+TIOKR+TIU_Z_OK$ FRML _I TIN_OO =TIIN_OO+TIU_Z_OO$ FRML _I TIN_E =TIIN_E+TIU_Z_E-TIU_E_Z$ FRML _I TIKI =TIN_OK+TIKU-TIKOV-TIOKR$ FRML _GJ_D TIFOU =(0.+JTIFOU)*(1.0-DTIFOU)+DTIFOU*ZTIFOU$ FRML JLED JTIFOU =TIFOU-(0.)$ FRML EXO ZTIFOU =TIFOU$ FRML _I TIFOI =TIN_OO+TIFOU$ FRML _I TIOII =TIIR_Z_OS+TIU_Z_OS-(TIOV-TIKOV-TIOOV)+TIKI+TIFOI$ FRML _KJ_D TIORE =(D4703*KTIORE*TTIORE*PXE(-1)*FXE(-1)+(1.-D4703)*KTIORE*TTIORE*(YRE1-IVSK)+JTIORE)*(1.0 -DTIORE)+DTIORE*ZTIORE$ FRML JLED JTIORE =TIORE-(D4703*KTIORE*TTIORE*PXE(-1)*FXE(-1)+(1.-D4703)*KTIORE*TTIORE*(YRE1-IVSK))$ FRML EXO ZTIORE =TIORE$ FRML _D TIOR =TIORE+TIORR$ 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 _GJDD TAPHN =(TAPHN(-1)+((TAOP-TAPO+0.5*(TAEP-TAPE))-(TAOP(-1)-TAPO(-1)+0.5*(TAEP(-1)-TAPE(-1))))+ JDTAPHN)*(1.0-DTAPHN)+DTAPHN*ZTAPHN$ FRML JLED JDTAPHN =TAPHN-(TAPHN(-1)+((TAOP-TAPO+0.5*(TAEP-TAPE))-(TAOP(-1)-TAPO(-1)+0.5*(TAEP(-1)-TAPE(-1) ))))$ FRML EXO ZTAPHN =TAPHN$ FRML _G TAPHU =(1.-D4787)*(TAPO+0.5*TAPE+TAPHR)$ FRML _G TFFPI =TBHSP-TIHSP-TPATPI+SDRPSL+SDRPSK+SDRATP+KTPHI*(TPHHLI+TPHHKI)$ FRML _G TFFPU =TYPSHP-TPATPU+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 TFOINY =TFOI-IVO1+(XO11-CO+COIM)$ FRML _I TFOU =CO+IO11+ILO1+TKOJR-SISUO+TY+TIOU+TEUBY+TEUBR+TEUBG+TAOE+TAOP+TKOE+TKOPS+TKOPH$ FRML _I TFOUNY =TFOU+YWO11+VO11+SIQO*KSIQO1-CO+COIM$ 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-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+TIN_H-(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$ 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+TFFONR1-TIFOU)$ FRML _I YDK =(1.-D4787)*(IVOK1+SIAFOK+SISUOKK+TIKI-TIKU+TIKOV+TIOKR+SDKK+TYPRIK-TYKK+TAEOK+TAPOK- TAOKP+TAOSK-TAKOS)$ FRML _GJD SAKK =SAKK(-1)+JDSAKK$ FRML JLED JDSAKK =SAKK-(SAKK(-1))$ FRML _G TFKN =(1.-DTFKN)*(YDK-COK+SAKK+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+TYMFDP+TYPEF+TYPOV+TYPLG)$ FRML _I TASOON =(1.-D4787)*((TYD+TYMFDP+TYPEF+TYPOV+TYPLG)*KTASOO-0.8*(SAFMA+SAFME)*KTAOOS)$ FRML _KJ_D SIAFOK =(KSIAFOK*SIQEJ+JSIAFOK)*(1.0-DSIAFOK)+DSIAFOK*ZSIAFOK$ FRML JLED JSIAFOK =SIAFOK-(KSIAFOK*SIQEJ)$ FRML EXO ZSIAFOK =SIAFOK$ FRML _KJ_D SISUOKK =(KSISUOKK*(SIQAK+0.17*(SIQS-SIQAK-SIQAA-SIQEUR)+0.18*(SIPSU-SIPSUE))+JSISUOKK)*(1.0- DSISUOKK)+DSISUOKK*ZSISUOKK$ FRML JLED JSISUOKK =SISUOKK-(KSISUOKK*(SIQAK+0.17*(SIQS-SIQAK-SIQAA-SIQEUR)+0.18*(SIPSU-SIPSUE)))$ FRML EXO ZSISUOKK =SISUOKK$ FRML _KJ_D SDKK =(KSDKK*(0.69*SDK1+0.33*(SDP1-SDPR)+0.25*SDPR+0.11*SDS)+JSDKK)*(1.0-DSDKK)+DSDKK* ZSDKK$ FRML JLED JSDKK =SDKK-(KSDKK*(0.69*SDK1+0.33*(SDP1-SDPR)+0.25*SDPR+0.11*SDS))$ FRML EXO ZSDKK =SDKK$ FRML _KJ_D TYKK =(KTYKK*(TYPFP+TYPFO+0.24*TYPR+TYMS+0.04*TYMF+0.99*TYRK+0.55*(TYRH+TYRR))+JTYKK)*(1.0- DTYKK)+DTYKK*ZTYKK$ FRML JLED JTYKK =TYKK-(KTYKK*(TYPFP+TYPFO+0.24*TYPR+TYMS+0.04*TYMF+0.99*TYRK+0.55*(TYRH+TYRR)))$ FRML EXO ZTYKK =TYKK$ FRML _KJ_D IVOK1 =(KIVOK1*IVO1+JIVOK1)*(1.0-DIVOK1)+DIVOK1*ZIVOK1$ FRML JLED JIVOK1 =IVOK1-(KIVOK1*IVO1)$ FRML EXO ZIVOK1 =IVOK1$ FRML _KJ_D COK =(KCOK*CO+JCOK)*(1.0-DCOK)+DCOK*ZCOK$ FRML JLED JCOK =COK-(KCOK*CO)$ FRML EXO ZCOK =COK$ FRML _KJ_D IOK1 =(KIOK11*IO11+JIOK1)*(1.0-DIOK1)+DIOK1*ZIOK1$ FRML JLED JIOK1 =IOK1-(KIOK11*IO11)$ FRML EXO ZIOK1 =IOK1$ FRML _I YDSS =(1.-D4787)*(YDO-YDOO-YDK)$ FRML _I TFSN =TFON-TFFON-TFKN$ FRML _GJDD WZZOMUXA =((1.-D4794)*(WZZOMUXA(-1)-TFSN-TFKN+(((1.-BWBS_Z_OS)*NWB_Z_OS)-((1.-BWBS_Z_OS(-1))* NWB_Z_OS(-1))))+JDWZZOMUXA)*(1.0-DWZZOMUXA)+DWZZOMUXA*ZWZZOMUXA$ FRML JLED JDWZZOMUXA =WZZOMUXA-((1.-D4794)*(WZZOMUXA(-1)-TFSN-TFKN+(((1.-BWBS_Z_OS)*NWB_Z_OS)-((1.- BWBS_Z_OS(-1))*NWB_Z_OS(-1)))))$ FRML EXO ZWZZOMUXA =WZZOMUXA$ FRML _D WZZOMUXG =WZZOMUXA-WLG_Z_OS$ FRML _I WON =-WN_O$ FRML _I FY =(FCP*PCP(-1)+FCO*PCO(-1)+FIM*PIM(-1)+FIB*PIB(-1)+FIT*PIT(-1)+FIL*PIL(-1)-FM*PM(-1)+ FE*PE(-1))/PY(-1)$ FRML _I Y =CP+CO+I+E-M$ FRML _I PY =(Y)/FY$ FRML _I YF =Y-SI+SIQ$ FRML _I PYF =(YFA+YFE+YFNG+YFNE+YFNF+YFNN+YFNB+YFNM+YFNT+YFNK+YFNQ+YFB+YFQH+YFQS+YFQT+YFQF+YFQQ+ YFH+YFO)/FYF$ FRML _DJ_ YI =Y+(TWEN+TIEN)+(-SISUE-SIAFE)+JYI$ FRML JLED JYI =YI-(Y+(TWEN+TIEN)+(-SISUE-SIAFE))$ FRML _I FYTR =(FY*PY(-1)+FM*PM(-1)-FE*PE(-1))/PYTR(-1)$ FRML _I YTR =Y+M-E$ FRML _I PYTR =YTR/FYTR$ FRML _GJ_ SIQAL =0.017*SIQU+0.014*SIQAB+0.000*SIQAM+0.008*SIQAK+0.013*SIQLT+JSIQAL$ FRML JLED JSIQAL =SIQAL-(0.017*SIQU+0.014*SIQAB+0.000*SIQAM+0.008*SIQAK+0.013*SIQLT)$ FRML _GJ_ SIQEL =0.000*SIQU+0.001*SIQAB+0.000*SIQAM+0.000*SIQAK+0.000*SIQLT+JSIQEL$ FRML JLED JSIQEL =SIQEL-(0.000*SIQU+0.001*SIQAB+0.000*SIQAM+0.000*SIQAK+0.000*SIQLT)$ FRML _GJ_ SIQNGL =0.000*SIQU+0.001*SIQAB+0.000*SIQAM+0.000*SIQAK+0.000*SIQLT+JSIQNGL$ FRML JLED JSIQNGL =SIQNGL-(0.000*SIQU+0.001*SIQAB+0.000*SIQAM+0.000*SIQAK+0.000*SIQLT)$ FRML _GJ_ SIQNEL =0.006*SIQU+0.008*SIQAB+0.000*SIQAM+0.002*SIQAK+0.004*SIQLT+JSIQNEL$ FRML JLED JSIQNEL =SIQNEL-(0.006*SIQU+0.008*SIQAB+0.000*SIQAM+0.002*SIQAK+0.004*SIQLT)$ FRML _GJ_ SIQNFL =0.030*SIQU+0.031*SIQAB+0.000*SIQAM+0.011*SIQAK+0.020*SIQLT+JSIQNFL$ FRML JLED JSIQNFL =SIQNFL-(0.030*SIQU+0.031*SIQAB+0.000*SIQAM+0.011*SIQAK+0.020*SIQLT)$ FRML _GJ_ SIQNNL =0.003*SIQU+0.004*SIQAB+0.000*SIQAM+0.001*SIQAK+0.002*SIQLT+JSIQNNL$ FRML JLED JSIQNNL =SIQNNL-(0.003*SIQU+0.004*SIQAB+0.000*SIQAM+0.001*SIQAK+0.002*SIQLT)$ FRML _GJ_ SIQNBL =0.008*SIQU+0.013*SIQAB+0.000*SIQAM+0.005*SIQAK+0.009*SIQLT+JSIQNBL$ FRML JLED JSIQNBL =SIQNBL-(0.008*SIQU+0.013*SIQAB+0.000*SIQAM+0.005*SIQAK+0.009*SIQLT)$ FRML _GJ_ SIQNML =0.069*SIQU+0.072*SIQAB+0.000*SIQAM+0.027*SIQAK+0.047*SIQLT+JSIQNML$ FRML JLED JSIQNML =SIQNML-(0.069*SIQU+0.072*SIQAB+0.000*SIQAM+0.027*SIQAK+0.047*SIQLT)$ FRML _GJ_ SIQNTL =0.010*SIQU+0.010*SIQAB+0.000*SIQAM+0.003*SIQAK+0.005*SIQLT+JSIQNTL$ FRML JLED JSIQNTL =SIQNTL-(0.010*SIQU+0.010*SIQAB+0.000*SIQAM+0.003*SIQAK+0.005*SIQLT)$ FRML _GJ_ SIQNKL =0.022*SIQU+0.027*SIQAB+0.000*SIQAM+0.009*SIQAK+0.015*SIQLT+JSIQNKL$ FRML JLED JSIQNKL =SIQNKL-(0.022*SIQU+0.027*SIQAB+0.000*SIQAM+0.009*SIQAK+0.015*SIQLT)$ FRML _GJ_ SIQNQL =0.041*SIQU+0.043*SIQAB+0.000*SIQAM+0.015*SIQAK+0.026*SIQLT+JSIQNQL$ FRML JLED JSIQNQL =SIQNQL-(0.041*SIQU+0.043*SIQAB+0.000*SIQAM+0.015*SIQAK+0.026*SIQLT)$ FRML _GJ_ SIQBL =0.053*SIQU+0.061*SIQAB+0.000*SIQAM+0.024*SIQAK+0.041*SIQLT+JSIQBL$ FRML JLED JSIQBL =SIQBL-(0.053*SIQU+0.061*SIQAB+0.000*SIQAM+0.024*SIQAK+0.041*SIQLT)$ FRML _GJ_ SIQQHL =0.090*SIQU+0.132*SIQAB+0.000*SIQAM+0.062*SIQAK+0.107*SIQLT+JSIQQHL$ FRML JLED JSIQQHL =SIQQHL-(0.090*SIQU+0.132*SIQAB+0.000*SIQAM+0.062*SIQAK+0.107*SIQLT)$ FRML _GJ_ SIQQSL =0.006*SIQU+0.009*SIQAB+0.000*SIQAM+0.002*SIQAK+0.004*SIQLT+JSIQQSL$ FRML JLED JSIQQSL =SIQQSL-(0.006*SIQU+0.009*SIQAB+0.000*SIQAM+0.002*SIQAK+0.004*SIQLT)$ FRML _GJ_ SIQQTL =0.056*SIQU+0.067*SIQAB+0.000*SIQAM+0.026*SIQAK+0.045*SIQLT+JSIQQTL$ FRML JLED JSIQQTL =SIQQTL-(0.056*SIQU+0.067*SIQAB+0.000*SIQAM+0.026*SIQAK+0.045*SIQLT)$ FRML _GJ_ SIQQFL =0.040*SIQU+0.047*SIQAB+0.823*SIQAM+0.013*SIQAK+0.022*SIQLT+JSIQQFL$ FRML JLED JSIQQFL =SIQQFL-(0.040*SIQU+0.047*SIQAB+0.823*SIQAM+0.013*SIQAK+0.022*SIQLT)$ FRML _GJ_ SIQHL =0.004*SIQU+0.006*SIQAB+0.034*SIQAM+0.003*SIQAK+0.005*SIQLT+JSIQHL$ FRML JLED JSIQHL =SIQHL-(0.004*SIQU+0.006*SIQAB+0.034*SIQAM+0.003*SIQAK+0.005*SIQLT)$ FRML _GJ_ SIQOL =0.433*SIQU+0.299*SIQAB+0.000*SIQAM+0.713*SIQAK+0.502*SIQLT+JSIQOL$ FRML JLED JSIQOL =SIQOL-(0.433*SIQU+0.299*SIQAB+0.000*SIQAM+0.713*SIQAK+0.502*SIQLT)$ FRML _G SIQQQL =0.112*SIQU+0.155*SIQAB+0.143*SIQAM+0.076*SIQAK+0.133*SIQLT-JSIQAL-JSIQEL-JSIQNGL- JSIQNEL-JSIQNFL-JSIQNNL-JSIQNBL-JSIQNML-JSIQNTL-JSIQNKL-JSIQNQL- JSIQBL-JSIQQHL-JSIQQSL-JSIQQTL-JSIQQFL-JSIQHL-JSIQOL$ FRML _GJ_ SIQA =SIQAL+(0.094/(1.-0.565))*(SIQEJ-SIQEJH)+0.070*SIQV+0.020*SIQR+(0.113/(1.-0.262))* SIQSQ+SIQAA+JSIQA$ FRML JLED JSIQA =SIQA-(SIQAL+(0.094/(1.-0.565))*(SIQEJ-SIQEJH)+0.070*SIQV+0.020*SIQR+(0.113/(1.-0.262) )*SIQSQ+SIQAA)$ FRML _GJ_ SIQE =SIQEL+(0.000/(1.-0.565))*(SIQEJ-SIQEJH)+0.000*SIQV+0.006*SIQR+(0.000/(1.-0.262))* SIQSQ+JSIQE$ FRML JLED JSIQE =SIQE-(SIQEL+(0.000/(1.-0.565))*(SIQEJ-SIQEJH)+0.000*SIQV+0.006*SIQR+(0.000/(1.-0.262) )*SIQSQ)$ FRML _GJ_ SIQNG =SIQNGL+(0.000/(1.-0.565))*(SIQEJ-SIQEJH)+0.000*SIQV+0.015*SIQR+(0.003/(1.-0.262))* SIQSQ+JSIQNG$ FRML JLED JSIQNG =SIQNG-(SIQNGL+(0.000/(1.-0.565))*(SIQEJ-SIQEJH)+0.000*SIQV+0.015*SIQR+(0.003/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNE =SIQNEL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.003*SIQV+0.018*SIQR+(0.004/(1.-0.262))* SIQSQ+JSIQNE$ FRML JLED JSIQNE =SIQNE-(SIQNEL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.003*SIQV+0.018*SIQR+(0.004/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNF =SIQNFL+(0.008/(1.-0.565))*(SIQEJ-SIQEJH)+0.032*SIQV+0.058*SIQR+(0.042/(1.-0.262))* SIQSQ+JSIQNF$ FRML JLED JSIQNF =SIQNF-(SIQNFL+(0.008/(1.-0.565))*(SIQEJ-SIQEJH)+0.032*SIQV+0.058*SIQR+(0.042/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNN =SIQNNL+(0.003/(1.-0.565))*(SIQEJ-SIQEJH)+0.005*SIQV+0.008*SIQR+(0.004/(1.-0.262))* SIQSQ+JSIQNN$ FRML JLED JSIQNN =SIQNN-(SIQNNL+(0.003/(1.-0.565))*(SIQEJ-SIQEJH)+0.005*SIQV+0.008*SIQR+(0.004/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNB =SIQNBL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.004*SIQV+0.009*SIQR+(0.009/(1.-0.262))* SIQSQ+JSIQNB$ FRML JLED JSIQNB =SIQNB-(SIQNBL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.004*SIQV+0.009*SIQR+(0.009/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNM =SIQNML+(0.018/(1.-0.565))*(SIQEJ-SIQEJH)+0.020*SIQV+0.058*SIQR+(0.050/(1.-0.262))* SIQSQ+JSIQNM$ FRML JLED JSIQNM =SIQNM-(SIQNML+(0.018/(1.-0.565))*(SIQEJ-SIQEJH)+0.020*SIQV+0.058*SIQR+(0.050/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNT =SIQNTL+(0.003/(1.-0.565))*(SIQEJ-SIQEJH)+0.001*SIQV+0.011*SIQR+(0.008/(1.-0.262))* SIQSQ+JSIQNT$ FRML JLED JSIQNT =SIQNT-(SIQNTL+(0.003/(1.-0.565))*(SIQEJ-SIQEJH)+0.001*SIQV+0.011*SIQR+(0.008/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNK =SIQNKL+(0.009/(1.-0.565))*(SIQEJ-SIQEJH)+0.007*SIQV+0.046*SIQR+(0.017/(1.-0.262))* SIQSQ+JSIQNK$ FRML JLED JSIQNK =SIQNK-(SIQNKL+(0.009/(1.-0.565))*(SIQEJ-SIQEJH)+0.007*SIQV+0.046*SIQR+(0.017/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQNQ =SIQNQL+(0.011/(1.-0.565))*(SIQEJ-SIQEJH)+0.013*SIQV+0.041*SIQR+(0.034/(1.-0.262))* SIQSQ+JSIQNQ$ FRML JLED JSIQNQ =SIQNQ-(SIQNQL+(0.011/(1.-0.565))*(SIQEJ-SIQEJH)+0.013*SIQV+0.041*SIQR+(0.034/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQB =SIQBL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.149*SIQV+0.022*SIQR+(0.041/(1.-0.262))* SIQSQ+JSIQB$ FRML JLED JSIQB =SIQB-(SIQBL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.149*SIQV+0.022*SIQR+(0.041/(1.-0.262) )*SIQSQ)$ FRML _GJ_ SIQQH =SIQQHL+(0.056/(1.-0.565))*(SIQEJ-SIQEJH)+0.208*SIQV+0.508*SIQR+(0.112/(1.-0.262))* SIQSQ+JSIQQH$ FRML JLED JSIQQH =SIQQH-(SIQQHL+(0.056/(1.-0.565))*(SIQEJ-SIQEJH)+0.208*SIQV+0.508*SIQR+(0.112/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQQS =SIQQSL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.002*SIQV+0.023*SIQR+(0.009/(1.-0.262))* SIQSQ+JSIQQS$ FRML JLED JSIQQS =SIQQS-(SIQQSL+(0.006/(1.-0.565))*(SIQEJ-SIQEJH)+0.002*SIQV+0.023*SIQR+(0.009/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQQT =SIQQTL+(0.017/(1.-0.565))*(SIQEJ-SIQEJH)+0.392*SIQV+0.027*SIQR+(0.124/(1.-0.262))* SIQSQ+JSIQQT$ FRML JLED JSIQQT =SIQQT-(SIQQTL+(0.017/(1.-0.565))*(SIQEJ-SIQEJH)+0.392*SIQV+0.027*SIQR+(0.124/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQQF =SIQQFL+(0.016/(1.-0.565))*(SIQEJ-SIQEJH)+0.002*SIQV+0.006*SIQR+(0.018/(1.-0.262))* SIQSQ+JSIQQF$ FRML JLED JSIQQF =SIQQF-(SIQQFL+(0.016/(1.-0.565))*(SIQEJ-SIQEJH)+0.002*SIQV+0.006*SIQR+(0.018/(1.-0.262 ))*SIQSQ)$ FRML _GJ_ SIQH =SIQHL+SIQEJH+0.001*SIQV+0.007*SIQR+SIQSH+JSIQH$ FRML JLED JSIQH =SIQH-(SIQHL+SIQEJH+0.001*SIQV+0.007*SIQR+SIQSH)$ FRML _GJ_ SIQO =SIQOL+(0.040/(1.-0.565))*(SIQEJ-SIQEJH)+0.018*SIQV+0.000*SIQR+(0.002/(1.-0.262))* SIQSQ+JSIQO$ FRML JLED JSIQO =SIQO-(SIQOL+(0.040/(1.-0.565))*(SIQEJ-SIQEJH)+0.018*SIQV+0.000*SIQR+(0.002/(1.-0.262) )*SIQSQ)$ FRML _G SIQQQ =SIQQQL+(0.136/(1.-0.565))*(SIQEJ-SIQEJH)+0.073*SIQV+0.117*SIQR+(0.148/(1.-0.262))* SIQSQ-JSIQA-JSIQE-JSIQNG-JSIQNE-JSIQNF-JSIQNN-JSIQNB-JSIQNM-JSIQNT- JSIQNK-JSIQNQ-JSIQB-JSIQQH-JSIQQS-JSIQQT-JSIQQF-JSIQH-JSIQO$ 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 _I YFN =YFNG+YFNE+YFNF+YFNN+YFNB+YFNM+YFNT+YFNK+YFNQ$ FRML _I PYFA =YFA/FYFA$ FRML _I PYFE =YFE/FYFE$ FRML _I PYFNG =YFNG/FYFNG$ FRML _I PYFH =YFH/FYFH$ 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$ FRML _I PYFN =(YFNG+YFNE+YFNF+YFNN+YFNB+YFNM+YFNT+YFNK+YFNQ)/FYFN$ 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-IVO1-YRP$ 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+YFO)$ FRML _KJRD KN1 =((KKN*((KNMA+KNBA)+(KNME+KNBE)+(KNMNE+KNBNE)+(KNMNG+KNBNG)+(KNMNN+KNBNN)+(KNMNF+ KNBNF)+(KNMNB+KNBNB)+(KNMNM+KNBNM)+(KNMNT+KNBNT)+(KNMNK+KNBNK)+( KNMNQ+KNBNQ)+(KNMB+KNBB)+(KNMQH+KNBQH)+(KNMQS+KNBQS)+(KNMQT+KNBQT)+( KNMQF+KNBQF)+(KNMQQ+KNBQQ)+(KNMH+KNBH)+(KNMO+KNBO)))*(1.0+JRKN1))*(1.0 -DKN1)+DKN1*ZKN1$ FRML JLED JRKN1 =KN1/(KKN*((KNMA+KNBA)+(KNME+KNBE)+(KNMNE+KNBNE)+(KNMNG+KNBNG)+(KNMNN+KNBNN)+(KNMNF+ KNBNF)+(KNMNB+KNBNB)+(KNMNM+KNBNM)+(KNMNT+KNBNT)+(KNMNK+KNBNK)+( KNMNQ+KNBNQ)+(KNMB+KNBB)+(KNMQH+KNBQH)+(KNMQS+KNBQS)+(KNMQT+KNBQT)+( KNMQF+KNBQF)+(KNMQQ+KNBQQ)+(KNMH+KNBH)+(KNMO+KNBO)))-1.0$ FRML EXO ZKN1 =KN1$ FRML _KJRD KNH =((KKNH*(BQSA1*(KNMA+KNBA)+BQSE1*(KNME+KNBE)+BQSNE1*(KNMNE+KNBNE)+BQSNG1*(KNMNG+KNBNG) +BQSNN1*(KNMNN+KNBNN)+BQSNF1*(KNMNF+KNBNF)+BQSNB1*(KNMNB+KNBNB)+ BQSNM1*(KNMNM+KNBNM)+BQSNT1*(KNMNT+KNBNT)+BQSNK1*(KNMNK+KNBNK)+ BQSNQ1*(KNMNQ+KNBNQ)+BQSB1*(KNMB+KNBB)+BQSQH1*(KNMQH+KNBQH)+BQSQS1*( KNMQS+KNBQS)+BQSQT1*(KNMQT+KNBQT)+BQSQQ1*(KNMQQ+KNBQQ)+0.82*(KNMH+ KNBH)))*(1.0+JRKNH))*(1.0-DKNH)+DKNH*ZKNH$ FRML JLED JRKNH =KNH/(KKNH*(BQSA1*(KNMA+KNBA)+BQSE1*(KNME+KNBE)+BQSNE1*(KNMNE+KNBNE)+BQSNG1*(KNMNG+ KNBNG)+BQSNN1*(KNMNN+KNBNN)+BQSNF1*(KNMNF+KNBNF)+BQSNB1*(KNMNB+KNBNB) +BQSNM1*(KNMNM+KNBNM)+BQSNT1*(KNMNT+KNBNT)+BQSNK1*(KNMNK+KNBNK)+ BQSNQ1*(KNMNQ+KNBNQ)+BQSB1*(KNMB+KNBB)+BQSQH1*(KNMQH+KNBQH)+BQSQS1*( KNMQS+KNBQS)+BQSQT1*(KNMQT+KNBQT)+BQSQQ1*(KNMQQ+KNBQQ)+0.82*(KNMH+ KNBH)))-1.0$ FRML EXO ZKNH =KNH$ FRML _KJRD KNO1 =((KKNO1*(KNMO+KNBO))*(1.0+JRKNO1))*(1.0-DKNO1)+DKNO1*ZKNO1$ FRML JLED JRKNO1 =KNO1/(KKNO1*(KNMO+KNBO))-1.0$ FRML EXO ZKNO1 =KNO1$ FRML _KJRD KNCF =((KKNCF*(KNMQF+KNBQF))*(1.0+JRKNCF))*(1.0-DKNCF)+DKNCF*ZKNCF$ FRML JLED JRKNCF =KNCF/(KKNCF*(KNMQF+KNBQF))-1.0$ FRML EXO ZKNCF =KNCF$ FRML _I___ KNCR =KN1-KNH-KNCF-KNO1$ FRML _GJ_ TFN_H =TFPHN1+JTFN_H$ FRML JLED JTFN_H =TFN_H-(TFPHN1)$ FRML _GJ_ TFN_E =-TFEN+JTFN_E$ FRML JLED JTFN_E =TFN_E-(-TFEN)$ FRML _GJ_ TFN_OK =TFKN+JTFN_OK$ FRML JLED JTFN_OK =TFN_OK-(TFKN)$ FRML _GJ_ TFN_OO =TFFON+JTFN_OO$ FRML JLED JTFN_OO =TFN_OO-(TFFON)$ FRML _GJ_ TFN_OS =TFSN+JTFN_OS$ FRML JLED JTFN_OS =TFN_OS-(TFSN)$ FRML _GJ_ TFN_CF =TFN_CF(-1)+((TIN_CF)-(TIN_CF(-1)))+JTFN_CF$ FRML JLED JTFN_CF =TFN_CF-(TFN_CF(-1)+((TIN_CF)-(TIN_CF(-1))))$ FRML _GJ_ TFN_CR =TFEN-TFON-TFPHN1-TFN_CF+JTFN_CR$ FRML JLED JTFN_CR =TFN_CR-(TFEN-TFON-TFPHN1-TFN_CF)$ FRML _GJ_D TFCP_CF_H =((1.-BWPE)*TFCP_CF_X+JTFCP_CF_H)*(1.0-DTFCP_CF_H)+DTFCP_CF_H*ZTFCP_CF_H$ FRML JLED JTFCP_CF_H =TFCP_CF_H-((1.-BWPE)*TFCP_CF_X)$ FRML EXO ZTFCP_CF_H =TFCP_CF_H$ FRML _GJ_D TFLM_H_CF =(0.5*BWLM_H*((PHK*KNBH/PIBH)-(PHK(-1)*KNBH(-1)/PIBH(-1)))+0.7*(BWLM_H*PHK(-1)*KNBH(-1) /PIBH(-1)-WLM_H_CF(-1))+JTFLM_H_CF)*(1.0-DTFLM_H_CF)+DTFLM_H_CF* ZTFLM_H_CF$ FRML JLED JTFLM_H_CF =TFLM_H_CF-(0.5*BWLM_H*((PHK*KNBH/PIBH)-(PHK(-1)*KNBH(-1)/PIBH(-1)))+0.7*(BWLM_H*PHK(-1) *KNBH(-1)/PIBH(-1)-WLM_H_CF(-1)))$ FRML EXO ZTFLM_H_CF =TFLM_H_CF$ FRML _GJ_D TFP_CF_H =((1.-BWPE)*TFP_CF_X+JTFP_CF_H)*(1.0-DTFP_CF_H)+DTFP_CF_H*ZTFP_CF_H$ FRML JLED JTFP_CF_H =TFP_CF_H-((1.-BWPE)*TFP_CF_X)$ FRML EXO ZTFP_CF_H =TFP_CF_H$ FRML _GJ_D TFNQ1_H =(BWQ1_H*(PCB*FCB)+JTFNQ1_H)*(1.0-DTFNQ1_H)+DTFNQ1_H*ZTFNQ1_H$ FRML JLED JTFNQ1_H =TFNQ1_H-(BWQ1_H*(PCB*FCB))$ FRML EXO ZTFNQ1_H =TFNQ1_H$ FRML _D TFNF1_H =TFN_H+TFLM_H_CF-TFCP_CF_H-TFP_CF_H-TFNQ1_H$ FRML _GJ_D TFNB_H =(BWNB_H*TFNF1_H+JTFNB_H)*(1.0-DTFNB_H)+DTFNB_H*ZTFNB_H$ FRML JLED JTFNB_H =TFNB_H-(BWNB_H*TFNF1_H)$ FRML EXO ZTFNB_H =TFNB_H$ FRML _GJ_D TFS_E_H =(TFNF1_H-(TFNB_H+TFS_D_H)+JTFS_E_H)*(1.0-DTFS_E_H)+DTFS_E_H*ZTFS_E_H$ FRML JLED JTFS_E_H =TFS_E_H-(TFNF1_H-(TFNB_H+TFS_D_H))$ FRML EXO ZTFS_E_H =TFS_E_H$ FRML _GJ_D TFS_D_H =(BWS_H*TFNF1_H+JTFS_D_H)*(1.0-DTFS_D_H)+DTFS_D_H*ZTFS_D_H$ FRML JLED JTFS_D_H =TFS_D_H-(BWS_H*TFNF1_H)$ FRML EXO ZTFS_D_H =TFS_D_H$ FRML _GJ_D_Z OWCP_CF_H =((1.-BWPE)*OWCP_CF_X+JOWCP_CF_H)*(1.0-DOWCP_CF_H)+DOWCP_CF_H*ZOWCP_CF_H$ FRML JLED JOWCP_CF_H =OWCP_CF_H-((1.-BWPE)*OWCP_CF_X)$ FRML EXO ZOWCP_CF_H =OWCP_CF_H$ FRML _GJ_D_Z OWNB_H =(BOWB*WNB_H(-1)+JOWNB_H)*(1.0-DOWNB_H)+DOWNB_H*ZOWNB_H$ FRML JLED JOWNB_H =OWNB_H-(BOWB*WNB_H(-1))$ FRML EXO ZOWNB_H =OWNB_H$ FRML _GJ_D_Z OWLM_H_CF =((PWBM/PWBM(-1)-1.)*WLM_H_CF(-1)+JOWLM_H_CF)*(1.0-DOWLM_H_CF)+DOWLM_H_CF*ZOWLM_H_CF$ FRML JLED JOWLM_H_CF =OWLM_H_CF-((PWBM/PWBM(-1)-1.)*WLM_H_CF(-1))$ FRML EXO ZOWLM_H_CF =OWLM_H_CF$ FRML _GJ_D_Z OWS_D_H =(BOWSD*WS_D_H(-1)+JOWS_D_H)*(1.0-DOWS_D_H)+DOWS_D_H*ZOWS_D_H$ FRML JLED JOWS_D_H =OWS_D_H-(BOWSD*WS_D_H(-1))$ FRML EXO ZOWS_D_H =OWS_D_H$ FRML _GJ_D_Z OWS_E_H =(BOWSE*WS_E_H(-1)+JOWS_E_H)*(1.0-DOWS_E_H)+DOWS_E_H*ZOWS_E_H$ FRML JLED JOWS_E_H =OWS_E_H-(BOWSE*WS_E_H(-1))$ FRML EXO ZOWS_E_H =OWS_E_H$ FRML _GJ_D_Z OWP_CF_H =((1.-BWPE)*OWP_CF_X+JOWP_CF_H)*(1.0-DOWP_CF_H)+DOWP_CF_H*ZOWP_CF_H$ FRML JLED JOWP_CF_H =OWP_CF_H-((1.-BWPE)*OWP_CF_X)$ FRML EXO ZOWP_CF_H =OWP_CF_H$ FRML _D WCP_CF_H =WCP_CF_X-WCP_CF_E$ FRML _D WNB_H =WNB_H(-1)+TFNB_H+OWNB_H$ FRML _D WLM_H_CF =WLM_H_CF(-1)+TFLM_H_CF+OWLM_H_CF$ FRML _D WS_E_H =WS_E_H(-1)+TFS_E_H+OWS_E_H$ FRML _D WS_D_H =WS_D_H(-1)+TFS_D_H+OWS_D_H$ FRML _D WP_CF_H =WP_CF_H(-1)+TFP_CF_H+OWP_CF_H$ FRML _GJDD WNQ1_H =(WNQ1_H(-1)+TFNQ1_H+JDWNQ1_H)*(1.0-DWNQ1_H)+DWNQ1_H*ZWNQ1_H$ FRML JLED JDWNQ1_H =WNQ1_H-(WNQ1_H(-1)+TFNQ1_H)$ FRML EXO ZWNQ1_H =WNQ1_H$ FRML _I WN_H =WCP_CF_H+WNB_H-WLM_H_CF+WS_E_H+WS_D_H+WP_CF_H+WNQ1_H$ FRML _GJ_D TFLM_CR_CF =(BWLM_CR*((KNCR)-(KNCR(-1)))+JTFLM_CR_CF)*(1.0-DTFLM_CR_CF)+DTFLM_CR_CF*ZTFLM_CR_CF$ FRML JLED JTFLM_CR_CF =TFLM_CR_CF-(BWLM_CR*((KNCR)-(KNCR(-1))))$ FRML EXO ZTFLM_CR_CF =TFLM_CR_CF$ FRML _GJ_D_Z TFS_CR_Z =(BWSI_CR/(1.-BWSI_CR)*BTFS_CR*(TFN_CR+((KNCR)-(KNCR(-1))))+JTFS_CR_Z)*(1.0-DTFS_CR_Z) +DTFS_CR_Z*ZTFS_CR_Z$ FRML JLED JTFS_CR_Z =TFS_CR_Z-(BWSI_CR/(1.-BWSI_CR)*BTFS_CR*(TFN_CR+((KNCR)-(KNCR(-1)))))$ FRML EXO ZTFS_CR_Z =TFS_CR_Z$ FRML _GJ_D TFNQ1_CR =(BWQ1_CR*((KNCR)-(KNCR(-1)))+JTFNQ1_CR)*(1.0-DTFNQ1_CR)+DTFNQ1_CR*ZTFNQ1_CR$ FRML JLED JTFNQ1_CR =TFNQ1_CR-(BWQ1_CR*((KNCR)-(KNCR(-1))))$ FRML EXO ZTFNQ1_CR =TFNQ1_CR$ FRML _D TFNF1_CR =TFN_CR+TFLM_CR_CF+TFS_CR_Z-TFNQ1_CR$ FRML _GJ_D TFNB_CR =(BWNB_CR*TFNF1_CR+JTFNB_CR)*(1.0-DTFNB_CR)+DTFNB_CR*ZTFNB_CR$ FRML JLED JTFNB_CR =TFNB_CR-(BWNB_CR*TFNF1_CR)$ FRML EXO ZTFNB_CR =TFNB_CR$ FRML _GJ_D TFS_D_CR =(BWS_CR*TFNF1_CR+JTFS_D_CR)*(1.0-DTFS_D_CR)+DTFS_D_CR*ZTFS_D_CR$ FRML JLED JTFS_D_CR =TFS_D_CR-(BWS_CR*TFNF1_CR)$ FRML EXO ZTFS_D_CR =TFS_D_CR$ FRML _GJ_D TFS_E_CR =(TFNF1_CR-(TFNB_CR+TFS_D_CR)+JTFS_E_CR)*(1.0-DTFS_E_CR)+DTFS_E_CR*ZTFS_E_CR$ FRML JLED JTFS_E_CR =TFS_E_CR-(TFNF1_CR-(TFNB_CR+TFS_D_CR))$ FRML EXO ZTFS_E_CR =TFS_E_CR$ FRML _GJ_D_Z OWNB_CR =(BOWB*WNB_CR(-1)+JOWNB_CR)*(1.0-DOWNB_CR)+DOWNB_CR*ZOWNB_CR$ FRML JLED JOWNB_CR =OWNB_CR-(BOWB*WNB_CR(-1))$ FRML EXO ZOWNB_CR =OWNB_CR$ FRML _GJ_D_Z OWLM_CR_CF =((PWBM/PWBM(-1)-1.)*WLM_CR_CF(-1)+JOWLM_CR_CF)*(1.0-DOWLM_CR_CF)+DOWLM_CR_CF* ZOWLM_CR_CF$ FRML JLED JOWLM_CR_CF =OWLM_CR_CF-((PWBM/PWBM(-1)-1.)*WLM_CR_CF(-1))$ FRML EXO ZOWLM_CR_CF =OWLM_CR_CF$ FRML _GJ_D_Z OWS_D_CR =(BOWSD*WS_D_CR(-1)+JOWS_D_CR)*(1.0-DOWS_D_CR)+DOWS_D_CR*ZOWS_D_CR$ FRML JLED JOWS_D_CR =OWS_D_CR-(BOWSD*WS_D_CR(-1))$ FRML EXO ZOWS_D_CR =OWS_D_CR$ FRML _GJ_D_Z OWS_E_CR =(BOWSE*WS_E_CR(-1)+JOWS_E_CR)*(1.0-DOWS_E_CR)+DOWS_E_CR*ZOWS_E_CR$ FRML JLED JOWS_E_CR =OWS_E_CR-(BOWSE*WS_E_CR(-1))$ FRML EXO ZOWS_E_CR =OWS_E_CR$ FRML _GJ_D_Z OWS_CR_Z =((PWS_CR/PWS_CR(-1)-1.)*(WS_CR_Z(-1)-WS_X_OS(-1)-WS_D_OK(-1))+JOWS_CR_Z)*(1.0- DOWS_CR_Z)+DOWS_CR_Z*ZOWS_CR_Z$ FRML JLED JOWS_CR_Z =OWS_CR_Z-((PWS_CR/PWS_CR(-1)-1.)*(WS_CR_Z(-1)-WS_X_OS(-1)-WS_D_OK(-1)))$ FRML EXO ZOWS_CR_Z =OWS_CR_Z$ FRML _D WNB_CR =WNB_CR(-1)+TFNB_CR+OWNB_CR$ FRML _D WLM_CR_CF =WLM_CR_CF(-1)+TFLM_CR_CF+OWLM_CR_CF$ FRML _D WS_D_CR =WS_D_CR(-1)+TFS_D_CR+OWS_D_CR$ FRML _D WS_E_CR =WS_E_CR(-1)+TFS_E_CR+OWS_E_CR$ FRML _D WS_CR_Z =WS_CR_Z(-1)+TFS_CR_Z+OWS_CR_Z$ FRML _GJDD WNQ1_CR =(WNQ1_CR(-1)+TFNQ1_CR+JDWNQ1_CR)*(1.0-DWNQ1_CR)+DWNQ1_CR*ZWNQ1_CR$ FRML JLED JDWNQ1_CR =WNQ1_CR-(WNQ1_CR(-1)+TFNQ1_CR)$ FRML EXO ZWNQ1_CR =WNQ1_CR$ FRML _I WN_CR =WNB_CR-WLM_CR_CF+WS_E_CR+WS_D_CR-WS_CR_Z+WNQ1_CR$ FRML _D WSI_CR_Z =KNCR+WNB_CR-WLM_CR_CF+WS_E_CR+WS_D_CR+WNQ1_CR$ FRML _GJRD_Z PWS_CR =((((BWSI_CR*((WSI_CR_Z)-(WSI_CR_Z(-1)))-TFS_CR_Z)/(WS_CR_Z(-1)-WS_X_OS(-1)-WS_D_OK(-1) )+1.)*PWS_CR(-1)+0.5*(BWSI_CR-WS_CR_Z(-1)/WSI_CR_Z(-1))*PWS_CR(-1))*( 1.0+JRPWS_CR))*(1.0-DPWS_CR)+DPWS_CR*ZPWS_CR$ FRML JLED JRPWS_CR =PWS_CR/(((BWSI_CR*((WSI_CR_Z)-(WSI_CR_Z(-1)))-TFS_CR_Z)/(WS_CR_Z(-1)-WS_X_OS(-1)- WS_D_OK(-1))+1.)*PWS_CR(-1)+0.5*(BWSI_CR-WS_CR_Z(-1)/WSI_CR_Z(-1))* PWS_CR(-1))-1.0$ FRML EXO ZPWS_CR =PWS_CR$ FRML _GJ_D TFG_E_CF =(0.5*TFG_E_CF(-1)+JTFG_E_CF)*(1.0-DTFG_E_CF)+DTFG_E_CF*ZTFG_E_CF$ FRML JLED JTFG_E_CF =TFG_E_CF-(0.5*TFG_E_CF(-1))$ FRML EXO ZTFG_E_CF =TFG_E_CF$ FRML _GJ_D TFCP_CF_X =(KTFP*(TFFBI-TFFBU+TIPPHPB-SDRPH+TPSPI-TPSPU+TISP-SDRSP-TPLDU+TILD-SDRLD-TPDMPU+ TIDMP-SDRDMP)+JTFCP_CF_X)*(1.0-DTFCP_CF_X)+DTFCP_CF_X*ZTFCP_CF_X$ FRML JLED JTFCP_CF_X =TFCP_CF_X-(KTFP*(TFFBI-TFFBU+TIPPHPB-SDRPH+TPSPI-TPSPU+TISP-SDRSP-TPLDU+TILD-SDRLD- TPDMPU+TIDMP-SDRDMP))$ FRML EXO ZTFCP_CF_X =TFCP_CF_X$ FRML _GJ_D TFBCP_Z_CF =((1.-BWSP)*TFCP_CF_X+JTFBCP_Z_CF)*(1.0-DTFBCP_Z_CF)+DTFBCP_Z_CF*ZTFBCP_Z_CF$ FRML JLED JTFBCP_Z_CF =TFBCP_Z_CF-((1.-BWSP)*TFCP_CF_X)$ FRML EXO ZTFBCP_Z_CF =TFBCP_Z_CF$ FRML _GJ_D TFSCP_E_CF =(BWSE_CF*BWSP*TFCP_CF_X+JTFSCP_E_CF)*(1.0-DTFSCP_E_CF)+DTFSCP_E_CF*ZTFSCP_E_CF$ FRML JLED JTFSCP_E_CF =TFSCP_E_CF-(BWSE_CF*BWSP*TFCP_CF_X)$ FRML EXO ZTFSCP_E_CF =TFSCP_E_CF$ FRML _GJ_D TFSCP_D_CF =((1.-BWSE_CF)*BWSP*TFCP_CF_X+JTFSCP_D_CF)*(1.0-DTFSCP_D_CF)+DTFSCP_D_CF*ZTFSCP_D_CF$ FRML JLED JTFSCP_D_CF =TFSCP_D_CF-((1.-BWSE_CF)*BWSP*TFCP_CF_X)$ FRML EXO ZTFSCP_D_CF =TFSCP_D_CF$ FRML _GJ_D TFP_CF_X =(KTFP*(TFFPI-TFFPU+TIPPHLP-SDRPP+TPATPI-TPATPU+TIATP-SDRATP)+JTFP_CF_X)*(1.0- DTFP_CF_X)+DTFP_CF_X*ZTFP_CF_X$ FRML JLED JTFP_CF_X =TFP_CF_X-(KTFP*(TFFPI-TFFPU+TIPPHLP-SDRPP+TPATPI-TPATPU+TIATP-SDRATP))$ FRML EXO ZTFP_CF_X =TFP_CF_X$ FRML _GJ_D TFBP_Z_CF =((1.-BWSP)*TFP_CF_X+JTFBP_Z_CF)*(1.0-DTFBP_Z_CF)+DTFBP_Z_CF*ZTFBP_Z_CF$ FRML JLED JTFBP_Z_CF =TFBP_Z_CF-((1.-BWSP)*TFP_CF_X)$ FRML EXO ZTFBP_Z_CF =TFBP_Z_CF$ FRML _GJ_D TFSP_E_CF =(BWSE_CF*BWSP*TFP_CF_X+JTFSP_E_CF)*(1.0-DTFSP_E_CF)+DTFSP_E_CF*ZTFSP_E_CF$ FRML JLED JTFSP_E_CF =TFSP_E_CF-(BWSE_CF*BWSP*TFP_CF_X)$ FRML EXO ZTFSP_E_CF =TFSP_E_CF$ FRML _GJ_D TFSP_D_CF =((1.-BWSE_CF)*BWSP*TFP_CF_X+JTFSP_D_CF)*(1.0-DTFSP_D_CF)+DTFSP_D_CF*ZTFSP_D_CF$ FRML JLED JTFSP_D_CF =TFSP_D_CF-((1.-BWSE_CF)*BWSP*TFP_CF_X)$ FRML EXO ZTFSP_D_CF =TFSP_D_CF$ FRML _GJ_D_Z TFS_CF_Z =(BWSI_CF/(1.-BWSI_CF)*BTFS_CF*(TFN_CF+((KNCF)-(KNCF(-1))))+JTFS_CF_Z)*(1.0-DTFS_CF_Z) +DTFS_CF_Z*ZTFS_CF_Z$ FRML JLED JTFS_CF_Z =TFS_CF_Z-(BWSI_CF/(1.-BWSI_CF)*BTFS_CF*(TFN_CF+((KNCF)-(KNCF(-1)))))$ FRML EXO ZTFS_CF_Z =TFS_CF_Z$ FRML _D TFLM_X_CF =TFLM_H_CF+TFLM_CR_CF+TFLM_OK_CF+TFLM_E_CF$ FRML _D TFNF1_CF =TFN_CF-TFG_E_CF+TFS_CF_Z-TFNQ1_CF$ FRML _GJ_D TFNBR_CF =(BWNBR_CF*TFNF1_CF+JTFNBR_CF)*(1.0-DTFNBR_CF)+DTFNBR_CF*ZTFNBR_CF$ FRML JLED JTFNBR_CF =TFNBR_CF-(BWNBR_CF*TFNF1_CF)$ FRML EXO ZTFNBR_CF =TFNBR_CF$ FRML _GJ_D TFSR_D_CF =((1.-BWNBR_CF)*(1.-BWSE_CF)*TFNF1_CF+JTFSR_D_CF)*(1.0-DTFSR_D_CF)+DTFSR_D_CF* ZTFSR_D_CF$ FRML JLED JTFSR_D_CF =TFSR_D_CF-((1.-BWNBR_CF)*(1.-BWSE_CF)*TFNF1_CF)$ FRML EXO ZTFSR_D_CF =TFSR_D_CF$ FRML _GJ_D TFSR_E_CF =((1.-BWNBR_CF)*BWSE_CF*TFNF1_CF+JTFSR_E_CF)*(1.0-DTFSR_E_CF)+DTFSR_E_CF*ZTFSR_E_CF$ FRML JLED JTFSR_E_CF =TFSR_E_CF-((1.-BWNBR_CF)*BWSE_CF*TFNF1_CF)$ FRML EXO ZTFSR_E_CF =TFSR_E_CF$ FRML _GJ_D TFSR_Z_CF =(TFSR_D_CF+TFSR_E_CF+JTFSR_Z_CF)*(1.0-DTFSR_Z_CF)+DTFSR_Z_CF*ZTFSR_Z_CF$ FRML JLED JTFSR_Z_CF =TFSR_Z_CF-(TFSR_D_CF+TFSR_E_CF)$ FRML EXO ZTFSR_Z_CF =TFSR_Z_CF$ FRML _GJ_D_Z OWBCP_Z_CF =(BOWB*WBCP_Z_CF(-1)+JOWBCP_Z_CF)*(1.0-DOWBCP_Z_CF)+DOWBCP_Z_CF*ZOWBCP_Z_CF$ FRML JLED JOWBCP_Z_CF =OWBCP_Z_CF-(BOWB*WBCP_Z_CF(-1))$ FRML EXO ZOWBCP_Z_CF =OWBCP_Z_CF$ FRML _GJ_D_Z OWSCP_D_CF =(BOWSD*WSCP_D_CF(-1)+JOWSCP_D_CF)*(1.0-DOWSCP_D_CF)+DOWSCP_D_CF*ZOWSCP_D_CF$ FRML JLED JOWSCP_D_CF =OWSCP_D_CF-(BOWSD*WSCP_D_CF(-1))$ FRML EXO ZOWSCP_D_CF =OWSCP_D_CF$ FRML _GJ_D_Z OWSCP_E_CF =(BOWSE*WSCP_E_CF(-1)+JOWSCP_E_CF)*(1.0-DOWSCP_E_CF)+DOWSCP_E_CF*ZOWSCP_E_CF$ FRML JLED JOWSCP_E_CF =OWSCP_E_CF-(BOWSE*WSCP_E_CF(-1))$ FRML EXO ZOWSCP_E_CF =OWSCP_E_CF$ FRML _D____Z OWCP_CF_X =OWBCP_Z_CF+OWSCP_D_CF+OWSCP_E_CF$ FRML _GJ_D_Z OWBP_Z_CF =(BOWB*WBP_Z_CF(-1)+JOWBP_Z_CF)*(1.0-DOWBP_Z_CF)+DOWBP_Z_CF*ZOWBP_Z_CF$ FRML JLED JOWBP_Z_CF =OWBP_Z_CF-(BOWB*WBP_Z_CF(-1))$ FRML EXO ZOWBP_Z_CF =OWBP_Z_CF$ FRML _GJ_D_Z OWSP_D_CF =(BOWSD*WSP_D_CF(-1)+JOWSP_D_CF)*(1.0-DOWSP_D_CF)+DOWSP_D_CF*ZOWSP_D_CF$ FRML JLED JOWSP_D_CF =OWSP_D_CF-(BOWSD*WSP_D_CF(-1))$ FRML EXO ZOWSP_D_CF =OWSP_D_CF$ FRML _GJ_D_Z OWSP_E_CF =(BOWSE*WSP_E_CF(-1)+JOWSP_E_CF)*(1.0-DOWSP_E_CF)+DOWSP_E_CF*ZOWSP_E_CF$ FRML JLED JOWSP_E_CF =OWSP_E_CF-(BOWSE*WSP_E_CF(-1))$ FRML EXO ZOWSP_E_CF =OWSP_E_CF$ FRML _D____Z OWP_CF_X =OWBP_Z_CF+OWSP_D_CF+OWSP_E_CF$ FRML _GJ_D_Z OWNBR_CF =(BOWB*WNBR_CF(-1)+JOWNBR_CF)*(1.0-DOWNBR_CF)+DOWNBR_CF*ZOWNBR_CF$ FRML JLED JOWNBR_CF =OWNBR_CF-(BOWB*WNBR_CF(-1))$ FRML EXO ZOWNBR_CF =OWNBR_CF$ FRML _GJ_D_Z OWSR_D_CF =(BOWSD*WSR_D_CF(-1)+JOWSR_D_CF)*(1.0-DOWSR_D_CF)+DOWSR_D_CF*ZOWSR_D_CF$ FRML JLED JOWSR_D_CF =OWSR_D_CF-(BOWSD*WSR_D_CF(-1))$ FRML EXO ZOWSR_D_CF =OWSR_D_CF$ FRML _GJ_D_Z OWSR_E_CF =(BOWSE*WSR_E_CF(-1)+JOWSR_E_CF)*(1.0-DOWSR_E_CF)+DOWSR_E_CF*ZOWSR_E_CF$ FRML JLED JOWSR_E_CF =OWSR_E_CF-(BOWSE*WSR_E_CF(-1))$ FRML EXO ZOWSR_E_CF =OWSR_E_CF$ FRML _GJ_D_Z OWLM_X_CF =((PWBM/PWBM(-1)-1.)*WLM_X_CF(-1)+JOWLM_X_CF)*(1.0-DOWLM_X_CF)+DOWLM_X_CF*ZOWLM_X_CF$ FRML JLED JOWLM_X_CF =OWLM_X_CF-((PWBM/PWBM(-1)-1.)*WLM_X_CF(-1))$ FRML EXO ZOWLM_X_CF =OWLM_X_CF$ FRML _GJ_D_Z OWBM_CF_X =(OWLM_X_CF+JOWBM_CF_X)*(1.0-DOWBM_CF_X)+DOWBM_CF_X*ZOWBM_CF_X$ FRML JLED JOWBM_CF_X =OWBM_CF_X-(OWLM_X_CF)$ FRML EXO ZOWBM_CF_X =OWBM_CF_X$ FRML _GJ_D_Z OWS_CF_Z =((PWS_CF/PWS_CF(-1)-1.)*WS_CF_Z(-1)+JOWS_CF_Z)*(1.0-DOWS_CF_Z)+DOWS_CF_Z*ZOWS_CF_Z$ FRML JLED JOWS_CF_Z =OWS_CF_Z-((PWS_CF/PWS_CF(-1)-1.)*WS_CF_Z(-1))$ FRML EXO ZOWS_CF_Z =OWS_CF_Z$ FRML _GJDD WG_E_CF =(WG_E_CF(-1)+TFG_E_CF+JDWG_E_CF)*(1.0-DWG_E_CF)+DWG_E_CF*ZWG_E_CF$ FRML JLED JDWG_E_CF =WG_E_CF-(WG_E_CF(-1)+TFG_E_CF)$ FRML EXO ZWG_E_CF =WG_E_CF$ FRML _D WBCP_Z_CF =WBCP_Z_CF(-1)+TFBCP_Z_CF+OWBCP_Z_CF-OAB_OO_CF$ FRML _D WSCP_D_CF =WSCP_D_CF(-1)+TFSCP_D_CF+OWSCP_D_CF-(1.-BWSE_CF)*OAS_OO_CF$ FRML _D WSCP_E_CF =WSCP_E_CF(-1)+TFSCP_E_CF+OWSCP_E_CF-BWSE_CF*OAS_OO_CF$ FRML _D WCP_CF_X =WBCP_Z_CF+WSCP_D_CF+WSCP_E_CF$ FRML _GJDD WNBR_CF =(WNBR_CF(-1)+TFNBR_CF+OWNBR_CF+JDWNBR_CF)*(1.0-DWNBR_CF)+DWNBR_CF*ZWNBR_CF$ FRML JLED JDWNBR_CF =WNBR_CF-(WNBR_CF(-1)+TFNBR_CF+OWNBR_CF)$ FRML EXO ZWNBR_CF =WNBR_CF$ FRML _GJ_D WBM_CF_X =(WLM_X_CF+JWBM_CF_X)*(1.0-DWBM_CF_X)+DWBM_CF_X*ZWBM_CF_X$ FRML JLED JWBM_CF_X =WBM_CF_X-(WLM_X_CF)$ FRML EXO ZWBM_CF_X =WBM_CF_X$ FRML _D WNB_CF =WBCP_Z_CF+WBP_Z_CF+WNBR_CF-WBM_CF_X$ FRML _GJDD WLM_X_CF =(WLM_X_CF(-1)+TFLM_X_CF+OWLM_X_CF+JDWLM_X_CF)*(1.0-DWLM_X_CF)+DWLM_X_CF*ZWLM_X_CF$ FRML JLED JDWLM_X_CF =WLM_X_CF-(WLM_X_CF(-1)+TFLM_X_CF+OWLM_X_CF)$ FRML EXO ZWLM_X_CF =WLM_X_CF$ FRML _D WSR_D_CF =WSR_D_CF(-1)+TFSR_D_CF+OWSR_D_CF$ FRML _D WSR_E_CF =WSR_E_CF(-1)+TFSR_E_CF+OWSR_E_CF$ FRML _D WBP_Z_CF =WBP_Z_CF(-1)+TFBP_Z_CF+OWBP_Z_CF$ FRML _D WSP_D_CF =WSP_D_CF(-1)+TFSP_D_CF+OWSP_D_CF$ FRML _D WSP_E_CF =WSP_E_CF(-1)+TFSP_E_CF+OWSP_E_CF$ FRML _D WS_Z_CF =WSCP_E_CF+WSCP_D_CF+WSP_E_CF+WSP_D_CF+WSR_D_CF+WSR_E_CF$ FRML _GJDD WS_CF_Z =(WS_CF_Z(-1)+TFS_CF_Z+OWS_CF_Z+JDWS_CF_Z)*(1.0-DWS_CF_Z)+DWS_CF_Z*ZWS_CF_Z$ FRML JLED JDWS_CF_Z =WS_CF_Z-(WS_CF_Z(-1)+TFS_CF_Z+OWS_CF_Z)$ FRML EXO ZWS_CF_Z =WS_CF_Z$ FRML _D WP_CF_X =WBP_Z_CF+WSP_E_CF+WSP_D_CF$ FRML _GJDD WNQ1_CF =(WNQ1_CF(-1)+TFNQ1_CF+JDWNQ1_CF)*(1.0-DWNQ1_CF)+DWNQ1_CF*ZWNQ1_CF$ FRML JLED JDWNQ1_CF =WNQ1_CF-(WNQ1_CF(-1)+TFNQ1_CF)$ FRML EXO ZWNQ1_CF =WNQ1_CF$ FRML _I WN_CF =WG_E_CF+WNBR_CF+WSR_E_CF+WSR_D_CF-WS_CF_Z+WNQ1_CF$ FRML _D WSI_CF_Z =KNCF+WG_E_CF+WNBR_CF+WSR_E_CF+WSR_D_CF+WNQ1_CF$ FRML _GJRD_Z PWS_CF =((((BWSI_CF*((WSI_CF_Z)-(WSI_CF_Z(-1)))-TFS_CF_Z)/WS_CF_Z(-1)+1.)*PWS_CF(-1)+0.5*( BWSI_CF-WS_CF_Z(-1)/WSI_CF_Z(-1))*PWS_CF(-1))*(1.0+JRPWS_CF))*(1.0- DPWS_CF)+DPWS_CF*ZPWS_CF$ FRML JLED JRPWS_CF =PWS_CF/(((BWSI_CF*((WSI_CF_Z)-(WSI_CF_Z(-1)))-TFS_CF_Z)/WS_CF_Z(-1)+1.)*PWS_CF(-1)+0.5 *(BWSI_CF-WS_CF_Z(-1)/WSI_CF_Z(-1))*PWS_CF(-1))-1.0$ FRML EXO ZPWS_CF =PWS_CF$ FRML _GJDD WS_X_OS =(WS_X_OS(-1)+TFS_X_OS+JDWS_X_OS)*(1.0-DWS_X_OS)+DWS_X_OS*ZWS_X_OS$ FRML JLED JDWS_X_OS =WS_X_OS-(WS_X_OS(-1)+TFS_X_OS)$ FRML EXO ZWS_X_OS =WS_X_OS$ FRML _GJDD WNQ1_OS =(WNQ1_OS(-1)+TFNQ1_OS+JDWNQ1_OS)*(1.0-DWNQ1_OS)+DWNQ1_OS*ZWNQ1_OS$ FRML JLED JDWNQ1_OS =WNQ1_OS-(WNQ1_OS(-1)+TFNQ1_OS)$ FRML EXO ZWNQ1_OS =WNQ1_OS$ FRML _D TFNF1_OS =TFN_OS-TFS_X_OS-TFNQ1_OS$ FRML _GJ_D_Z OWB_Z_OS =(BOWB*WB_Z_OS(-1)+JOWB_Z_OS)*(1.0-DOWB_Z_OS)+DOWB_Z_OS*ZOWB_Z_OS$ FRML JLED JOWB_Z_OS =OWB_Z_OS-(BOWB*WB_Z_OS(-1))$ FRML EXO ZOWB_Z_OS =OWB_Z_OS$ FRML _D WB_Z_OS =WB_Z_OS(-1)+TFB_Z_OS+OWB_Z_OS$ FRML _GJ_D NWB_Z_OS =(NWB_Z_OS(-1)+TFB_Z_OS*KNWB_Z_OS+JNWB_Z_OS)*(1.0-DNWB_Z_OS)+DNWB_Z_OS*ZNWB_Z_OS$ FRML JLED JNWB_Z_OS =NWB_Z_OS-(NWB_Z_OS(-1)+TFB_Z_OS*KNWB_Z_OS)$ FRML EXO ZNWB_Z_OS =NWB_Z_OS$ FRML _GJ_D TFBE_OS_Z =(KTFBE_OS_Z*TFNF1_OS+JTFBE_OS_Z)*(1.0-DTFBE_OS_Z)+DTFBE_OS_Z*ZTFBE_OS_Z$ FRML JLED JTFBE_OS_Z =TFBE_OS_Z-(KTFBE_OS_Z*TFNF1_OS)$ FRML EXO ZTFBE_OS_Z =TFBE_OS_Z$ FRML _GJ_ TFBGE_OS_Z =TFBE_OS_Z+WBE_OS_Z(-1)*BRWBE_OS_Z+JTFBGE_OS_Z$ FRML JLED JTFBGE_OS_Z =TFBGE_OS_Z-(TFBE_OS_Z+WBE_OS_Z(-1)*BRWBE_OS_Z)$ FRML _GJ_D WBE_OS_Z =(WBE_OS_Z(-1)*(1.+(LOG(EWDM)-LOG(EWDM(-1))))+TFBGE_OS_Z/KTFBGE_OS_Z-WBE_OS_Z(-1)* BRWBE_OS_Z+JWBE_OS_Z)*(1.0-DWBE_OS_Z)+DWBE_OS_Z*ZWBE_OS_Z$ FRML JLED JWBE_OS_Z =WBE_OS_Z-(WBE_OS_Z(-1)*(1.+(LOG(EWDM)-LOG(EWDM(-1))))+TFBGE_OS_Z/KTFBGE_OS_Z- WBE_OS_Z(-1)*BRWBE_OS_Z)$ FRML EXO ZWBE_OS_Z =WBE_OS_Z$ FRML _GJ_D TFBGD_OS_Z =((-TFNF1_OS+TFB_Z_OS-TFBE_OS_Z)*KTFBGSLOG+BRWBD_OS_Z*NWBD_OS_Z(-1)+JTFBGD_OS_Z)*(1.0- DTFBGD_OS_Z)+DTFBGD_OS_Z*ZTFBGD_OS_Z$ FRML JLED JTFBGD_OS_Z =TFBGD_OS_Z-((-TFNF1_OS+TFB_Z_OS-TFBE_OS_Z)*KTFBGSLOG+BRWBD_OS_Z*NWBD_OS_Z(-1))$ FRML EXO ZTFBGD_OS_Z =TFBGD_OS_Z$ FRML _I NWBD_OS_Z =NWBD_OS_Z(-1)*(1.-BRWBD_OS_Z)+TFBGD_OS_Z/KTFBGD_OS_Z$ FRML _GJ_D TFBD_OS_Z =((KTFBGD_OS_Z+(1.-KTFBGD_OS_Z)*(1.-BRWBD_OS_Z))*(TFBGD_OS_Z/KTFBGD_OS_Z-BRWBD_OS_Z* NWBD_OS_Z(-1))+JTFBD_OS_Z)*(1.0-DTFBD_OS_Z)+DTFBD_OS_Z*ZTFBD_OS_Z$ FRML JLED JTFBD_OS_Z =TFBD_OS_Z-((KTFBGD_OS_Z+(1.-KTFBGD_OS_Z)*(1.-BRWBD_OS_Z))*(TFBGD_OS_Z/KTFBGD_OS_Z- BRWBD_OS_Z*NWBD_OS_Z(-1)))$ FRML EXO ZTFBD_OS_Z =TFBD_OS_Z$ FRML _GJ_D_Z OWBD_OS_Z =((KTFBGD_OS_Z+(1.-KTFBGD_OS_Z)*(1.-BRWBD_OS_Z)-PWBS(-1))*BRWBD_OS_Z*NWBD_OS_Z(-1)+ WBD_OS_Z(-1)*KVS*VS*(LOG(1.+IWBOSU)-LOG(1.+IWBOSU(-1)))+JOWBD_OS_Z)*( 1.0-DOWBD_OS_Z)+DOWBD_OS_Z*ZOWBD_OS_Z$ FRML JLED JOWBD_OS_Z =OWBD_OS_Z-((KTFBGD_OS_Z+(1.-KTFBGD_OS_Z)*(1.-BRWBD_OS_Z)-PWBS(-1))*BRWBD_OS_Z* NWBD_OS_Z(-1)+WBD_OS_Z(-1)*KVS*VS*(LOG(1.+IWBOSU)-LOG(1.+IWBOSU(-1))) )$ FRML EXO ZOWBD_OS_Z =OWBD_OS_Z$ FRML _GJ_D WBD_OS_Z =(WBD_OS_Z(-1)+TFBD_OS_Z+OWBD_OS_Z+JWBD_OS_Z)*(1.0-DWBD_OS_Z)+DWBD_OS_Z*ZWBD_OS_Z$ FRML JLED JWBD_OS_Z =WBD_OS_Z-(WBD_OS_Z(-1)+TFBD_OS_Z+OWBD_OS_Z)$ FRML EXO ZWBD_OS_Z =WBD_OS_Z$ FRML _D____Z PWBS =WBD_OS_Z/NWBD_OS_Z$ FRML _I WNB_OS =WB_Z_OS-WBE_OS_Z-WBD_OS_Z$ FRML _G NWBD_OS_ZSLOG =KWBD_OSSLOG*NWBD_OS_Z$ FRML _I WN_OS =WNB_OS+WS_X_OS+WNQ1_OS$ FRML _GJ_D WNC_OSSLOG =(WNC_OSSLOG(-1)+((WNQ1_OS)-(WNQ1_OS(-1)))+JWNC_OSSLOG)*(1.0-DWNC_OSSLOG)+DWNC_OSSLOG* ZWNC_OSSLOG$ FRML JLED JWNC_OSSLOG =WNC_OSSLOG-(WNC_OSSLOG(-1)+((WNQ1_OS)-(WNQ1_OS(-1))))$ FRML EXO ZWNC_OSSLOG =WNC_OSSLOG$ FRML _D WN_OSSLOG =NWB_Z_OS+WNC_OSSLOG-NWBD_OS_Z-WBE_OS_Z$ FRML _I WN_OK =WNB_OK-WLM_OK_CF+WS_E_OK+WS_D_OK+WNQ1_OK$ FRML _GJ_D TFLM_OK_CF =(BWLM_OK*(IOK1-IVOK1)+JTFLM_OK_CF)*(1.0-DTFLM_OK_CF)+DTFLM_OK_CF*ZTFLM_OK_CF$ FRML JLED JTFLM_OK_CF =TFLM_OK_CF-(BWLM_OK*(IOK1-IVOK1))$ FRML EXO ZTFLM_OK_CF =TFLM_OK_CF$ FRML _D TFNF1_OK =TFN_OK+TFLM_OK_CF-TFNQ1_OK$ FRML _GJ_D TFNB_OK =(BWNB_OK*TFNF1_OK+JTFNB_OK)*(1.0-DTFNB_OK)+DTFNB_OK*ZTFNB_OK$ FRML JLED JTFNB_OK =TFNB_OK-(BWNB_OK*TFNF1_OK)$ FRML EXO ZTFNB_OK =TFNB_OK$ FRML _GJ_D TFS_D_OK =((1.-BWNB_OK)*(1.-BWSE_OK)*TFNF1_OK+JTFS_D_OK)*(1.0-DTFS_D_OK)+DTFS_D_OK*ZTFS_D_OK$ FRML JLED JTFS_D_OK =TFS_D_OK-((1.-BWNB_OK)*(1.-BWSE_OK)*TFNF1_OK)$ FRML EXO ZTFS_D_OK =TFS_D_OK$ FRML _GJ_D TFS_E_OK =((1.-BWNB_OK)*BWSE_OK*TFNF1_OK+JTFS_E_OK)*(1.0-DTFS_E_OK)+DTFS_E_OK*ZTFS_E_OK$ FRML JLED JTFS_E_OK =TFS_E_OK-((1.-BWNB_OK)*BWSE_OK*TFNF1_OK)$ FRML EXO ZTFS_E_OK =TFS_E_OK$ FRML _GJ_D_Z OWNB_OK =(BOWB*WNB_OK(-1)+JOWNB_OK)*(1.0-DOWNB_OK)+DOWNB_OK*ZOWNB_OK$ FRML JLED JOWNB_OK =OWNB_OK-(BOWB*WNB_OK(-1))$ FRML EXO ZOWNB_OK =OWNB_OK$ FRML _GJ_D_Z OWLM_OK_CF =((PWBM/PWBM(-1)-1.)*WLM_OK_CF(-1)+JOWLM_OK_CF)*(1.0-DOWLM_OK_CF)+DOWLM_OK_CF* ZOWLM_OK_CF$ FRML JLED JOWLM_OK_CF =OWLM_OK_CF-((PWBM/PWBM(-1)-1.)*WLM_OK_CF(-1))$ FRML EXO ZOWLM_OK_CF =OWLM_OK_CF$ FRML _GJ_D_Z OWS_E_OK =(BOWSE*WS_E_OK(-1)+JOWS_E_OK)*(1.0-DOWS_E_OK)+DOWS_E_OK*ZOWS_E_OK$ FRML JLED JOWS_E_OK =OWS_E_OK-(BOWSE*WS_E_OK(-1))$ FRML EXO ZOWS_E_OK =OWS_E_OK$ FRML _D WNB_OK =WNB_OK(-1)+TFNB_OK+OWNB_OK$ FRML _D WLM_OK_CF =WLM_OK_CF(-1)+TFLM_OK_CF+OWLM_OK_CF$ FRML _D WS_E_OK =WS_E_OK(-1)+TFS_E_OK+OWS_E_OK$ FRML _GJDD WS_D_OK =(WS_D_OK(-1)+TFS_D_OK+JDWS_D_OK)*(1.0-DWS_D_OK)+DWS_D_OK*ZWS_D_OK$ FRML JLED JDWS_D_OK =WS_D_OK-(WS_D_OK(-1)+TFS_D_OK)$ FRML EXO ZWS_D_OK =WS_D_OK$ FRML _GJDD WNQ1_OK =(WNQ1_OK(-1)+TFNQ1_OK+JDWNQ1_OK)*(1.0-DWNQ1_OK)+DWNQ1_OK*ZWNQ1_OK$ FRML JLED JDWNQ1_OK =WNQ1_OK-(WNQ1_OK(-1)+TFNQ1_OK)$ FRML EXO ZWNQ1_OK =WNQ1_OK$ FRML _D TFNF1_OO =TFN_OO-TFNQ1_OO$ FRML _GJ_D TFNB_OO =(BWNB_OO*TFNF1_OO+JTFNB_OO)*(1.0-DTFNB_OO)+DTFNB_OO*ZTFNB_OO$ FRML JLED JTFNB_OO =TFNB_OO-(BWNB_OO*TFNF1_OO)$ FRML EXO ZTFNB_OO =TFNB_OO$ FRML _GJ_D TFS_X_OO =((1.-BWNB_OO)*TFNF1_OO+JTFS_X_OO)*(1.0-DTFS_X_OO)+DTFS_X_OO*ZTFS_X_OO$ FRML JLED JTFS_X_OO =TFS_X_OO-((1.-BWNB_OO)*TFNF1_OO)$ FRML EXO ZTFS_X_OO =TFS_X_OO$ FRML _GJ_D_Z OWNB_OO =(BOWB*WNB_OO(-1)+JOWNB_OO)*(1.0-DOWNB_OO)+DOWNB_OO*ZOWNB_OO$ FRML JLED JOWNB_OO =OWNB_OO-(BOWB*WNB_OO(-1))$ FRML EXO ZOWNB_OO =OWNB_OO$ FRML _GJ_D_Z OWS_X_OO =(BOWSD*WS_X_OO(-1)+JOWS_X_OO)*(1.0-DOWS_X_OO)+DOWS_X_OO*ZOWS_X_OO$ FRML JLED JOWS_X_OO =OWS_X_OO-(BOWSD*WS_X_OO(-1))$ FRML EXO ZOWS_X_OO =OWS_X_OO$ FRML _GJDD WNB_OO =(WNB_OO(-1)+TFNB_OO+OWNB_OO+OAB_OO_CF+JDWNB_OO)*(1.0-DWNB_OO)+DWNB_OO*ZWNB_OO$ FRML JLED JDWNB_OO =WNB_OO-(WNB_OO(-1)+TFNB_OO+OWNB_OO+OAB_OO_CF)$ FRML EXO ZWNB_OO =WNB_OO$ FRML _GJDD WS_X_OO =(WS_X_OO(-1)+TFS_X_OO+OWS_X_OO+OAS_OO_CF+JDWS_X_OO)*(1.0-DWS_X_OO)+DWS_X_OO*ZWS_X_OO$ FRML JLED JDWS_X_OO =WS_X_OO-(WS_X_OO(-1)+TFS_X_OO+OWS_X_OO+OAS_OO_CF)$ FRML EXO ZWS_X_OO =WS_X_OO$ FRML _GJDD WNQ1_OO =(WNQ1_OO(-1)+TFNQ1_OO+JDWNQ1_OO)*(1.0-DWNQ1_OO)+DWNQ1_OO*ZWNQ1_OO$ FRML JLED JDWNQ1_OO =WNQ1_OO-(WNQ1_OO(-1)+TFNQ1_OO)$ FRML EXO ZWNQ1_OO =WNQ1_OO$ FRML _I WN_OO =WNB_OO+WS_X_OO+WNQ1_OO$ FRML _I WN_O =WN_OS+WN_OK+WN_OO$ FRML _GJ_D_Z OWS_E_Z =((PWS_LSE/PWS_LSE(-1)-1.)*WS_E_Z(-1)+JOWS_E_Z)*(1.0-DOWS_E_Z)+DOWS_E_Z*ZOWS_E_Z$ FRML JLED JOWS_E_Z =OWS_E_Z-((PWS_LSE/PWS_LSE(-1)-1.)*WS_E_Z(-1))$ FRML EXO ZOWS_E_Z =OWS_E_Z$ FRML _D____Z OWCP_CF_E =OWCP_CF_X-OWCP_CF_H$ FRML _D____Z OWNB_E =OWBM_CF_X+OWBD_OS_Z+((WBE_OS_Z)-(WBE_OS_Z(-1)))-TFBE_OS_Z-(OWNB_H+OWNB_CR+OWNBR_CF+ OWBCP_Z_CF+OWBP_Z_CF+OWB_Z_OS+OWNB_OK+OWNB_OO+OAB_OO_CF)$ FRML _D____Z OWLM_E_CF =(PWBM/PWBM(-1)-1.)*WLM_E_CF(-1)$ FRML _D____Z OWS_Z_E =OWS_CR_Z+OWS_CF_Z-(OWS_D_H+OWS_D_CR+OWSR_D_CF+OWSP_D_CF+OWSCP_D_CF+OWS_X_OO+ OAS_OO_CF+(((WS_X_OS)-(WS_X_OS(-1)))-TFS_X_OS)+(((WS_D_OK)-(WS_D_OK(-1) ))-TFS_D_OK))$ FRML _D____Z OWP_CF_E =OWP_CF_X-OWP_CF_H$ FRML _D____Z OWNQ1_E =-((((WNQ1_H)-(WNQ1_H(-1)))-TFNQ1_H)+(((WNQ1_CR)-(WNQ1_CR(-1)))-TFNQ1_CR)+(((WNQ1_CF)- (WNQ1_CF(-1)))-TFNQ1_CF)+(((WNQ1_OS)-(WNQ1_OS(-1)))-TFNQ1_OS)+((( WNQ1_OK)-(WNQ1_OK(-1)))-TFNQ1_OK)+(((WNQ1_OO)-(WNQ1_OO(-1)))- TFNQ1_OO))$ FRML _D WCP_CF_E =WCP_CF_E(-1)+TFCP_CF_E+OWCP_CF_E$ FRML _D WNB_E =-(WNB_H+WNB_CR+WNBR_CF+WBCP_Z_CF+WBP_Z_CF-WBM_CF_X+WNB_OS+WNB_OK+WNB_OO)$ FRML _GJ_D WLM_E_CF =(WLM_E_CF(-1)+TFLM_E_CF+OWLM_E_CF+JWLM_E_CF)*(1.0-DWLM_E_CF)+DWLM_E_CF*ZWLM_E_CF$ FRML JLED JWLM_E_CF =WLM_E_CF-(WLM_E_CF(-1)+TFLM_E_CF+OWLM_E_CF)$ FRML EXO ZWLM_E_CF =WLM_E_CF$ FRML _D WS_E_Z =WS_E_H+WS_E_CR+WSP_E_CF+WSCP_E_CF+WSR_E_CF+WS_E_OK$ FRML _D WS_Z_E =WS_CR_Z+WS_CF_Z-(WS_D_H+WS_D_CR+WSP_D_CF+WSCP_D_CF+WSR_D_CF+WS_X_OS+WS_D_OK+WS_X_OO)$ FRML _D WP_CF_E =WP_CF_E(-1)+TFP_CF_E+OWP_CF_E$ FRML _D WNQ1_E =-(WNQ1_H+WNQ1_CR+WNQ1_CF+WNQ1_OS+WNQ1_OK+WNQ1_OO)$ FRML _D TFCP_CF_E =TFCP_CF_X-TFCP_CF_H$ FRML _D TFNB_E =((WNB_E)-(WNB_E(-1)))-OWNB_E$ FRML _D TFS_Z_E =((WS_Z_E)-(WS_Z_E(-1)))-OWS_Z_E$ FRML _D TFS_E_Z =((WS_E_Z)-(WS_E_Z(-1)))-OWS_E_Z$ FRML _D TFP_CF_E =TFP_CF_X-TFP_CF_H$ FRML _D TFNQ1_E =((WNQ1_E)-(WNQ1_E(-1)))-OWNQ1_E$ FRML _I WN_E =WCP_CF_E+WNB_E-WLM_E_CF+WS_Z_E-WS_E_Z+WP_CF_E+WNQ1_E$ FRML _D____Z BOWBM =OWBM_CF_X/WBM_CF_X(-1)$ FRML _D____Z BOWBS =(OWBD_OS_Z+((WBE_OS_Z)-(WBE_OS_Z(-1)))-TFBE_OS_Z)/(WBE_OS_Z(-1)+WBD_OS_Z(-1))$ FRML _D____Z BOWB =WBM_CF_X(-1)/(WBE_OS_Z(-1)+WBD_OS_Z(-1)+WBM_CF_X(-1))*BOWBM+(WBE_OS_Z(-1)+WBD_OS_Z(-1) )/(WBE_OS_Z(-1)+WBD_OS_Z(-1)+WBM_CF_X(-1))*BOWBS$ FRML _D____Z BOWSE =OWS_E_Z/(WS_E_H(-1)+WS_E_CR(-1)+WSP_E_CF(-1)+WSCP_E_CF(-1)+WSR_E_CF(-1)+WS_E_OK(-1))$ FRML _D____Z BOWSD =(OWS_CR_Z+OWS_CF_Z)/(WS_D_H(-1)+WS_D_CR(-1)+WSP_D_CF(-1)+WSCP_D_CF(-1)+WSR_D_CF(-1)+ WS_X_OO(-1)+WS_Z_E(-1))$ FRML _D____Z BOWCP =(OWBCP_Z_CF+OWSCP_D_CF+OWSCP_E_CF)/WCP_CF_X(-1)$ FRML _GJRD_Z PWBM =((EXP(LOG(PWBM(-1))+(LOG(PWBS)-LOG(PWBS(-1)))))*(1.0+JRPWBM))*(1.0-DPWBM)+DPWBM* ZPWBM$ FRML JLED JRPWBM =PWBM/(EXP(LOG(PWBM(-1))+(LOG(PWBS)-LOG(PWBS(-1)))))-1.0$ FRML EXO ZPWBM =PWBM$ FRML _D____Z BWSD_E =WS_Z_E/(WS_CF_Z+WS_CR_Z)$ FRML _GJ_D_Z BWSE_H =(1./(KBWSE_H**BWSD_E)+JBWSE_H)*(1.0-DBWSE_H)+DBWSE_H*ZBWSE_H$ FRML JLED JBWSE_H =BWSE_H-(1./(KBWSE_H**BWSD_E))$ FRML EXO ZBWSE_H =BWSE_H$ FRML _GJ_D_Z BWSE_CF =(1./(KBWSE_CF**BWSD_E)+JBWSE_CF)*(1.0-DBWSE_CF)+DBWSE_CF*ZBWSE_CF$ FRML JLED JBWSE_CF =BWSE_CF-(1./(KBWSE_CF**BWSD_E))$ FRML EXO ZBWSE_CF =BWSE_CF$ FRML _GJ_D_Z BWSE_CR =(1./(KBWSE_CR**BWSD_E)+JBWSE_CR)*(1.0-DBWSE_CR)+DBWSE_CR*ZBWSE_CR$ FRML JLED JBWSE_CR =BWSE_CR-(1./(KBWSE_CR**BWSD_E))$ FRML EXO ZBWSE_CR =BWSE_CR$ FRML _GJ_D_Z BWSE_OK =(1./(KBWSE_OK**BWSD_E)+JBWSE_OK)*(1.0-DBWSE_OK)+DBWSE_OK*ZBWSE_OK$ FRML JLED JBWSE_OK =BWSE_OK-(1./(KBWSE_OK**BWSD_E))$ FRML EXO ZBWSE_OK =BWSE_OK$ FRML _GJ_D_Z BWSP =((WSP_D_CF+WSP_E_CF)/WP_CF_X+JBWSP)*(1.0-DBWSP)+DBWSP*ZBWSP$ FRML JLED JBWSP =BWSP-((WSP_D_CF+WSP_E_CF)/WP_CF_X)$ FRML EXO ZBWSP =BWSP$ FRML _I____Z PWS_KAX =WS_CF_Z/(WS_CF_Z+WS_CR_Z)*PWS_CF+WS_CR_Z/(WS_CF_Z+WS_CR_Z)*PWS_CR$ FRML _KJRD IWPP =((KIWPP*IUWP)*(1.0+JRIWPP))*(1.0-DIWPP)+DIWPP*ZIWPP$ FRML JLED JRIWPP =IWPP/(KIWPP*IUWP)-1.0$ FRML EXO ZIWPP =IWPP$ FRML _K TIPPHP =KTIPPHP*IWPP*WPP(-1)$ FRML _K TIPPHPP =KTIPPHPP*TIPPHP$ FRML _D TIPPHPB =TIPPHP-TIPPHPP$ FRML _G TIPPHLP =IWPP*WP_Z_IQ(-1)$ FRML _DJRD IWPPD =(((TIPPHLP-SDRPP)/WP_Z_IQ(-1))*(1.0+JRIWPPD))*(1.0-DIWPPD)+DIWPPD*ZIWPPD$ FRML JLED JRIWPPD =IWPPD/((TIPPHLP-SDRPP)/WP_Z_IQ(-1))-1.0$ FRML EXO ZIWPPD =IWPPD$ FRML _DJ_D BSDR =(1.-229064./(WPP+WATP)+JBSDR)*(1.0-DBSDR)+DBSDR*ZBSDR$ FRML JLED JBSDR =BSDR-(1.-229064./(WPP+WATP))$ FRML EXO ZBSDR =BSDR$ FRML _D TFLPN =TFFPI-TFFPU+TIPPHLP-SDRPP$ FRML _GJDD OSELP =((PWS_LSE/PWS_LSE(-1)-1.)*WSEP_Z_IQ(-1)+JDOSELP)*(1.0-DOSELP)+DOSELP*ZOSELP$ FRML JLED JDOSELP =OSELP-((PWS_LSE/PWS_LSE(-1)-1.)*WSEP_Z_IQ(-1))$ FRML EXO ZOSELP =OSELP$ FRML _GJDD OSDKLP =((PWS_KAX/PWS_KAX(-1)-1.)*WSDKP_Z_IQ(-1)+JDOSDKLP)*(1.0-DOSDKLP)+DOSDKLP*ZOSDKLP$ FRML JLED JDOSDKLP =OSDKLP-((PWS_KAX/PWS_KAX(-1)-1.)*WSDKP_Z_IQ(-1))$ FRML EXO ZOSDKLP =OSDKLP$ FRML _GJDD OBLP =((PWBM/PWBM(-1)-1.)*WBP_Z_IQ(-1)+JDOBLP)*(1.0-DOBLP)+DOBLP*ZOBLP$ FRML JLED JDOBLP =OBLP-((PWBM/PWBM(-1)-1.)*WBP_Z_IQ(-1))$ FRML EXO ZOBLP =OBLP$ FRML _G WSEP_Z_IQ =(WSEP_Z_IQ(-1)+TFLPN*BWSP*BWSE_CF+OSELP+JDWSEP_Z_IQ)*(1.-DLP)+DLP*ZWSEP_Z_IQ$ FRML _G WSDKP_Z_IQ =(WSDKP_Z_IQ(-1)+TFLPN*BWSP*(1.-BWSE_CF)+OSDKLP+JDWSDKP_Z_IQ)*(1.-DLP)+DLP* ZWSDKP_Z_IQ$ FRML _G WBP_Z_IQ =(WBP_Z_IQ(-1)+TFLPN*(1.-BWSP)+OBLP-JDWSEP_Z_IQ-JDWSDKP_Z_IQ)*(1.-DLP)+DLP*ZWBP_Z_IQ$ FRML _D WP_Z_IQ =WSEP_Z_IQ+WSDKP_Z_IQ+WBP_Z_IQ$ FRML _D____Z PWZ =PWZ(-1)*(OSELP+OSDKLP+OBLP+WP_Z_IQ(-1))/WP_Z_IQ(-1)$ FRML _KJ_D TBHSL =(KTBHSL2*(1.+JRKTBHSL)*YSDA3*(1.-TSDA)+JTBHSL)*(1.0-DTBHSL)+DTBHSL*ZTBHSL$ FRML JLED JTBHSL =TBHSL-(KTBHSL2*(1.+JRKTBHSL)*YSDA3*(1.-TSDA))$ FRML EXO ZTBHSL =TBHSL$ FRML _KJ_D TYPSHL =(KBW*(WPSPL(-1)-0.5*OSPL(-1))*(IWPPD/(1.-(1.+IWPPD)**(-NHL)))+JTYPSHL)*(1.0-DTYPSHL)+ DTYPSHL*ZTYPSHL$ FRML JLED JTYPSHL =TYPSHL-(KBW*(WPSPL(-1)-0.5*OSPL(-1))*(IWPPD/(1.-(1.+IWPPD)**(-NHL))))$ FRML EXO ZTYPSHL =TYPSHL$ FRML _GJ_D TISHL1 =(IWPP*WPSPL(-1)*(1.+JRTISHL)+JTISHL1)*(1.0-DTISHL1)+DTISHL1*ZTISHL1$ FRML JLED JTISHL1 =TISHL1-(IWPP*WPSPL(-1)*(1.+JRTISHL))$ FRML EXO ZTISHL1 =TISHL1$ FRML _GJ_D SDRPSL =(SDRPP*WPSPL(-1)/WP_Z_IQ(-1)+JSDRPSL)*(1.0-DSDRPSL)+DSDRPSL*ZSDRPSL$ FRML JLED JSDRPSL =SDRPSL-(SDRPP*WPSPL(-1)/WP_Z_IQ(-1))$ FRML EXO ZSDRPSL =SDRPSL$ FRML _GJ_D OSPL =(WPSPL(-1)*(PWZ/PWZ(-1)-1.)+JOSPL)*(1.0-DOSPL)+DOSPL*ZOSPL$ FRML JLED JOSPL =OSPL-(WPSPL(-1)*(PWZ/PWZ(-1)-1.))$ FRML EXO ZOSPL =OSPL$ FRML _DJ_D WPSPL =(WPSPL(-1)+TBHSL-TYPSHL+TISHL1-SDRPSL+OSPL+JWPSPL)*(1.0-DWPSPL)+DWPSPL*ZWPSPL$ FRML JLED JWPSPL =WPSPL-(WPSPL(-1)+TBHSL-TYPSHL+TISHL1-SDRPSL+OSPL)$ FRML EXO ZWPSPL =WPSPL$ FRML _KJ_D TBHSK =(KTBHSK2*(1.+JRKTBHSK)*YSDA3*(1.-TSDA)+JTBHSK)*(1.0-DTBHSK)+DTBHSK*ZTBHSK$ FRML JLED JTBHSK =TBHSK-(KTBHSK2*(1.+JRKTBHSK)*YSDA3*(1.-TSDA))$ FRML EXO ZTBHSK =TBHSK$ FRML _KJ_D TYPSHK =(KBYK*(WPSPK(-1)-0.5*OSPK(-1))+JTYPSHK)*(1.0-DTYPSHK)+DTYPSHK*ZTYPSHK$ FRML JLED JTYPSHK =TYPSHK-(KBYK*(WPSPK(-1)-0.5*OSPK(-1)))$ FRML EXO ZTYPSHK =TYPSHK$ FRML _GJ_D TISHK1 =(IWPP*WPSPK(-1)*(1.+JRTISHK)+JTISHK1)*(1.0-DTISHK1)+DTISHK1*ZTISHK1$ FRML JLED JTISHK1 =TISHK1-(IWPP*WPSPK(-1)*(1.+JRTISHK))$ FRML EXO ZTISHK1 =TISHK1$ FRML _GJ_D SDRPSK =(SDRPP*WPSPK(-1)/WP_Z_IQ(-1)+JSDRPSK)*(1.0-DSDRPSK)+DSDRPSK*ZSDRPSK$ FRML JLED JSDRPSK =SDRPSK-(SDRPP*WPSPK(-1)/WP_Z_IQ(-1))$ FRML EXO ZSDRPSK =SDRPSK$ FRML _GJ_D OSPK =(WPSPK(-1)*(PWZ/PWZ(-1)-1.)+JOSPK)*(1.0-DOSPK)+DOSPK*ZOSPK$ FRML JLED JOSPK =OSPK-(WPSPK(-1)*(PWZ/PWZ(-1)-1.))$ FRML EXO ZOSPK =OSPK$ FRML _DJ_D WPSPK =(WPSPK(-1)+TBHSK-TYPSHK+TISHK1-SDRPSK+OSPK+JWPSPK)*(1.0-DWPSPK)+DWPSPK*ZWPSPK$ FRML JLED JWPSPK =WPSPK-(WPSPK(-1)+TBHSK-TYPSHK+TISHK1-SDRPSK+OSPK)$ FRML EXO ZWPSPK =WPSPK$ FRML _KJ_D TPHHLI =(KBHL2*(1.+JRTPHHLI)*YDPH1+JTPHHLI)*(1.0-DTPHHLI)+DTPHHLI*ZTPHHLI$ FRML JLED JTPHHLI =TPHHLI-(KBHL2*(1.+JRTPHHLI)*YDPH1)$ FRML EXO ZTPHHLI =TPHHLI$ FRML _KJ_D TPHHLU =(KBWP*(WPHPL(-1)-0.5*OHPL(-1))*(IWPPD/(1.-(1.+IWPPD)**(-NHL)))+JTPHHLU)*(1.0-DTPHHLU)+ DTPHHLU*ZTPHHLU$ FRML JLED JTPHHLU =TPHHLU-(KBWP*(WPHPL(-1)-0.5*OHPL(-1))*(IWPPD/(1.-(1.+IWPPD)**(-NHL))))$ FRML EXO ZTPHHLU =TPHHLU$ FRML _GJ_D TIHHL1 =(IWPP*WPHPL(-1)*(1.+JRTIHHL)+JTIHHL1)*(1.0-DTIHHL1)+DTIHHL1*ZTIHHL1$ FRML JLED JTIHHL1 =TIHHL1-(IWPP*WPHPL(-1)*(1.+JRTIHHL))$ FRML EXO ZTIHHL1 =TIHHL1$ FRML _GJ_D SDRPPL =(SDRPP*WPHPL(-1)/WP_Z_IQ(-1)+JSDRPPL)*(1.0-DSDRPPL)+DSDRPPL*ZSDRPPL$ FRML JLED JSDRPPL =SDRPPL-(SDRPP*WPHPL(-1)/WP_Z_IQ(-1))$ FRML EXO ZSDRPPL =SDRPPL$ FRML _GJ_D OHPL =(WPHPL(-1)*(PWZ/PWZ(-1)-1.)+JOHPL)*(1.0-DOHPL)+DOHPL*ZOHPL$ FRML JLED JOHPL =OHPL-(WPHPL(-1)*(PWZ/PWZ(-1)-1.))$ FRML EXO ZOHPL =OHPL$ FRML _DJ_D WPHPL =(WPHPL(-1)+TPHHLI-TPHHLU+TIHHL1-SDRPPL+OHPL+JWPHPL)*(1.0-DWPHPL)+DWPHPL*ZWPHPL$ FRML JLED JWPHPL =WPHPL-(WPHPL(-1)+TPHHLI-TPHHLU+TIHHL1-SDRPPL+OHPL)$ FRML EXO ZWPHPL =WPHPL$ FRML _KJ_D TPHHKI =(KBHK2*(1.+JRTPHHKI)*YDPH1+JTPHHKI)*(1.0-DTPHHKI)+DTPHHKI*ZTPHHKI$ FRML JLED JTPHHKI =TPHHKI-(KBHK2*(1.+JRTPHHKI)*YDPH1)$ FRML EXO ZTPHHKI =TPHHKI$ FRML _KJ_D TPHHKU =(KBPK*(WPHPK(-1)-0.5*OHPK(-1))+JTPHHKU)*(1.0-DTPHHKU)+DTPHHKU*ZTPHHKU$ FRML JLED JTPHHKU =TPHHKU-(KBPK*(WPHPK(-1)-0.5*OHPK(-1)))$ FRML EXO ZTPHHKU =TPHHKU$ FRML _GJ_D TIHSK1 =(IWPP*WPHPK(-1)*(1.+JRTIHSK)+JTIHSK1)*(1.0-DTIHSK1)+DTIHSK1*ZTIHSK1$ FRML JLED JTIHSK1 =TIHSK1-(IWPP*WPHPK(-1)*(1.+JRTIHSK))$ FRML EXO ZTIHSK1 =TIHSK1$ FRML _GJ_D SDRPPK =(SDRPP*WPHPK(-1)/WP_Z_IQ(-1)+JSDRPPK)*(1.0-DSDRPPK)+DSDRPPK*ZSDRPPK$ FRML JLED JSDRPPK =SDRPPK-(SDRPP*WPHPK(-1)/WP_Z_IQ(-1))$ FRML EXO ZSDRPPK =SDRPPK$ FRML _GJ_D OHPK =(WPHPK(-1)*(PWZ/PWZ(-1)-1.)+JOHPK)*(1.0-DOHPK)+DOHPK*ZOHPK$ FRML JLED JOHPK =OHPK-(WPHPK(-1)*(PWZ/PWZ(-1)-1.))$ FRML EXO ZOHPK =OHPK$ FRML _DJ_D WPHPK =(WPHPK(-1)+TPHHKI-TPHHKU+TIHSK1-SDRPPK+OHPK+JWPHPK)*(1.0-DWPHPK)+DWPHPK*ZWPHPK$ FRML JLED JWPHPK =WPHPK-(WPHPK(-1)+TPHHKI-TPHHKU+TIHSK1-SDRPPK+OHPK)$ FRML EXO ZWPHPK =WPHPK$ FRML _KJ_D TPATPI =(KBATPI*(1.-TSDA)*(QW1*(1.-BQ1/2.)+KKBATPIUL*UL)*0.001+JTPATPI)*(1.0-DTPATPI)+ DTPATPI*ZTPATPI$ FRML JLED JTPATPI =TPATPI-(KBATPI*(1.-TSDA)*(QW1*(1.-BQ1/2.)+KKBATPIUL*UL)*0.001)$ FRML EXO ZTPATPI =TPATPI$ FRML _KJ_D TPATPU =(KBATPU*(WATP(-1)-0.5*OATP(-1))*(1.+JRTPATPU)+JTPATPU)*(1.0-DTPATPU)+DTPATPU*ZTPATPU$ FRML JLED JTPATPU =TPATPU-(KBATPU*(WATP(-1)-0.5*OATP(-1))*(1.+JRTPATPU))$ FRML EXO ZTPATPU =TPATPU$ FRML _GJ_D TIATP =(WATP(-1)*IWPP*(1.+JRTIATP)+JTIATP)*(1.0-DTIATP)+DTIATP*ZTIATP$ FRML JLED JTIATP =TIATP-(WATP(-1)*IWPP*(1.+JRTIATP))$ FRML EXO ZTIATP =TIATP$ FRML _GJDD OSEATP =(WSEATP(-1)*(PWS_LSE/PWS_LSE(-1)-1.)+JDOSEATP)*(1.0-DOSEATP)+DOSEATP*ZOSEATP$ FRML JLED JDOSEATP =OSEATP-(WSEATP(-1)*(PWS_LSE/PWS_LSE(-1)-1.))$ FRML EXO ZOSEATP =OSEATP$ FRML _GJDD OSDKATP =(WSDKATP(-1)*(PWS_KAX/PWS_KAX(-1)-1.)+JDOSDKATP)*(1.0-DOSDKATP)+DOSDKATP*ZOSDKATP$ FRML JLED JDOSDKATP =OSDKATP-(WSDKATP(-1)*(PWS_KAX/PWS_KAX(-1)-1.))$ FRML EXO ZOSDKATP =OSDKATP$ FRML _GJDD OBATP =(WBATP(-1)*(PWBM/PWBM(-1)-1.)+JDOBATP)*(1.0-DOBATP)+DOBATP*ZOBATP$ FRML JLED JDOBATP =OBATP-(WBATP(-1)*(PWBM/PWBM(-1)-1.))$ FRML EXO ZOBATP =OBATP$ FRML _D OATP =OSEATP+OSDKATP+OBATP$ FRML _G___ WSEATP =(WSEATP(-1)+(TPATPI-TPATPU+TIATP-SDRATP)*BWSP*BWSE_CF+OSEATP+JDWSEATP)*(1.-DATP)+ DATP*ZWSEATP$ FRML _G___ WSDKATP =(WSDKATP(-1)+(TPATPI-TPATPU+TIATP-SDRATP)*BWSP*(1.-BWSE_CF)+OSDKATP+JDWSDKATP)*(1.- DATP)+DATP*ZWSDKATP$ FRML _G___ WBATP =(WBATP(-1)+(TPATPI-TPATPU+TIATP-SDRATP)*(1.-BWSP)+OBATP-JDWSEATP-JDWSDKATP)*(1.-DATP) +DATP*ZWBATP$ FRML _D____Z PWATP =PWATP(-1)*(OSEATP+OSDKATP+OBATP+WATP(-1))/WATP(-1)$ FRML _I___ WSATP =WSDKATP+WSEATP$ FRML _I___ WATP =WSEATP+WSDKATP+WBATP$ FRML _KJ_D TPDMPU =(KBDMPU*(WDMP(-1)-0.5*ODMP(-1))*(1.+JRTPDMPU)+JTPDMPU)*(1.0-DTPDMPU)+DTPDMPU*ZTPDMPU$ FRML JLED JTPDMPU =TPDMPU-(KBDMPU*(WDMP(-1)-0.5*ODMP(-1))*(1.+JRTPDMPU))$ FRML EXO ZTPDMPU =TPDMPU$ FRML _GJ_D TIDMP =(WDMP(-1)*IWPP*(1.+JRTIDMP)+JTIDMP)*(1.0-DTIDMP)+DTIDMP*ZTIDMP$ FRML JLED JTIDMP =TIDMP-(WDMP(-1)*IWPP*(1.+JRTIDMP))$ FRML EXO ZTIDMP =TIDMP$ FRML _GJ_D ODMP =(WDMP(-1)*(PWATP/PWATP(-1)-1.)+JODMP)*(1.0-DODMP)+DODMP*ZODMP$ FRML JLED JODMP =ODMP-(WDMP(-1)*(PWATP/PWATP(-1)-1.))$ FRML EXO ZODMP =ODMP$ FRML _DJ_D WDMP =(WDMP(-1)+TPDMPI-TPDMPU+TIDMP-SDRDMP+ODMP+JWDMP)*(1.0-DWDMP)+DWDMP*ZWDMP$ FRML JLED JWDMP =WDMP-(WDMP(-1)+TPDMPI-TPDMPU+TIDMP-SDRDMP+ODMP)$ FRML EXO ZWDMP =WDMP$ FRML _KJ_D TPSPI =(KBSPI*(KSDA*YSDA3-(TBHSK+TBHSL)+TYD+TYMFDP+TYMS+TYMB+TYRKS+TYULY+TYUAK+TYUREV)*(1.+ JRTPSPI)+JTPSPI)*(1.0-DTPSPI)+DTPSPI*ZTPSPI$ FRML JLED JTPSPI =TPSPI-(KBSPI*(KSDA*YSDA3-(TBHSK+TBHSL)+TYD+TYMFDP+TYMS+TYMB+TYRKS+TYULY+TYUAK+TYUREV) *(1.+JRTPSPI))$ FRML EXO ZTPSPI =TPSPI$ FRML _KJ_D TPSPU =(KBSPU*(WSP(-1)-0.5*OSP(-1))*(1.+JRTPSPU)+JTPSPU)*(1.0-DTPSPU)+DTPSPU*ZTPSPU$ FRML JLED JTPSPU =TPSPU-(KBSPU*(WSP(-1)-0.5*OSP(-1))*(1.+JRTPSPU))$ FRML EXO ZTPSPU =TPSPU$ FRML _GJ_D TISP =(WSP(-1)*IWPP*(1.+JRTISP)+JTISP)*(1.0-DTISP)+DTISP*ZTISP$ FRML JLED JTISP =TISP-(WSP(-1)*IWPP*(1.+JRTISP))$ FRML EXO ZTISP =TISP$ FRML _GJ_D OSP =(WSP(-1)*(PWATP/PWATP(-1)-1.)+JOSP)*(1.0-DOSP)+DOSP*ZOSP$ FRML JLED JOSP =OSP-(WSP(-1)*(PWATP/PWATP(-1)-1.))$ FRML EXO ZOSP =OSP$ FRML _DJ_D WSP =(WSP(-1)+TPSPI-TPSPU+TISP-SDRSP+OSP+JWSP)*(1.0-DWSP)+DWSP*ZWSP$ FRML JLED JWSP =WSP-(WSP(-1)+TPSPI-TPSPU+TISP-SDRSP+OSP)$ FRML EXO ZWSP =WSP$ FRML _KJ_D TPLDU =(KBLD*(WLD(-1)-0.5*OLD(-1))*(1.+JRTPLDU)+JTPLDU)*(1.0-DTPLDU)+DTPLDU*ZTPLDU$ FRML JLED JTPLDU =TPLDU-(KBLD*(WLD(-1)-0.5*OLD(-1))*(1.+JRTPLDU))$ FRML EXO ZTPLDU =TPLDU$ FRML _GJ_D TILD =(WLD(-1)*IWPP*(1.+JRTILD)+JTILD)*(1.0-DTILD)+DTILD*ZTILD$ FRML JLED JTILD =TILD-(WLD(-1)*IWPP*(1.+JRTILD))$ FRML EXO ZTILD =TILD$ FRML _GJ_D OLD =(WLD(-1)*(PWATP/PWATP(-1)-1.)+JOLD)*(1.0-DOLD)+DOLD*ZOLD$ FRML JLED JOLD =OLD-(WLD(-1)*(PWATP/PWATP(-1)-1.))$ FRML EXO ZOLD =OLD$ FRML _DJ_D WLD =(WLD(-1)+TPLDI-TPLDU+TILD-SDRLD+OLD+JWLD)*(1.0-DWLD)+DWLD*ZWLD$ FRML JLED JWLD =WLD-(WLD(-1)+TPLDI-TPLDU+TILD-SDRLD+OLD)$ FRML EXO ZWLD =WLD$ FRML _D WPP =WPHPK+WPHPL+WPSPL+WPSPK$ FRML _KJ_D TIHSP =(KTIHSP*(TISHL1+TISHK1)+TIATP+JTIHSP)*(1.0-DTIHSP)+DTIHSP*ZTIHSP$ FRML JLED JTIHSP =TIHSP-(KTIHSP*(TISHL1+TISHK1)+TIATP)$ FRML EXO ZTIHSP =TIHSP$ FRML _KJ_D TBHSP =(KTBHSP*(TBHSL+TBHSK)+TPATPI+TIHSP-SDRPSL-SDRPSK-SDRATP+JTBHSP)*(1.0-DTBHSP)+DTBHSP* ZTBHSP$ FRML JLED JTBHSP =TBHSP-(KTBHSP*(TBHSL+TBHSK)+TPATPI+TIHSP-SDRPSL-SDRPSK-SDRATP)$ FRML EXO ZTBHSP =TBHSP$ FRML _KJ_D TYPSHP =(KTYPSHP*(TYPSHL+TYPSHK)+TPATPU+JTYPSHP)*(1.0-DTYPSHP)+DTYPSHP*ZTYPSHP$ FRML JLED JTYPSHP =TYPSHP-(KTYPSHP*(TYPSHL+TYPSHK)+TPATPU)$ FRML EXO ZTYPSHP =TYPSHP$ FRML _G___ TFFBU =(1.-KTYPSHP)*(TYPSHL+TYPSHK)+(1.-KTPHU)*(TPHHKU+TPHHLU)$ FRML _G TFFBI =(1.-KTBHSP)*(TBHSL+TBHSK)+(1.-KTPHI)*(TPHHKI+TPHHLI)$ FRML _GJ_D OLB =(BOWCP*WPPB(-1)+JOLB)*(1.0-DOLB)+DOLB*ZOLB$ FRML JLED JOLB =OLB-(BOWCP*WPPB(-1))$ FRML EXO ZOLB =OLB$ FRML _D WPPB =WPPB(-1)+TFFBI-TFFBU+TIPPHPB-SDRPH+OLB$ AFTER $ FRML IYDWT YDWT =YW1+TWEN-TYPRI-SASO+TY+TYEN-(SD-SDEN)$ FRML ISDKOR SDKOR =SD-SDEN$ FRML IYRPS1 YRPS1 =YR1-IVO1$ FRML IFYDPHK FYDPHK =YDPHK2/PCPU$ FRML IFYDPSK FYDPSK =YDPSK2/PCPU$ FRML IFYDPK FYDPK =(YDPHK2+YDPSK2)/PCPU$ FRML IFYDPK FYDPL =YDPL1/PCPU$ FRML IFYDPK FYDP =YDP/PCP$ FRML IFYDPK FYDPH =YDPH1/PCP$ FRML IFYDPK FYDPS =YDPS1/PCP$ FRML IWCPLD WCPLD =WCP(-1)/PCPU$ FRML IWCPLD FWCP =WCP/PCP$ FRML IFCPUXH FCPUXH =(FCP*PCP(-1)-FCB*PCB(-1)+FCBU*PCBU(-1)-FCH*PCH(-1))/PCPUXH(-1)$ FRML IFCPU FCPU =CPU/PCPU$ FRML ICPXH CPXH =CP-(PCH*FCH)$ FRML IFCPXH FCPXH =(FCP*PCP(-1)-FCH*PCH(-1))/PCPXH(-1)$ FRML IPCPXH PCPXH =CPXH/FCPXH$ 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 ICGE CGE =CG+CE$ FRML IFCGE FCGE =(FCG*PCG(-1)+FCE*PCE(-1))/PCGE(-1)$ FRML IPCGE PCGE =CGE/FCGE$ FRML ICFNIV CFNIV =CF+CN+CI+CV$ FRML IFCFNIV FCFNIV =(FCF*PCF(-1)+FCN*PCN(-1)+FCI*PCI(-1)+FCV*PCV(-1))/PCFNIV(-1)$ FRML IPCFNIV PCFNIV =CFNIV/FCFNIV$ FRML IFCGK FCGK =CGK/PCGK$ FRML IYDPY YDPY =100.*YDP/Y$ FRML IBCPUXH BCPUXH =(CP-CB+CBU-(PCH*FCH))/(YDPL1)$ FRML IBCPXH BCPXH =(CP-(PCH*FCH))/(YDPL1-(PCH*FCH))$ FRML IBCP BCP =CP/YDP$ FRML IBCPYSM BCPYSM =CP/(YF+TY)$ FRML IBCPY BCPY =CP/Y$ FRML IBCPYF BCPYF =CP/YF$ FRML IBWCP BWCP =WCP(-1)/YDP$ FRML IBFCGK BFCGK =FCG/FCK$ FRML IECPUXH ECPUXH =CPUXH-EXP(0.365845*(LOG(YDPHK2)-LOG(YDPHK2(-1)))+0.097410*(LOG(WCP(-1))-LOG(WCP(-2))) -0.531462*(LOG(PCPUXH)-LOG(PCPUXH(-1)))+0.077129*(LOG(PCHU)-LOG(PCHU(-1) ))-0.347112*(LOG(CPUXH(-1)/PCPUXH(-1))-(0.872167*LOG(YDPL1(-1)/PCPU(-1) )+(1.-0.872167)*LOG(WCP(-2)/PCPU(-1))-0.300000*LOG(PCPUXH(-1)/PCPU(-1) )-0.292620))+LOG(CPUXH(-1)/PCPUXH(-1))+LOG(PCPUXH))$ FRML IEFCPUXH EFCPUXH =ECPUXH*FCPUXH/CPUXH$ FRML IFIF FIF =(FIM*PIM(-1)+FIB*PIB(-1)+FIT*PIT(-1))/PIF(-1)$ FRML IIF IF =I-FIL*PIL$ FRML IFI FI =(FIF*PIF(-1)+FIL*PIL(-1))/PI(-1)$ FRML IIP IP =FIMP*PIMP+FIMK*PIMK+FIBP*PIBP+FIBH*PIBH+FIT*PIT+FIL*PIL$ FRML IFIP FIP =(FIMP*PIMP(-1)+FIMK*PIMK(-1)+FIBP*PIBP(-1)+FIBH*PIBH(-1)+FIT*PIT(-1)+FIL*PIL(-1))/ PIP(-1)$ FRML IPIP PIP =IP/FIP$ FRML IFIP11 FIP11 =(FIBP11*PIBP11(-1)+FIMP11*PIMP11(-1)+FIT*PIT(-1)+FIBH*PIBH(-1)+FIL*PIL(-1))/PIP11(-1)$ FRML IIP11 IP11 =I-IO11$ FRML IIFP IFP =FIMP*PIMP+FIMK*PIMK+FIBP*PIBP+FIBH*PIBH+FIT*PIT$ FRML IFIFP FIFP =(FIMP*PIMP(-1)+FIMK*PIMK(-1)+FIBP*PIBP(-1)+FIBH*PIBH(-1)+FIT*PIT(-1))/PIFP(-1)$ FRML IPIFP PIFP =IFP/FIFP$ FRML IIFPXH IFPXH =FIMP*PIMP+FIMK*PIMK+FIBP*PIBP+FIT*PIT$ FRML IFIFPXH FIFPXH =(FIMP*PIMP(-1)+FIMK*PIMK(-1)+FIBP*PIBP(-1)+FIT*PIT(-1))/PIFPXH(-1)$ FRML IPIFPXH PIFPXH =IFPXH/FIFPXH$ FRML IIFP1XH1 IFP1XH1 =FIBP11*PIBP11+FIMP11*PIMP11+FIT*PIT$ FRML IFIFP1XH1 FIFP1XH1 =(FIBP11*PIBP11(-1)+FIMP11*PIMP11(-1)+FIT*PIT(-1))/PIFP1XH1(-1)$ FRML IPIFP1XH1 PIFP1XH1 =IFP1XH1/FIFP1XH1$ FRML IIFO IFO =FIMO*PIMO+FIBO*PIBO$ FRML IFIFO FIFO =(FIMO*PIMO(-1)+FIBO*PIBO(-1))/PIFO(-1)$ FRML IPIFO PIFO =IFO/FIFO$ FRML IIO IO =FIMO*PIMO+FIBO*PIBO$ FRML IFIO FIO =(FIMO*PIMO(-1)+FIBO*PIBO(-1))/PIO(-1)$ FRML IPIO PIO =IO/FIO$ FRML IFIMO1 FIMO1 =(FIO1*PIO1(-1)-FIBO1*PIBO1(-1))/PIMO1(-1)$ FRML IIBO1 IBO1 =FIBO1*PIBO1$ FRML IIMO1 IMO1 =IO1-IBO1$ FRML IPIMO1 PIMO1 =IMO1/FIMO1$ FRML IIT IT =PIT*FIT$ FRML IFIBP1 FIBP1 =(FIB*PIB(-1)-FIBH*PIBH(-1)-FIBO1*PIBO1(-1))/PIBP1(-1)$ FRML IFIMP1 FIMP1 =(FIM*PIM(-1)-FIMO1*PIMO1(-1))/PIMP1(-1)$ FRML IIPB11 IBP11 =PIBP11*FIBP11$ FRML IIPM11 IMP11 =PIMP11*FIMP11$ FRML IIP1 IP1 =I-IO1$ FRML IFIP1 FIP1 =(FI*PI(-1)-FIO1*PIO1(-1))/PIP1(-1)$ FRML IPIP1 PIP1 =IP1/FIP1$ FRML IIBP1 IBP1 =IB-FIBH*PIBH-IBO1$ FRML IIMP1 IMP1 =IP1-IBP1-FIBH*PIBH-FIT*PIT-FIL*PIL$ FRML IPIBP1 PIBP1 =IBP1/FIBP1$ FRML IPIMP1 PIMP1 =IMP1/FIMP1$ FRML IFIBHE FIBHE =FIBH-FIBHL$ FRML IIWBZH IWBZH =IWBZ*(1.-TSUIH)$ FRML IPIBHG PIBHG =0.8*PIBH+0.2*PHGK$ FRML IPHKHG PHKHG =PHK/PIBHG$ FRML IBUIBH1 BUIBH1 =CHE/(FCHE*PHK)$ FRML IUIBH UIBH =BUIBH1*PHK*FCHE/FKBHE(-1)$ FRML IUIBHU UIBHEU =(1.-TSUIH)*IWBZ+BINVBH-0.50*RPIBHE$ FRML IUIBHS UIBHS =(TSUIH*YRPHS+0.8*SIQEJ*KNBHE(-2)/(KNBP(-2)+KNBH(-2))+SSYEJ)/FCHE$ FRML IUIBHSL UIBHSL =TSUIH*YRPHS/FCHE$ FRML IUIBHSQ UIBHSQ =(0.8*SIQEJ*KNBHE(-2)/(KNBP(-2)+KNBH(-2)))/FCHE$ FRML IUIBHSY UIBHSY =SSYEJ/FCHE$ FRML IUIBHN UIBHN =(KNBHE(-1)/PIBH(-1))/FKBHE(-1)$ FRML IIL IL =PIL*FIL$ FRML IFILN FILN =FILNE+FILNG+FILNF+FILNN+FILNB+FILNM+FILNT+FILNK+FILNQ$ FRML IFILQ FILQ =FILQH+FILQQ$ FRML IFILM FILM =FILM0+FILM1+FILM2+FILM3K+FILM3R+FILM3Q+FILM5+FILM6M+FILM6Q+FILM7B+FILM7Y+FILM7Q+ FILM8$ 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 IE7 E7 =E7Q+E7Y$ FRML IE8 E8 =FE8*PE8$ FRML IESQ ESQ =FESQ*PESQ$ FRML IESS ESS =FESS*PESS$ FRML IE59 E59 =E5+E6+E7Y+E7Q+E8$ FRML IE59X7Y E59X7Y =E59-E7Y$ FRML IEVX3 EVX3 =EV-E3$ FRML IEST EST =ES+ET$ FRML IFE7 FE7 =(FE7Y*PE7Y(-1)+FE7Q*PE7Q(-1))/PE7(-1)$ FRML IFE59 FE59 =(FE5*PE5(-1)+FE6*PE6(-1)+FE7Y*PE7Y(-1)+FE7Q*PE7Q(-1)+FE8*PE8(-1))/PE59(-1)$ FRML IFE59X7Y FE59X7Y =(FE59*PE59(-1)-FE7Y*PE7Y(-1))/PE59X7Y(-1)$ FRML IFEVX3 FEVX3 =(FEV*PEV(-1)-FE3*PE3(-1))/PEVX3(-1)$ FRML IFEST FEST =(FES*PES(-1)+FET*PET(-1))/PEST(-1)$ FRML IPE7 PE7 =E7/FE7$ FRML IPE59 PE59 =E59/FE59$ FRML IPE59X7Y PE59X7Y =E59X7Y/FE59X7Y$ FRML IPEVX3 PEVX3 =EVX3/FEVX3$ FRML IPEST PEST =(ES+ET)/FEST$ FRML IFEE59 FEE59 =FEE59(-1)*((E5(-1)/E59X7Y(-1))*FEE5/FEE5(-1)+(E6(-1)/E59X7Y(-1))*FEE6/FEE6(-1)+(E7Q(-1) /E59X7Y(-1))*FEE7Q/FEE7Q(-1)+(E8(-1)/E59X7Y(-1))*FEE8/FEE8(-1))$ FRML IPEE59 PEE59 =PEE59(-1)*((E5(-1)/E59X7Y(-1))*PEE5/PEE5(-1)+(E6(-1)/E59X7Y(-1))*PEE6/PEE6(-1)+(E7Q(-1) /E59X7Y(-1))*PEE7Q/PEE7Q(-1)+(E8(-1)/E59X7Y(-1))*PEE8/PEE8(-1))$ 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 IM5 M5 =PM5*FM5$ FRML IM6M M6M =PM6M*FM6M$ FRML IM6Q M6Q =PM6Q*FM6Q$ FRML IM7B M7B =PM7B*FM7B$ FRML IM7Y M7Y =PM7Y*FM7Y$ FRML IM7Q M7Q =PM7Q*FM7Q$ FRML IM8 M8 =PM8*FM8$ FRML IM3 M3 =M3K+M3R+M3Q$ FRML IM6 M6 =M6M+M6Q$ FRML IM7 M7 =M7B+M7Y+M7Q$ FRML IM59 M59 =M5+M6+M7+M8$ FRML IM59X7Y M59X7Y =M59-M7Y$ FRML IMVX3 MVX3 =MV-M3$ FRML IMST MST =MS+MT$ FRML IFM7 FM7 =(FM7B*PM7B(-1)+FM7Y*PM7Y(-1)+FM7Q*PM7Q(-1))/PM7(-1)$ FRML IFM6 FM6 =(FM6M*PM6M(-1)+FM6Q*PM6Q(-1))/PM6(-1)$ FRML IFM3 FM3 =(FM3K*PM3K(-1)+FM3R*PM3R(-1)+FM3Q*PM3Q(-1))/PM3(-1)$ FRML IFM59 FM59 =(FM5*PM5(-1)+FM6*PM6(-1)+FM7*PM7(-1)+FM8*PM8(-1))/PM59(-1)$ FRML IFM59X7Y FM59X7Y =(FM59*PM59(-1)-FM7Y*PM7Y(-1))/PM59X7Y(-1)$ FRML IFMVX3 FMVX3 =(FMV*PMV(-1)-FM3*PM3(-1))/PMVX3(-1)$ FRML IFMST FMST =(FMS*PMS(-1)+FMT*PMT(-1))/PMST(-1)$ FRML IFMZ59 FMZ59 =(FMZ5*PM5(-1)+FMZ6M*PM6M(-1)+FMZ6Q*PM6Q(-1)+FMZ7Q*PM7Q(-1)+FMZ8*PM8(-1))/PM59(-1)$ FRML IFMZ FMZ =(FMZ0*PM0(-1)+FMZ1*PM1(-1)+FMZ2*PM2(-1)+FMZ3Q*PM3Q(-1)+FMZ59*PM59(-1))/PM(-1)$ FRML IFAM59 FAM59 =FAM59(-1)*(FAM5/FAM5(-1)*FMZ5(-1)/FMZ59(-1)+FAM6M/FAM6M(-1)*FMZ6M(-1)/FMZ59(-1)+ FAM6Q/FAM6Q(-1)*FMZ6Q(-1)/FMZ59(-1)+FAM7Q/FAM7Q(-1)*FMZ7Q(-1)/FMZ59(-1) +FAM8/FAM8(-1)*FMZ8(-1)/FMZ59(-1))$ FRML IFAM FAM =FAM(-1)*(FAM0/FAM0(-1)*FMZ0(-1)/FMZ(-1)+FAM1/FAM1(-1)*FMZ1(-1)/FMZ(-1)+FAM2/FAM2(-1)* FMZ2(-1)/FMZ(-1)+FAM3Q/FAM3Q(-1)*FMZ3Q(-1)/FMZ(-1)+FAM5/FAM5(-1)* FMZ5(-1)/FMZ59(-1)+FAM6M/FAM6M(-1)*FMZ6M(-1)/FMZ59(-1)+FAM6Q/FAM6Q(-1) *FMZ6Q(-1)/FMZ59(-1)+FAM7Q/FAM7Q(-1)*FMZ7Q(-1)/FMZ59(-1)+FAM8/FAM8(-1) *FMZ8(-1)/FMZ59(-1))$ FRML IPM3 PM3 =M3/FM3$ FRML IPM6 PM6 =M6/FM6$ FRML IPM7 PM7 =M7/FM7$ FRML IPM59 PM59 =M59/FM59$ FRML IPM59X7Y PM59X7Y =M59X7Y/FM59X7Y$ FRML IPMVX3 PMVX3 =MVX3/FMVX3$ FRML IPMST PMST =(MS+MT)/FMST$ FRML IBFM BFM =FM/(FM+FY)$ FRML IBM BM =(M)/(M+Y)$ FRML IBFMZ59 BFMZ59 =(FMZ59/194654.)/FAM59$ FRML IBFMZ BFMZ =(FMZ/251466.)/FAM$ FRML YZFM7BIM ZFM7BIM =AM7BIM*FIM$ FRML YZFMSQS ZFMSQS =AMSQS*FXQS$ 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$ FRML IFX FX =(FXA*PXA(-1)+FXE*PXE(-1)+FXN*PXN(-1)+FXB*PXB(-1)+FXQH*PXQH(-1)+FXQS*PXQS(-1)+FXQT* PXQT(-1)+FXQF*PXQF(-1)+FXQQ*PXQQ(-1)+FXH*PXH(-1)+FXO*PXO(-1))/PX(-1)$ FRML IFXQ FXQ =(FXQH*PXQH(-1)+FXQS*PXQS(-1)+FXQT*PXQT(-1)+FXQF*PXQF(-1)+FXQQ*PXQQ(-1))/PXQ(-1)$ 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$ 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$ 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*PXNG(-1)+FXNE*PXNE(-1)+FXNF*PXNF(-1)+FXNN*PXNN(-1)+FXNB*PXNB(-1)+FXNM*PXNM(-1) +FXNT*PXNT(-1)+FXNK*PXNK(-1)+FXNQ*PXNN(-1))/PXN(-1))/(QNG1+QNE1+QNF1+ QNN1+QNB1+QNM1+QNT1+QNK1+QNQ1)$ FRML IQXQ1 QXQ1 =((FXQH*PXQH(-1)+FXQS*PXQS(-1)+FXQT*PXQT(-1)+FXQF*PXQF(-1)+FXQQ*PXQQ(-1))/PXQ(-1))/( 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/HQO2$ FRML IKQYFQ1 KQYFQ1 =((FYFQH*PYFQH(-1)+FYFQS*PYFQS(-1)+FYFQT*PYFQT(-1)+FYFQF*PYFQF(-1)+FYFQQ*PYFQQ(-1))/ PYFQ(-1))/(HQQH1+HQQS1+HQQT1+HQQF1+HQQQ1)$ FRML IQFY1 QFY1 =FY/Q1$ FRML IQFYF1 QFYF1 =FYF/Q1$ 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$ FRML IEFREK1 EFREK =UA1/U1564$ FRML IEFREK EFREK1 =UA1/UW$ FRML IBFREK1 BFREK =Q1/U1564$ FRML IBFREK BFREK1 =Q1/UW$ FRML IYWP1 YWP1 =YWA1+YWE1+YWNG1+YWNE1+YWNF1+YWNN1+YWNB1+YWNM1+YWNT1+YWNK1+YWNQ1+YWB1+YWQH1+YWQS1+ YWQT1+YWQF1+YWQQ1+YWH1$ FRML IYWQ1 YWQ1 =YWQH1+YWQS1+YWQT1+YWQF1+YWQQ1$ FRML IYRQ1 YRQ1 =YRQH1+YRQS1+YRQT1+YRQF1+YRQQ1$ FRML IYRO2 YRO2 =YRO1$ FRML IYRP1 YRP1 =YR1-YRO2$ FRML IYRO11 YRO11 =IVO1$ FRML IYRP11 YRP11 =YR1-YRO11$ FRML IBYW1 BYW1 =YW1/(YW1+YR1)$ FRML IBYWN1 BYWN1 =YWN1/(YWN1+YRN1)$ FRML IBYWQ1 BYWQ1 =YWQ1/(YWQ1+YRQ1)$ FRML IBYWQS1 BYWQS1 =YWQS1/(YWQS1+YRQS1)$ FRML IBYWO2 BYWO2 =YWO2/(YWO2+YRO1)$ FRML IBYWO11 BYWO11 =YWO11/(YWO11+YRO11)$ FRML IBYWO2 BYWP1 =YWP1/(YWP1+YRP1)$ FRML IBYWO2 BYWP11 =(YW1-YWO11)/((YW1-YWO11)+YRP11)$ FRML ITTYDL TTYDL =TYD/(ULDP*0.001)$ FRML ITYDY TYDY =100.*TYD/Y$ FRML IUOXA UOXA =USU+UAKX+UREV+ULY+UFDP+USXA+USB+UMF+UEF+UOV+UFOX+UFOU+UKXA+UKAK+UFPX+UFPU+UPT$ FRML IUO UO =UOXA+UL+QFP+QFO+QSS+QAK+QLT$ FRML IUOFXA UOFXA =UREV+ULY+UFDP+USS+USB+UMF+UEF+UOV+UFOI+UKXA+UL$ FRML IUOF UOF =UOFXA+UAKX+UKAK$ 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 ISY SY =100.*S/Y$ 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 IYSPY YSPY =100.*YSP/Y$ FRML ISSY SSY =SSY2+SSF+SSSO$ 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 IFYST FYST =(FY*PY(-1)+FM*PM(-1))/PYST(-1)$ FRML IYST YST =(Y)+(M)$ FRML IPYST PYST =YST/FYST$ 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 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$ FRML IRFY RFY =(FY-FY(-1))/FY(-1)$ FRML IAFM AFM =(FM/FM(-1)-1.)*100.*(M(-1)/Y(-1))$ FRML IAFE AFE =(FE/FE(-1)-1.)*100.*(E(-1)/Y(-1))$ FRML IAFCP AFCP =(FCP/FCP(-1)-1.)*100.*(CP(-1)/Y(-1))$ FRML IAFCO AFCO =(FCO/FCO(-1)-1.)*100.*(CO(-1)/Y(-1))$ FRML IAFIP11 AFIP11 =(FIP11/FIP11(-1)-1.)*100.*(IP11(-1)/Y(-1))$ FRML IAFIFP1XH AFIFP1XH =(FIFP1XH1/FIFP1XH1(-1)-1.)*100.*(IFP1XH1(-1)/Y(-1))$ FRML IAFIO11 AFIO11 =(FIO11/FIO11(-1)-1.)*100.*(IO11(-1)/Y(-1))$ FRML IAFIBH AFIBH =(FIBH/FIBH(-1)-1.)*100.*(IBH(-1)/Y(-1))$ FRML IAFIL AFIL =(FIL/FIL(-1)-1.)*100.*(IL(-1)/Y(-1))$ FRML IYFP YFP =YF-YFO$ FRML IFYFP FYFP =(FYF*PYF(-1)-FYFO*PYFO(-1))/PYFP(-1)$ FRML IPYFP PYFP =YFP/FYFP$ FRML IYFP1 YFP1 =YF-YFO11$ FRML IYFQ YFQ =YFQH+YFQS+YFQT+YFQF+YFQQ$ FRML IFYFQ FYFQ =(FYFQH*PYFQH(-1)+FYFQS*PYFQS(-1)+FYFQT*PYFQT(-1)+FYFQF*PYFQF(-1)+FYFQQ*PYFQQ(-1))/ PYFQ(-1)$ FRML IPYFQ PYFQ =YFQ/FYFQ$ 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*(SAFMA+SAFME)*KTAOOS$ FRML ITFOID TASOO =(TYD+TYMFDP+TYPEF+TYPOV+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-TKOUBI)-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+TIIR_Z_OS+TIOR-TIOKR+SIAFO-SIAFOK+SD-SDKK+SASR+ TBPHO+TYPRI-TYPRIK+TAOIS$ FRML IBTIIN_E BTIIN_E =TIIN_E/((WNQ1_E(-1)+WNQ1_E)/2.+(WNB_E(-1)-WLM_E_CF(-1))+WP_CF_E(-1))$ FRML IBTIIN_H BTIIN_H =TIIN_H/((WNQ1_H(-1)+WNQ1_H)/2.+(WNB_H(-1)-WLM_H_CF(-1))+WCP_CF_H(-1))$ FRML IBTIIN_CR BTIIN_CR =TIIN_CR/((WNQ1_CR(-1)+WNQ1_CR)/2.+(WNB_CR(-1)-WLM_CR_CF(-1)))$ FRML IBTIIN_OK BTIIN_OK =TIIN_OK/((WNQ1_OK(-1)+WNQ1_OK)/2.+(WNB_OK(-1)-WLM_OK_CF(-1)))$ FRML IBTIIN_OO BTIIN_OO =TIIN_OO/((WNQ1_OO(-1)+WNQ1_OO)/2.+WNB_OO(-1))$ FRML IBTISUU BTISUU =TISUU/WBE_OS_Z(-1)$ FRML IBTISUI BTISUI =TISUI/WBD_OS_Z(-1)$ FRML IBTIIR_Z_OS BTIIR_Z_OS =TIIR_Z_OS/((WNQ1_OS(-1)+WNQ1_OS)/2.+WB_Z_OS(-1))$ FRML IBTIIN_CF BTIIN_CF =TIIN_CF*2./(WNB_CF+WBM_CF_X+WNQ1_CF+WNB_CF(-1)+WBM_CF_X(-1)+WNQ1_CF(-1))$ 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$ FRML IKENY KENY =100.*KEN/Y$ FRML IFKMAM1 FKMAM1 =0.29101**(0.51000/(1.-0.51000))*(1./DTFKMA1)*((FXA-HOSTKOR)/68665.63080/1.06722)*117304.00000$ FRML IFKMNFM1 FKMNFM1 =0.24005**(0.67000/(1.-0.67000))*(1./DTFKMNF1)*(FXNF/104171.00000/1.08686)*54690.65234$ FRML IFKMNNM1 FKMNNM1 =0.30071**(0.28000/(1.-0.28000))*(1./DTFKMNN1)*(FXNN/12519.00000/1.06121)*5894.19189$ FRML IFKMNBM1 FKMNBM1 =0.21442**(0.50292/(1.-0.50292))*(1./DTFKMNB1)*(FXNB/31585.00000/1.03878)*26210.62891$ FRML IFKMNMM1 FKMNMM1 =0.23478**(0.38909/(1.-0.38909))*(1./DTFKMNM1)*(FXNM/170085.00000/1.08722)*89217.00000$ FRML IFKMNTM1 FKMNTM1 =0.25499**(0.52140/(1.-0.52140))*(1./DTFKMNT1)*(FXNT/17358.00000/1.06351)*6482.00000$ FRML IFKMNKM1 FKMNKM1 =0.30414**(0.45102/(1.-0.45102))*(1./DTFKMNK1)*(FXNK/75161.00000/1.06257)*61856.36719$ FRML IFKMNQM1 FKMNQM1 =0.26795**(0.29031/(1.-0.29031))*(1./DTFKMNQ1)*(FXNQ/86920.00000/1.04927)*60642.70313$ FRML IFKMBM1 FKMBM1 =0.11123**(0.27014/(1.-0.27014))*(1./DTFKMB1)*(FXB/153175.00000/1.01335)*50487.00000$ FRML IFKMQHM1 FKMQHM1 =0.12452**(0.16211/(1.-0.16211))*(1./DTFKMQH1)*(FXQH/228529.00000/1.08502)*159315.79688$ FRML IFKMQTM1 FKMQTM1 =0.48769**(0.38318/(1.-0.38318))*(1./DTFKMQT1)*(FXQT/155453.00000/1.03990)*162944.00000$ FRML IFKMQQM1 FKMQQM1 =0.21237**(0.35000/(1.-0.35000))*(1./DTFKMQQ1)*(FXQQ/352530.00000/0.97596)*218853.96875$ 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$ 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$ FRML IBVEA BVEA =PVEA*FVEA/XA$ FRML IBVEB BVEB =PVEB*FVEB/XB$ FRML IBVENB BVENB =PVENB*FVENB/XNB$ FRML IBVENE BVENE =PVENE*FVENE/XNE$ FRML IBVENF BVENF =PVENF*FVENF/XNF$ FRML IBVENK BVENK =PVENK*FVENK/XNK$ FRML IBVENM BVENM =PVENM*FVENM/XNM$ FRML IBVENN BVENN =PVENN*FVENN/XNN$ FRML IBVENQ BVENQ =PVENQ*FVENQ/XNQ$ FRML IBVENT BVENT =PVENT*FVENT/XNT$ FRML IBVEQF BVEQF =PVEQF*FVEQF/XQF$ FRML IBVEQH BVEQH =PVEQH*FVEQH/XQH$ FRML IBVEQQ BVEQQ =PVEQQ*FVEQQ/XQQ$ FRML IBVEQT BVEQT =PVEQT*FVEQT/XQT$ FRML IBVEO BVEO =PVEO*FVEO/XO$ FRML IBVENG BVENG =PVENG*FVENG/XNG$ FRML IBVEH BVEH =PVEH*FVEH/XH$ FRML IBVEQS BVEQS =PVEQS*FVEQS/XQS$ 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$ FRML IFVEDK FVEDK =FVEX+FVEC$ 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$ 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*HQO2+PVEO*FVEO$ 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$ FRML IFIMN FIMN =(FIMNG*PIMNG(-1)+FIMNE*PIMNE(-1)+FIMNF*PIMNF(-1)+FIMNN*PIMNN(-1)+FIMNB*PIMNB(-1)+ FIMNM*PIMNM(-1)+FIMNT*PIMNT(-1)+FIMNK*PIMNK(-1)+FIMNQ*PIMNQ(-1))/ PIMN(-1)$ FRML IFIMQ FIMQ =(FIMQH*PIMQH(-1)+FIMQS*PIMQS(-1)+FIMQT*PIMQT(-1)+FIMQF*PIMQF(-1)+FIMQQ*PIMQQ(-1))/ PIMQ(-1)$ FRML IFIM2 FIM2 =(FIMNG*PIMNG(-1)+FIMNE*PIMNE(-1)+FIMQS*PIMQS(-1)+FIMQF*PIMQF(-1))/PIM2(-1)$ FRML IFIM3 FIM3 =(FIMA*PIMA(-1)+FIMNF*PIMNF(-1)+FIMNN*PIMNN(-1)+FIMNB*PIMNB(-1)+FIMNM*PIMNM(-1)+FIMNT* PIMNT(-1)+FIMNK*PIMNK(-1)+FIMNQ*PIMNQ(-1)+FIMB*PIMB(-1)+FIMQH*PIMQH(-1) +FIMQT*PIMQT(-1)+FIMQQ*PIMQQ(-1))/PIM3(-1)$ FRML IFIM23 FIM23 =(FIM2*PIM2(-1)+FIM3*PIM3(-1))/PIM23(-1)$ 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$ FRML IKNMN KNMN =KNMNG+KNMNE+KNMNF+KNMNN+KNMNB+KNMNM+KNMNT+KNMNK+KNMNQ$ FRML IKNMQ KNMQ =KNMQH+KNMQS+KNMQT+KNMQF+KNMQQ$ FRML IKNM2 KNM2 =KNMNG+KNMNE+KNMQS+KNMQF$ FRML IKNM3 KNM3 =KNMA+KNMNF+KNMNN+KNMNB+KNMNM+KNMNT+KNMNK+KNMNQ+KNMB+KNMQH+KNMQT+KNMQQ$ FRML IKNM23 KNM23 =KNM2+KNM3$ FRML IKNM KNM =KNMP+KNMO$ FRML IFKMN FKMN =(FKMNG*PIMNG(-1)+FKMNE*PIMNE(-1)+FKMNF*PIMNF(-1)+FKMNN*PIMNN(-1)+FKMNB*PIMNB(-1)+ FKMNM*PIMNM(-1)+FKMNT*PIMNT(-1)+FKMNK*PIMNK(-1)+FKMNQ*PIMNQ(-1))/ PIMN(-1)$ FRML IFKMQ FKMQ =(FKMQH*PIMQH(-1)+FKMQS*PIMQS(-1)+FKMQT*PIMQT(-1)+FKMQF*PIMQF(-1)+FKMQQ*PIMQQ(-1))/ PIMQ(-1)$ FRML IFKMP FKMP =(FKMA*PIMA(-1)+FKME*PIME(-1)+FKMNG*PIMNG(-1)+FKMNE*PIMNE(-1)+FKMNF*PIMNF(-1)+FKMNN* PIMNN(-1)+FKMNB*PIMNB(-1)+FKMNM*PIMNM(-1)+FKMNT*PIMNT(-1)+FKMNK* PIMNK(-1)+FKMNQ*PIMNQ(-1)+FKMB*PIMB(-1)+FKMQH*PIMQH(-1)+FKMQS*PIMQS(-1) +FKMQT*PIMQT(-1)+FKMQF*PIMQF(-1)+FKMQQ*PIMQQ(-1)+FKMH*PIMH(-1))/PIMP(-1)$ FRML IFKM2 FKM2 =(FKMNG*PIMNG(-1)+FKMNE*PIMNE(-1)+FKMQS*PIMQS(-1)+FKMQF*PIMQF(-1))/PIM2(-1)$ FRML IFKM3 FKM3 =(FKMA*PIMA(-1)+FKMNF*PIMNF(-1)+FKMNN*PIMNN(-1)+FKMNB*PIMNB(-1)+FKMNM*PIMNM(-1)+FKMNT* PIMNT(-1)+FKMNK*PIMNK(-1)+FKMNQ*PIMNQ(-1)+FKMB*PIMB(-1)+FKMQH*PIMQH(-1) +FKMQT*PIMQT(-1)+FKMQQ*PIMQQ(-1))/PIM3(-1)$ FRML IFKM23 FKM23 =(FKM2*PIM2(-1)+FKM3*PIM3(-1))/PIM23(-1)$ FRML IFKM FKM =(FKMP*PIMP(-1)+FKMO*PIMO(-1))/PIM(-1)$ FRML IFKM3M1 FKM3M1 =(FKMAM1*PIMA(-1)+FKMQQM1*PIMQQ(-1)+FKMQHM1*PIMQH(-1)+FKMNMM1*PIMNM(-1)+FKMQTM1*PIMQT(-1) +FKMBM1*PIMB(-1)+FKMNQM1*PIMNQ(-1)+FKMNFM1*PIMNF(-1)+FKMNBM1*PIMNB(-1) +FKMNKM1*PIMNK(-1)+FKMNTM1*PIMNT(-1)+FKMNNM1*PIMNN(-1))/PIM3(-1)$ FRML IFKM3K FKM3K =(FKMAK*PIMA(-1)+FKMQQK*PIMQQ(-1)+FKMQHK*PIMQH(-1)+FKMNMK*PIMNM(-1)+FKMQTK*PIMQT(-1)+ FKMBK*PIMB(-1)+FKMNQK*PIMNQ(-1)+FKMNFK*PIMNF(-1)+FKMNBK*PIMNB(-1)+ FKMNKK*PIMNK(-1)+FKMNTK*PIMNT(-1)+FKMNNK*PIMNN(-1))/PIM3(-1)$ FRML IUIMN UIMN =(UIMNG*FKMNG*PIMNG(-1)+UIMNE*FKMNE*PIMNE(-1)+UIMNF*FKMNF*PIMNF(-1)+UIMNN*FKMNN*PIMNN(-1) +UIMNB*FKMNB*PIMNB(-1)+UIMNM*FKMNM*PIMNM(-1)+UIMNT*FKMNT*PIMNT(-1)+ UIMNK*FKMNK*PIMNK(-1)+UIMNQ*FKMNQ*PIMNQ(-1))/(FKMN*PIMN(-1))$ FRML IUIMQ UIMQ =(UIMQH*FKMQH*PIMQH(-1)+UIMQS*FKMQS*PIMQS(-1)+UIMQT*FKMQT*PIMQT(-1)+UIMQF*FKMQF*PIMQF(-1) +UIMQQ*FKMQQ*PIMQQ(-1))/(FKMQ*PIMQ(-1))$ FRML IUIMP UIMP =(UIMA*FKMA*PIMA(-1)+UIME*FKME*PIME(-1)+UIMNG*FKMNG*PIMNG(-1)+UIMNE*FKMNE*PIMNE(-1)+ UIMNF*FKMNF*PIMNF(-1)+UIMNN*FKMNN*PIMNN(-1)+UIMNB*FKMNB*PIMNB(-1)+ UIMNM*FKMNM*PIMNM(-1)+UIMNT*FKMNT*PIMNT(-1)+UIMNK*FKMNK*PIMNK(-1)+ UIMNQ*FKMNQ*PIMNQ(-1)+UIMB*FKMB*PIMB(-1)+UIMQH*FKMQH*PIMQH(-1)+UIMQS* FKMQS*PIMQS(-1)+UIMQT*FKMQT*PIMQT(-1)+UIMQF*FKMQF*PIMQF(-1)+UIMQQ* FKMQQ*PIMQQ(-1)+UIMH*FKMH*PIMH(-1))/(FKMP*PIMP(-1))$ FRML IUIM2 UIM2 =(UIMNG*FKMNG*PIMNG(-1)+UIMNE*FKMNE*PIMNE(-1)+UIMQS*FKMQS*PIMQS(-1)+UIMQF*FKMQF*PIMQF(-1) )/(FKM2*PIM2(-1))$ FRML IUIM3 UIM3 =(UIMA*FKMA*PIMA(-1)+UIMNF*FKMNF*PIMNF(-1)+UIMNN*FKMNN*PIMNN(-1)+UIMNB*FKMNB*PIMNB(-1) +UIMNM*FKMNM*PIMNM(-1)+UIMNT*FKMNT*PIMNT(-1)+UIMNK*FKMNK*PIMNK(-1)+ UIMNQ*FKMNQ*PIMNM(-1)+UIMB*FKMB*PIMB(-1)+UIMQH*FKMQH*PIMQH(-1)+UIMQT* FKMQT*PIMQT(-1)+UIMQQ*FKMQQ*PIMQQ(-1))/(FKM3*PIM3(-1))$ FRML IUIM23 UIM23 =(UIM2*FKM2*PIM2(-1)+UIM3*FKM3*PIM3(-1))/(FKM23*PIM23(-1))$ FRML IUIM UIM =(UIMA*FKMA*PIMA(-1)+UIME*FKME*PIME(-1)+UIMNG*FKMNG*PIMNG(-1)+UIMNE*FKMNE*PIMNE(-1)+ UIMNF*FKMNF*PIMNF(-1)+UIMNN*FKMNN*PIMNN(-1)+UIMNB*FKMNB*PIMNB(-1)+ UIMNM*FKMNM*PIMNM(-1)+UIMNT*FKMNT*PIMNT(-1)+UIMNK*FKMNK*PIMNK(-1)+ UIMNQ*FKMNQ*PIMNQ(-1)+UIMB*FKMB*PIMB(-1)+UIMQH*FKMQH*PIMQH(-1)+UIMQS* FKMQS*PIMQS(-1)+UIMQT*FKMQT*PIMQT(-1)+UIMQF*FKMQF*PIMQF(-1)+UIMQQ* FKMQQ*PIMQQ(-1)+UIMH*FKMH*PIMH(-1)+UIMO*FKMO*PIMO(-1))/(FKM*PIM(-1))$ FRML IDTFKMN1 DTFKMN1 =(DTFKMNG1*FKMNG*PIMNG(-1)+DTFKMNE1*FKMNE*PIMNE(-1)+DTFKMNF1*FKMNF*PIMNF(-1)+DTFKMNN1* FKMNN*PIMNN(-1)+DTFKMNB1*FKMNB*PIMNB(-1)+DTFKMNM1*FKMNM*PIMNM(-1)+ DTFKMNT1*FKMNT*PIMNT(-1)+DTFKMNK1*FKMNK*PIMNK(-1)+DTFKMNQ1*FKMNQ* PIMNQ(-1))/(FKMN*PIMN(-1))$ FRML IDTFKMQ1 DTFKMQ1 =(DTFKMQH1*FKMQH*PIMQH(-1)+DTFKMQS1*FKMQS*PIMQS(-1)+DTFKMQT1*FKMQT*PIMQT(-1)+DTFKMQF1* FKMQF*PIMQF(-1)+DTFKMQQ1*FKMQQ*PIMQQ(-1))/(FKMQ*PIMQ(-1))$ FRML IDTFKMP1 DTFKMP1 =(DTFKMA1*FKMA*PIMA(-1)+DTFKME*FKME*PIME(-1)+DTFKMNG1*FKMNG*PIMNG(-1)+DTFKMNE1*FKMNE* PIMNE(-1)+DTFKMNF1*FKMNF*PIMNF(-1)+DTFKMNN1*FKMNN*PIMNF(-1)+DTFKMNB1* FKMNB*PIMNB(-1)+DTFKMNM1*FKMNM*PIMNM(-1)+DTFKMNT1*FKMNT*PIMNT(-1)+ DTFKMNK1*FKMNK*PIMNK(-1)+DTFKMNQ1*FKMNQ*PIMNQ(-1)+DTFKMB1*FKMB*PIMB(-1) +DTFKMQH1*FKMQH*PIMQH(-1)+DTFKMQS1*FKMQS*PIMQS(-1)+DTFKMQT1*FKMQT* PIMQT(-1)+DTFKMQF1*FKMQF*PIMQF(-1)+DTFKMQQ1*FKMQQ*PIMQQ(-1)+DTFKMH* FKMH*PIMH(-1))/(FKMP*PIMP(-1))$ FRML IDTFKM21 DTFKM21 =(DTFKMNG1*FKMNG*PIMNG(-1)+DTFKMNE1*FKMNE*PIMNE(-1)+DTFKMQS1*FKMQS*PIMQS(-1)+DTFKMQF1* FKMQF*PIMQF(-1))/(FKM2*PIM2(-1))$ FRML IDTFKM31 DTFKM31 =(DTFKMA1*FKMA*PIMA(-1)+DTFKMNF1*FKMNF*PIMNF(-1)+DTFKMNN1*FKMNN*PIMNN(-1)+DTFKMNB1* FKMNB*PIMNB(-1)+DTFKMNM1*FKMNM*PIMNM(-1)+DTFKMNT1*FKMNT*PIMNT(-1)+ DTFKMNK1*FKMNK*PIMNK(-1)+DTFKMNQ1*FKMNQ*PIMNQ(-1)+DTFKMB1*FKMB*PIMB(-1) +DTFKMQH1*FKMQH*PIMQH(-1)+DTFKMQT1*FKMQT*PIMQT(-1)+DTFKMQQ1*FKMQQ* PIMQQ(-1))/(FKM3*PIM3(-1))$ FRML IDTFKM231 DTFKM231 =(DTFKM21*FKM2*PIM2(-1)+DTFKM31*FKM3*PIM3(-1))/(FKM23*PIM23(-1))$ FRML IFKMNW1 FKMNW1 =(FKMNGW1*PIMNG(-1)+FKMNEW1*PIMNE(-1)+FKMNFW1*PIMNF(-1)+FKMNNW1*PIMNN(-1)+FKMNBW1* PIMNB(-1)+FKMNMW1*PIMNM(-1)+FKMNTW1*PIMNT(-1)+FKMNKW1*PIMNK(-1)+ FKMNQW1*PIMNQ(-1))/PIMN(-1)$ FRML IFKMQW1 FKMQW1 =(FKMQHW1*PIMQH(-1)+FKMQSW1*PIMQS(-1)+FKMQTW1*PIMQT(-1)+FKMQFW1*PIMQF(-1)+FKMQQW1* PIMQQ(-1))/PIMQ(-1)$ FRML IFKM2W1 FKM2W1 =(FKMNGW1*PIMNG(-1)+FKMNEW1*PIMNE(-1)+FKMQSW1*PIMQS(-1)+FKMQFW1*PIMQF(-1))/PIM2(-1)$ FRML IFKM3W1 FKM3W1 =(FKMAW1*PIMA(-1)+FKMNFW1*PIMNF(-1)+FKMNNW1*PIMNN(-1)+FKMNBW1*PIMNB(-1)+FKMNMW1*PIMNM(-1) +FKMNTW1*PIMNT(-1)+FKMNKW1*PIMNK(-1)+FKMNQW1*PIMNQ(-1)+FKMBW1*PIMB(-1) +FKMQHW1*PIMQH(-1)+FKMQTW1*PIMQT(-1)+FKMQQW1*PIMQQ(-1))/PIM3(-1)$ FRML IFKM23W1 FKM23W1 =(FKM2W1*PIM2(-1)+FKM3W1*PIM3(-1))/PIM23(-1)$ FRML IROFKM31 ROFKM31 =(ROFKMA1*FKMA*PIMA(-1)+ROFKMNF1*FKMNF*PIMNF(-1)+ROFKMNN1*FKMNN*PIMNN(-1)+ROFKMNB1* FKMNB*PIMNB(-1)+ROFKMNM1*FKMNM*PIMNM(-1)+ROFKMNT1*FKMNT*PIMNT(-1)+ ROFKMNK1*FKMNK*PIMNK(-1)+ROFKMNQ1*FKMNQ*PIMNQ(-1)+ROFKMB1*FKMB*PIMB(-1) +ROFKMQH1*FKMQH*PIMQH(-1)+ROFKMQT1*FKMQT*PIMQT(-1)+ROFKMQQ1*FKMQQ* PIMQQ(-1))/(FKM3*PIM3(-1))$ FRML IFIBN FIBN =(FIBNG*PIBNG(-1)+FIBNE*PIBNE(-1)+FIBNF*PIBNF(-1)+FIBNN*PIBNN(-1)+FIBNB*PIBNB(-1)+ FIBNM*PIBNM(-1)+FIBNT*PIBNT(-1)+FIBNK*PIBNK(-1)+FIBNQ*PIBNQ(-1))/ PIBN(-1)$ FRML IFIBQ FIBQ =(FIBQH*PIBQH(-1)+FIBQS*PIBQS(-1)+FIBQT*PIBQT(-1)+FIBQF*PIBQF(-1)+FIBQQ*PIBQQ(-1))/ PIBP(-1)$ FRML IFIB3 FIB3 =(FIBA*PIBA(-1)+FIBNF*PIBNF(-1)+FIBNN*PIBNN(-1)+FIBNB*PIBNB(-1)+FIBNM*PIBNM(-1)+FIBNT* PIBNT(-1)+FIBNK*PIBNK(-1)+FIBNQ*PIBNQ(-1)+FIBB*PIBB(-1)+FIBQH*PIBQH(-1) +FIBQT*PIBQT(-1)+FIBQQ*PIBQQ(-1))/PIB3(-1)$ FRML IFIB2 FIB2 =(FIBNG*PIBNG(-1)+FIBNE*PIBNE(-1)+FIBQS*PIBQS(-1)+FIBQF*PIBQF(-1))/PIB2(-1)$ FRML IFIB23 FIB23 =(FIB2*PIB2(-1)+FIB3*PIB3(-1))/PIB23(-1)$ 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 =IB2+IB3$ 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$ FRML IFKBN FKBN =(FKBNG*PIBNG(-1)+FKBNE*PIBNE(-1)+FKBNF*PIBNF(-1)+FKBNN*PIBNN(-1)+FKBNB*PIBNB(-1)+ FKBNM*PIBNM(-1)+FKBNT*PIBNT(-1)+FKBNK*PIBNK(-1)+FKBNQ*PIBNQ(-1))/ PIBN(-1)$ FRML IFKBQ FKBQ =(FKBQH*PIBQH(-1)+FKBQS*PIBQS(-1)+FKBQT*PIBQT(-1)+FKBQF*PIBQF(-1)+FKBQQ*PIBQQ(-1))/ PIBQ(-1)$ FRML IFKBP FKBP =(FKBA*PIBA(-1)+FKBE*PIBE(-1)+FKBNG*PIBNG(-1)+FKBNE*PIBNE(-1)+FKBNF*PIBNF(-1)+FKBNN* PIBNN(-1)+FKBNB*PIBNB(-1)+FKBNM*PIBNM(-1)+FKBNT*PIBNT(-1)+FKBNK* PIBNK(-1)+FKBNQ*PIBNQ(-1)+FKBB*PIBB(-1)+FKBQH*PIBQH(-1)+FKBQS*PIBQS(-1) +FKBQT*PIBQT(-1)+FKBQF*PIBQF(-1)+FKBQQ*PIBQQ(-1))/PIBP(-1)$ FRML IFKB2 FKB2 =(FKBNG*PIBNG(-1)+FKBNE*PIBNE(-1)+FKBQS*PIBQS(-1)+FKBQF*PIBQF(-1))/PIB2(-1)$ FRML IFKB3 FKB3 =(FKBA*PIBA(-1)+FKBNF*PIBNF(-1)+FKBNN*PIBNN(-1)+FKBNB*PIBNB(-1)+FKBNM*PIBNM(-1)+FKBNT* PIBNT(-1)+FKBNK*PIBNK(-1)+FKBNQ*PIBNQ(-1)+FKBB*PIBB(-1)+FKBQH*PIBQH(-1) +FKBQT*PIBQT(-1)+FKBQQ*PIBQQ(-1))/PIB3(-1)$ FRML IFKB23 FKB23 =(FKB2*PIB2(-1)+FKB3*PIB3(-1))/PIB23(-1)$ FRML IFKB FKB =(FKBP*PIBP(-1)+FKBH*PIBH(-1)+FKBO*PIBO(-1))/PIB(-1)$ FRML IKNB KNB =KNBA+KNBE+KNBNG+KNBNE+KNBNF+KNBNN+KNBNB+KNBNM+KNBNT+KNBNK+KNBNQ+KNBB+KNBQH+KNBQS+ KNBQT+KNBQF+KNBQQ+KNBH+KNBO$ FRML IUIBN UIBN =(UIBNG*FKBNG*PIBNG(-1)+UIBNE*FKBNE*PIBNE(-1)+UIBNF*FKBNF*PIBNF(-1)+UIBNN*FKBNN*PIBNN(-1) +UIBNB*FKBNB*PIBNB(-1)+UIBNM*FKBNM*PIBNM(-1)+UIBNT*FKBNT*PIBNT(-1)+ UIBNK*FKBNK*PIBNK(-1)+UIBNQ*FKBNQ*PIBNQ(-1))/(FKBN*PIBN(-1))$ FRML IUIBQ UIBQ =(UIBQH*FKBQH*PIBQH(-1)+UIBQS*FKBQS*PIBQS(-1)+UIBQT*FKBQT*PIBQT(-1)+UIBQF*FKBQF*PIBQF(-1) +UIBQQ*FKBQQ*PIBQQ(-1))/(FKBQ*PIBQ(-1))$ FRML IUIBP UIBP =(UIBA*FKBA*PIBA(-1)+UIBE*FKBE*PIBE(-1)+UIBNG*FKBNG*PIBNG(-1)+UIBNE*FKBNE*PIBNE(-1)+ UIBNF*FKBNF*PIBNF(-1)+UIBNN*FKBNN*PIBNN(-1)+UIBNB*FKBNB*PIBNB(-1)+ UIBNM*FKBNM*PIBNM(-1)+UIBNT*FKBNT*PIBNT(-1)+UIBNK*FKBNK*PIBNK(-1)+ UIBNQ*FKBNQ*PIBNQ(-1)+UIBB*FKBB*PIBB(-1)+UIBQH*FKBQH*PIBQH(-1)+UIBQS* FKBQS*PIBQS(-1)+UIBQT*FKBQT*PIBQT(-1)+UIBQF*FKBQF*PIBQF(-1)+UIBQQ* FKBQQ*PIBQQ(-1))/(FKBP*PIBP(-1))$ FRML IUIB2 UIB2 =(UIBNG*FKBNG*PIBNG(-1)+UIBNE*FKBNE*PIBNE(-1)+UIBQS*FKBQS*PIBQS(-1)+UIBQF*FKBQF*PIBQF(-1) )/(FKB2*PIB2(-1))$ FRML IUIB3 UIB3 =(UIBA*FKBA*PIBA(-1)+UIBNF*FKBNF*PIBNF(-1)+UIBNN*FKBNN*PIBNN(-1)+UIBNB*FKBNB*PIBNB(-1) +UIBNM*FKBNM*PIBNM(-1)+UIBNT*FKBNT*PIBNT(-1)+UIBNK*FKBNK*PIBNK(-1)+ UIBNQ*FKBNQ*PIBNQ(-1)+UIBB*FKBB*PIBB(-1)+UIBQH*FKBQH*PIBQH(-1)+UIBQT* FKBQT*PIBQT(-1)+UIBQQ*FKBQQ*PIBQQ(-1))/(FKB3*PIB3(-1))$ FRML IUIB23 UIB23 =(UIB2*FKB2*PIB2(-1)+UIB3*FKB3*PIB3(-1))/(FKB23*PIB23(-1))$ FRML IUIB UIB =(UIBA*FKBA*PIBA(-1)+UIBE*FKBE*PIBE(-1)+UIBNG*FKBNG*PIBNG(-1)+UIBNE*FKBNE*PIBNE(-1)+ UIBNF*FKBNF*PIBNF(-1)+UIBNN*FKBNN*PIBNN(-1)+UIBNB*FKBNB*PIBNB(-1)+ UIBNM*FKBNM*PIBNM(-1)+UIBNT*FKBNT*PIBNT(-1)+UIBNK*FKBNK*PIBNK(-1)+ UIBNQ*FKBNQ*PIBNQ(-1)+UIBB*FKBB*PIBB(-1)+UIBQH*FKBQH*PIBQH(-1)+UIBQS* FKBQS*PIBQS(-1)+UIBQT*FKBQT*PIBQT(-1)+UIBQF*FKBQF*PIBQF(-1)+UIBQQ* FKBQQ*PIBQQ(-1)+UIBH*FKBH*PIBH(-1)+UIBO*FKBO*PIBO(-1))/(FKB*PIB(-1))$ FRML IDTFKBN DTFKBN =(DTFKBNG*FKBNG*PIBNG(-1)+DTFKBNE1*FKBNE*PIBNE(-1)+DTFKBNF*FKBNF*PIBNF(-1)+DTFKBNN* FKBNN*PIBNN(-1)+DTFKBNB*FKBNB*PIBNB(-1)+DTFKBNM*FKBNM*PIBNM(-1)+ DTFKBNT*FKBNT*PIBNT(-1)+DTFKBNK*FKBNK*PIBNK(-1)+DTFKBNQ*FKBNQ*PIBNQ(-1) )/(FKBN*PIBN(-1))$ FRML IDTFKBQ DTFKBQ =(DTFKBQH*FKBQH*PIBQH(-1)+DTFKBQS*FKBQS*PIBQS(-1)+DTFKBQT*FKBQT*PIBA(-1)+DTFKBQF* FKBQF*PIBQF(-1)+DTFKBQQ*FKBQQ*PIBQQ(-1))/(FKBQ*PIBQ(-1))$ FRML IDTFKB2 DTFKB2 =(DTFKBNG*FKBNG*PIBNG(-1)+DTFKBNE1*FKBNE*PIBNE(-1)+DTFKBQS*FKBQS*PIBQS(-1)+DTFKBQF* FKBQF*PIBQF(-1))/(FKB2*PIB2(-1))$ FRML IDTFKB3 DTFKB3 =(DTFKBA*FKBA*PIBA(-1)+DTFKBNF*FKBNF*PIBNF(-1)+DTFKBNN*FKBNN*PIBNN(-1)+DTFKBNB*FKBNB* PIBNB(-1)+DTFKBNM*FKBNM*PIBNM(-1)+DTFKBNT*FKBNT*PIBNT(-1)+DTFKBNK* FKBNK*PIBNK(-1)+DTFKBNQ*FKBNQ*PIBNQ(-1)+DTFKBB*FKBB*PIBB(-1)+DTFKBQH* FKBQH*PIBQH(-1)+DTFKBQT*FKBQT*PIBQT(-1)+DTFKBQQ*FKBQQ*PIBQQ(-1))/( FKB3*PIB3(-1))$ FRML IDTFKB23 DTFKB23 =(DTFKB2*FKB2*PIB2(-1)+DTFKB3*FKB3*PIB3(-1))/(FKB23*PIB23(-1))$ FRML IFKBNW FKBNW =(FKBNGW*PIBNG(-1)+FKBNEW1*PIBNE(-1)+FKBNFW*PIBNF(-1)+FKBNNW*PIBNN(-1)+FKBNBW*PIBNB(-1) +FKBNMW*PIBNM(-1)+FKBNTW*PIBNT(-1)+FKBNKW*PIBNK(-1)+FKBNQW*PIBNQ(-1)) /PIBN(-1)$ FRML IFKBQW FKBQW =(FKBQHW*PIBQH(-1)+FKBQSW*PIBQS(-1)+FKBQTW*PIBQT(-1)+FKBQFW*PIBQF(-1)+FKBQQW*PIBQQ(-1) )/PIBQ(-1)$ FRML IFKB2W FKB2W =(FKBNGW*PIBNG(-1)+FKBNEW1*PIBNE(-1)+FKBQSW*PIBQS(-1)+FKBQFW*PIBQF(-1))/PIB2(-1)$ FRML IFKB3W FKB3W =(FKBAW*PIBA(-1)+FKBNFW*PIBNF(-1)+FKBNNW*PIBNN(-1)+FKBNBW*PIBNB(-1)+FKBNMW*PIBNM(-1)+ FKBNTW*PIBNT(-1)+FKBNKW*PIBNK(-1)+FKBNQW*PIBNQ(-1)+FKBBW*PIBB(-1)+ FKBQHW*PIBQH(-1)+FKBQTW*PIBQT(-1)+FKBQQW*PIBQQ(-1))/PIB3(-1)$ FRML IFKB23W FKB23W =(FKB2W*PIB2(-1)+FKB3W*PIB3(-1))/PIB23(-1)$ FRML IROFKB3 ROFKB3 =(ROFKBA*FKBA*PIBA(-1)+ROFKBNF*FKBNF*PIBNF(-1)+ROFKBNN*FKBNN*PIBNN(-1)+ROFKBNB*FKBNB* PIBNB(-1)+ROFKBNM*FKBNM*PIBNM(-1)+ROFKBNT*FKBNT*PIBNT(-1)+ROFKBNK* FKBNK*PIBNK(-1)+ROFKBNQ*FKBNQ*PIBNQ(-1)+ROFKBB*FKBB*PIBB(-1)+ROFKBQH* FKBQH*PIBQH(-1)+ROFKBQT*FKBQT*PIBQT(-1)+ROFKBQQ*FKBQQ*PIBQQ(-1))/( FKB3*PIB3(-1))$ FRML IIFA IFA =IMA+IBA$ FRML IIFE IFE =IME+IBE$ FRML IIFNB IFNB =IMNB+IBNB$ FRML IIFNG IFNG =IMNG+IBNG$ FRML IIFNE IFNE =IMNE+IBNE$ FRML IIFNF IFNF =IMNF+IBNF$ FRML IIFNN IFNN =IMNN+IBNN$ FRML IIFNK IFNK =IMNK+IBNK$ FRML IIFNM IFNM =IMNM+IBNM$ FRML IIFNT IFNT =IMNT+IBNT$ FRML IIFNQ IFNQ =IMNQ+IBNQ$ FRML IIFB IFB =IMB+IBB$ FRML IIFQH IFQH =IMQH+IBQH$ FRML IIFQS IFQS =IMQS+IBQS$ FRML IIFQT IFQT =IMQT+IBQT$ FRML IIFQF IFQF =IMQF+IBQF$ FRML IIFQQ IFQQ =IMQQ+IBQQ$ FRML IIFH IFH =IMH+IBH$ FRML IFIFA FIFA =(FIMA*PIMA(-1)+FIBA*PIBA(-1))/PIFA(-1)$ FRML IFIFE FIFE =(FIME*PIME(-1)+FIBE*PIBE(-1))/PIFE(-1)$ FRML IFIFNB FIFNB =(FIMNB*PIMNB(-1)+FIBNB*PIBNB(-1))/PIFNB(-1)$ FRML IFIFNG FIFNG =(FIMNG*PIMNG(-1)+FIBNG*PIBNG(-1))/PIFNG(-1)$ FRML IFIFNE FIFNE =(FIMNE*PIMNE(-1)+FIBNE*PIBNE(-1))/PIFNE(-1)$ FRML IFIFNF FIFNF =(FIMNF*PIMNF(-1)+FIBNF*PIBNF(-1))/PIFNF(-1)$ FRML IFIFNN FIFNN =(FIMNN*PIMNN(-1)+FIBNN*PIBNN(-1))/PIFNN(-1)$ FRML IFIFNK FIFNK =(FIMNK*PIMNK(-1)+FIBNK*PIBNK(-1))/PIFNK(-1)$ FRML IFIFNM FIFNM =(FIMNM*PIMNM(-1)+FIBNM*PIBNM(-1))/PIFNM(-1)$ FRML IFIFNT FIFNT =(FIMNT*PIMNT(-1)+FIBNT*PIBNT(-1))/PIFNT(-1)$ FRML IFIFNQ FIFNQ =(FIMNQ*PIMNQ(-1)+FIBNQ*PIBNQ(-1))/PIFNQ(-1)$ FRML IFIFB FIFB =(FIMB*PIMB(-1)+FIBB*PIBB(-1))/PIFB(-1)$ FRML IFIFQH FIFQH =(FIMQH*PIMQH(-1)+FIBQH*PIBQH(-1))/PIFQH(-1)$ FRML IFIFQS FIFQS =(FIMQS*PIMQS(-1)+FIBQS*PIBQS(-1))/PIFQS(-1)$ FRML IFIFQT FIFQT =(FIMQT*PIMQT(-1)+FIBQT*PIBQT(-1))/PIFQT(-1)$ FRML IFIFQF FIFQF =(FIMQF*PIMQF(-1)+FIBQF*PIBQF(-1))/PIFQF(-1)$ FRML IFIFQQ FIFQQ =(FIMQQ*PIMQQ(-1)+FIBQQ*PIBQQ(-1))/PIFQQ(-1)$ FRML IFIFH FIFH =(FIMH*PIMH(-1)+FIBH*PIBH(-1))/PIFH(-1)$ FRML IPIFA PIFA =IFA/FIFA$ FRML IPIFE PIFE =IFE/FIFE$ FRML IPIFNB PIFNB =IFNB/FIFNB$ FRML IPIFNG PIFNG =IFNG/FIFNG$ FRML IPIFNE PIFNE =IFNE/FIFNE$ FRML IPIFNF PIFNF =IFNF/FIFNF$ FRML IPIFNN PIFNN =IFNN/FIFNN$ FRML IPIFNK PIFNK =IFNK/FIFNK$ FRML IPIFNM PIFNM =IFNM/FIFNM$ FRML IPIFNT PIFNT =IFNT/FIFNT$ FRML IPIFNQ PIFNQ =IFNQ/FIFNQ$ FRML IPIFB PIFB =IFB/FIFB$ FRML IPIFQH PIFQH =IFQH/FIFQH$ FRML IPIFQS PIFQS =IFQS/FIFQS$ FRML IPIFQT PIFQT =IFQT/FIFQT$ FRML IPIFQF PIFQF =IFQF/FIFQF$ FRML IPIFQQ PIFQQ =IFQQ/FIFQQ$ FRML IPIFH PIFH =IFH/FIFH$ FRML IFKA FKA =(FKMA*PIMA(-1)+FKBA*PIBA(-1))/PIFA(-1)$ FRML IFKE FKE =(FKME*PIME(-1)+FKBE*PIBE(-1))/PIFE(-1)$ FRML IFKNB FKNB =(FKMNB*PIMNB(-1)+FKBNB*PIBNB(-1))/PIFNB(-1)$ FRML IFKNG FKNG =(FKMNG*PIMNG(-1)+FKBNG*PIBNG(-1))/PIFNG(-1)$ FRML IFKNE FKNE =(FKMNE*PIMNE(-1)+FKBNE*PIBNE(-1))/PIFNE(-1)$ FRML IFKNF FKNF =(FKMNF*PIMNF(-1)+FKBNF*PIBNF(-1))/PIFNF(-1)$ FRML IFKNN FKNN =(FKMNN*PIMNN(-1)+FKBNN*PIBNN(-1))/PIFNN(-1)$ FRML IFKNK FKNK =(FKMNK*PIMNK(-1)+FKBNK*PIBNK(-1))/PIFNK(-1)$ FRML IFKNM FKNM =(FKMNM*PIMNM(-1)+FKBNM*PIBNM(-1))/PIFNM(-1)$ FRML IFKNT FKNT =(FKMNT*PIMNT(-1)+FKBNT*PIBNT(-1))/PIFNT(-1)$ FRML IFKNQ FKNQ =(FKMNQ*PIMNQ(-1)+FKBNQ*PIBNQ(-1))/PIFNQ(-1)$ FRML IFKB FKB1 =(FKMB*PIMB(-1)+FKBB*PIBB(-1))/PIFB(-1)$ FRML IFKQH FKQH =(FKMQH*PIMQH(-1)+FKBQH*PIBQH(-1))/PIFQH(-1)$ FRML IFKQS FKQS =(FKMQS*PIMQS(-1)+FKBQS*PIBQS(-1))/PIFQS(-1)$ FRML IFKQT FKQT =(FKMQT*PIMQT(-1)+FKBQT*PIBQT(-1))/PIFQT(-1)$ FRML IFKQF FKQF =(FKMQF*PIMQF(-1)+FKBQF*PIBQF(-1))/PIFQF(-1)$ FRML IFKQQ FKQQ =(FKMQQ*PIMQQ(-1)+FKBQQ*PIBQQ(-1))/PIFQQ(-1)$ FRML IFKH FKH =(FKMH*PIMH(-1)+FKBH*PIBH(-1))/PIFH(-1)$ FRML IKNA KNA =KNMA+KNBA$ FRML IKNE KNE =KNME+KNBE$ FRML IKNNB KNNB =KNMNB+KNBNB$ FRML IKNNG KNNG =KNMNG+KNBNG$ FRML IKNNE KNNE =KNMNE+KNBNE$ FRML IKNNF KNNF =KNMNF+KNBNF$ FRML IKNNN KNNN =KNMNN+KNBNN$ FRML IKNNK KNNK =KNMNK+KNBNK$ FRML IKNNM KNNM =KNMNM+KNBNM$ FRML IKNNT KNNT =KNMNT+KNBNT$ FRML IKNNQ KNNQ =KNMNQ+KNBNQ$ FRML IKNB KNB1 =KNMB+KNBB$ FRML IKNQH KNQH =KNMQH+KNBQH$ FRML IKNQS KNQS =KNMQS+KNBQS$ FRML IKNQT KNQT =KNMQT+KNBQT$ FRML IKNQF KNQF =KNMQF+KNBQF$ FRML IKNQQ KNQQ =KNMQQ+KNBQQ$ FRML IKNH KNH1 =KNMH+KNBH$ FRML IKN KN =KNMP+KNBP+KNBH+KNMO+KNBO$ FRML IKNP KNP =KNMP+KNBP+KNBH$ FRML IKNPXH KNPXH =KNMP+KNBP$ FRML IKNO KNO =KNMO+KNBO$ FRML IFK FK =(FKMP*PIMP(-1)+FKBP*PIBP(-1)+FKBH*PIBH(-1)+FKMO*PIMO(-1)+FKBO*PIBO(-1))/PIF(-1)$ FRML IFKP FKP =(FKMP*PIMP(-1)+FKBP*PIBP(-1)+FKBH*PIBH(-1))/PIFP(-1)$ FRML IFKPXH FKPXH =(FKMP*PIMP(-1)+FKBP*PIBP(-1))/PIFPXH(-1)$ FRML IFKO FKO =(FKMO*PIMO(-1)+FKBO*PIBO(-1))/PIO(-1)$ 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+HQO2$ 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$ 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$ FRML IHGW HGW =(QWA1*HGWA+QWE1*HGWE+QWNG1*HGWNG+QWNE1*HGWNE+QWNF1*HGWNF+QWNN1*HGWNN+QWNB1*HGWNB+ QWNM1*HGWNM+QWNT1*HGWNT+QWNK1*HGWNK+QWNQ1*HGWNQ+QWB1*HGWB+QWQH1* HGWQH+QWQS1*HGWQS+QWQT1*HGWQT+QWQF1*HGWQF+QWQQ1*HGWQQ+QWH1*HGWH+QWO2* HGWO)/(QWA1+QWE1+QWNG1+QWNE1+QWNF1+QWNN1+QWNB1+QWNM1+QWNT1+QWNK1+ QWNQ1+QWB1+QWQH1+QWQS1+QWQT1+QWQF1+QWQQ1+QWH1+QWO2)$ FRML IHGS HGS =(QSA1*HGSA+QSNF1*HGSNF+QSNN1*HGSNN+QSNB1*HGSNB+QSNM1*HGSNM+QSNT1*HGSNT+QSNK1*HGSNK+ QSNQ1*HGSNQ+QSB1*HGSB+QSQH1*HGSQH+QSQS1*HGSQS+QSQT1*HGSQT+QSQQ1* HGSQQ+QSH1*HGSH+QSO2*HGSO)/(QSA1+QSNF1+QSNN1+QSNB1+QSNM1+QSNT1+QSNK1+ QSNQ1+QSB1+QSQH1+QSQS1+QSQT1+QSQQ1+QSH1+QSO2)$ FRML IHGWP HGWP =(QWA1*HGWA+QWE1*HGWE+QWNG1*HGWNG+QWNE1*HGWNE+QWNF1*HGWNF+QWNN1*HGWNN+QWNB1*HGWNB+ QWNM1*HGWNM+QWNT1*HGWNT+QWNK1*HGWNK+QWNQ1*HGWNQ+QWB1*HGWB+QWQH1* HGWQH+QWQS1*HGWQS+QWQT1*HGWQT+QWQF1*HGWQF+QWQQ1*HGWQQ+QWH1*HGWH)/( QWA1+QWE1+QWNG1+QWNE1+QWNF1+QWNN1+QWNB1+QWNM1+QWNT1+QWNK1+QWNQ1+QWB1+ QWQH1+QWQS1+QWQT1+QWQF1+QWQQ1+QWH1)$ FRML IHGSP HGSP =(QSA1*HGSA+QSNF1*HGSNF+QSNN1*HGSNN+QSNB1*HGSNB+QSNM1*HGSNM+QSNT1*HGSNT+QSNK1*HGSNK+ QSNQ1*HGSNQ+QSB1*HGSB+QSQH1*HGSQH+QSQS1*HGSQS+QSQT1*HGSQT+QSQQ1* HGSQQ+QSH1*HGSH)/(QSA1+QSNF1+QSNN1+QSNB1+QSNM1+QSNT1+QSNK1+QSNQ1+ QSB1+QSQH1+QSQS1+QSQT1+QSQQ1+QSH1)$ FRML IHGP HGP =(QA1*HGA+QE1*HGE+QNG1*HGNG+QNE1*HGNE+QNF1*HGNF+QNN1*HGNN+QNB1*HGNB+QNM1*HGNM+QNT1* HGNT+QNK1*HGNK+QNQ1*HGNQ+QB1*HGB+QQH1*HGQH+QQS1*HGQS+QQT1*HGQT+QQF1* HGQF+QQQ1*HGQQ+QH1*HGH)/(QA1+QE1+QNG1+QNE1+QNF1+QNN1+QNB1+QNM1+QNT1+ QNK1+QNQ1+QB1+QQH1+QQS1+QQT1+QQF1+QQQ1+QH1)$ FRML IHGSN HGSN =(QSNF1*HGSNF+QSNN1*HGSNN+QSNB1*HGSNB+QSNM1*HGSNM+QSNT1*HGSNT+QSNK1*HGSNK+QSNQ1*HGSNQ) /(QSNF1+QSNN1+QSNB1+QSNM1+QSNT1+QSNK1+QSNQ1)$ FRML IHGN1 HGN1 =(QNG1*HGNG+QNE1*HGNE+QNF1*HGNF+QNN1*HGNN+QNB1*HGNB+QNM1*HGNM+QNT1*HGNT+QNK1*HGNK+ QNQ1*HGNQ)/(QNG1+QNE1+QNF1+QNN1+QNB1+QNM1+QNT1+QNK1+QNQ1)$ FRML IHGWQ HGWQ =(QWQH1*HGWQH+QWQS1*HGWQS+QWQT1*HGWQT+QWQF1*HGWQF+QWQQ1*HGWQQ)/(QWQH1+QWQS1+QWQT1+ QWQF1+QWQQ1)$ FRML IHGSQ HGSQ =(QSQH1*HGSQH+QSQS1*HGSQS+QSQT1*HGSQT+QSQQ1*HGSQQ)/(QSQH1+QSQS1+QSQT1+QSQQ1)$ FRML IHGQ HGQ =(QQH1*HGQH+QQS1*HGQS+QQT1*HGQT+QQF1*HGQF+QQQ1*HGQQ)/(QQH1+QQS1+QQT1+QQF1+QQQ1)$ FRML IHG2 HG2 =(QNG1*HGNG+QNE1*HGNE+QQS1*HGQS+QQF1*HGQF)/(QNG1+QNE1+QQS1+QQF1)$ FRML IHG3 HG3 =(QA1*HGA+QNF1*HGNF+QNN1*HGNN+QNB1*HGNB+QNM1*HGNM+QNT1*HGNT+QNK1*HGNK+QNQ1*HGNQ+QB1* HGB+QQH1*HGQH+QQT1*HGQT+QQQ1*HGQQ)/(QA1+QNF1+QNN1+QNB1+QNM1+QNT1+ QNK1+QNQ1+QB1+QQH1+QQT1+QQQ1)$ FRML IHG23 HG23 =(QA1*HGA+QNG1*HGNG+QNE1*HGNE+QNF1*HGNF+QNN1*HGNN+QNB1*HGNB+QNM1*HGNM+QNT1*HGNT+QNK1* HGNK+QNQ1*HGNQ+QB1*HGB+QQH1*HGQH+QQS1*HGQS+QQT1*HGQT+QQF1*HGQF+QQQ1* HGQQ)/(QA1+QNG1+QNE1+QNF1+QNN1+QNB1+QNM1+QNT1+QNK1+QNQ1+QB1+QQH1+ QQS1+QQT1+QQF1+QQQ1)$ 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$ 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$ 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$ 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*HQO2)/HQ1$ 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$ 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$ 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$ 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 IFVE1 FVE1 =FVEP+FVEO$ 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 IVE1 VE1 =VEP+VEO$ 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$ FRML IPVE1 PVE1 =VE1/FVE1$ FRML IBVEN BVEN =PVEN*FVEN/XN$ FRML IBVEQ BVEQ =PVEQ*FVEQ/XQ$ 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$ FRML IFVE3W1 FVE3W1 =FVEAW1+FVENFW1+FVENNW1+FVENBW1+FVENMW1+FVENTW1+FVENKW1+FVENQW1+FVEBW1+FVEQHW1+ FVEQTW1+FVEQQW1$ 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$ 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$ 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$ 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$ 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$ 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$ 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$ FRML IVN VN =VNG+VNE+VNF+VNN+VNB+VNM+VNT+VNK+VNQ$ FRML IVQ VQ =VQH+VQS+VQT+VQF+VQQ$ FRML IV V =VA+VE+VNG+VNE+VNF+VNN+VNB+VNM+VNT+VNK+VNQ+VB+VQH+VQS+VQT+VQF+VQQ+VH+VO$ FRML IVP VP =V-VO$ FRML IFVA FVA =FVMA+FVEA$ FRML IFVE FVE =FVME+FVEE$ FRML IFVNG FVNG =FVMNG+FVENG$ FRML IFVNE FVNE =FVMNE+FVENE$ FRML IFVNF FVNF =FVMNF+FVENF$ FRML IFVNN FVNN =FVMNN+FVENN$ FRML IFVNB FVNB =FVMNB+FVENB$ FRML IFVNM FVNM =FVMNM+FVENM$ FRML IFVNT FVNT =FVMNT+FVENT$ FRML IFVNK FVNK =FVMNK+FVENK$ FRML IFVNQ FVNQ =FVMNQ+FVENQ$ FRML IFVB FVB =FVMB+FVEB$ FRML IFVQH FVQH =FVMQH+FVEQH$ FRML IFVQS FVQS =FVMQS+FVEQS$ FRML IFVQT FVQT =FVMQT+FVEQT$ FRML IFVQF FVQF =FVMQF+FVEQF$ FRML IFVQQ FVQQ =FVMQQ+FVEQQ$ FRML IFVN FVN =(FVNG*PVNG(-1)+FVNE*PVNE(-1)+FVNF*PVNF(-1)+FVNN*PVNN(-1)+FVNB*PVNB(-1)+FVNM*PVNM(-1)+ FVNT*PVNT(-1)+FVNK*PVNK(-1)+FVNQ*PVNQ(-1))/PVN(-1)$ FRML IFVQ FVQ =(FVQH*PVQH(-1)+FVQS*PVQS(-1)+FVQT*PVQT(-1)+FVQF*PVQF(-1)+FVQQ*PVQQ(-1))/PVQ(-1)$ FRML IFV FV =(FVA*PVA(-1)+FVE*PVE(-1)+FVNG*PVNG(-1)+FVNE*PVNE(-1)+FVNF*PVNF(-1)+FVNN*PVNN(-1)+ FVNB*PVNB(-1)+FVNM*PVNM(-1)+FVNT*PVNT(-1)+FVNK*PVNK(-1)+FVNQ*PVNQ(-1) +FVB*PVB(-1)+FVQH*PVQH(-1)+FVQS*PVQS(-1)+FVQT*PVQT(-1)+FVQF*PVQF(-1)+ FVQQ*PVQQ(-1)+FVH*PVH(-1)+FVO*PVO(-1))/PV(-1)$ FRML IFVP FVP =(FV*PV(-1)-FVO*PVO(-1))/PVP(-1)$ FRML IPVA PVA =VA/FVA$ FRML IPVE PVE =VE/FVE$ FRML IPVNG PVNG =VNG/FVNG$ FRML IPVNE PVNE =VNE/FVNE$ FRML IPVNF PVNF =VNF/FVNF$ FRML IPVNN PVNN =VNN/FVNN$ FRML IPVNB PVNB =VNB/FVNB$ FRML IPVNM PVNM =VNM/FVNM$ FRML IPVNT PVNT =VNT/FVNT$ FRML IPVNK PVNK =VNK/FVNK$ FRML IPVNQ PVNQ =VNQ/FVNQ$ FRML IPVB PVB =VB/FVB$ FRML IPVQH PVQH =VQH/FVQH$ FRML IPVQS PVQS =VQS/FVQS$ FRML IPVQT PVQT =VQT/FVQT$ FRML IPVQF PVQF =VQF/FVQF$ FRML IPVQQ PVQQ =VQQ/FVQQ$ FRML IPVN PVN =VN/FVN$ FRML IPVQ PVQ =VQ/FVQ$ FRML IPV PV =V/FV$ FRML IPVP PVP =VP/FVP$ 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$ FRML IFYF2 FYF2 =(FYFNG*PYFNG(-1)+FYFNE*PYFNE(-1)+FYFQS*PYFQS(-1)+FYFQF*PYFQF(-1))/PYF2(-1)$ FRML IFYF3 FYF3 =(FYFA*PYFA(-1)+FYFNF*PYFNF(-1)+FYFNN*PYFNN(-1)+FYFNB*PYFNB(-1)+FYFNM*PYFNM(-1)+FYFNT* PYFNT(-1)+FYFNK*PYFNK(-1)+FYFNQ*PYFNQ(-1)+FYFB*PYFB(-1)+FYFQH*PYFQH(-1) +FYFQT*PYFQT(-1)+FYFQQ*PYFQQ(-1))/PYF3(-1)$ FRML IFYF23 FYF23 =(FYFA*PYFA(-1)+FYFNG*PYFNG(-1)+FYFNE*PYFNE(-1)+FYFNF*PYFNF(-1)+FYFNN*PYFNN(-1)+FYFNB* PYFNB(-1)+FYFNM*PYFNM(-1)+FYFNT*PYFNT(-1)+FYFNK*PYFNK(-1)+FYFNQ* PYFNQ(-1)+FYFB*PYFB(-1)+FYFQH*PYFQH(-1)+FYFQS*PYFQS(-1)+FYFQT*PYFQT(-1) +FYFQF*PYFQF(-1)+FYFQQ*PYFQQ(-1))/PYF23(-1)$ 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 IFXP FXP =(FXA*PXA(-1)+FXE*PXE(-1)+FXNG*PXNG(-1)+FXNE*PXNE(-1)+FXNF*PXNF(-1)+FXNN*PXNN(-1)+ FXNB*PXNB(-1)+FXNM*PXNM(-1)+FXNT*PXNT(-1)+FXNK*PXNK(-1)+FXNQ*PXNQ(-1) +FXB*PXB(-1)+FXQH*PXQH(-1)+FXQS*PXQS(-1)+FXQT*PXQT(-1)+FXQF*PXQF(-1)+ FXQQ*PXQQ(-1)+FXH*PXH(-1))/PXP(-1)$ FRML IFX2 FX2 =(FXNG*PXNG(-1)+FXNE*PXNE(-1)+FXQS*PXQS(-1)+FXQF*PXQF(-1))/PX2(-1)$ FRML IFX3 FX3 =(FXA*PXA(-1)+FXNF*PXNF(-1)+FXNN*PXNN(-1)+FXNB*PXNB(-1)+FXNM*PXNM(-1)+FXNT*PXNT(-1)+ FXNK*PXNK(-1)+FXNQ*PXNQ(-1)+FXB*PXB(-1)+FXQH*PXQH(-1)+FXQT*PXQT(-1)+ FXQQ*PXQQ(-1))/PX3(-1)$ FRML IFX23 FX23 =(FX2*PX2(-1)+FX3*PX3(-1))/PX23(-1)$ 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 IPX2 PX2 =(FXNG*PXN+FXNE*PXNE+FXQS*PXQS+FXQF*PXQF)/FX2$ 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$ FRML IXN XN =XNG+XNE+XNF+XNN+XNB+XNM+XNT+XNK+XNQ$ FRML IXQ XQ =XQH+XQS+XQT+XQF+XQQ$ FRML IXBY XBY =XN+XQ-XQS+XB$ FRML IFXBY FXBY =(FXN*PXN(-1)+FXQ*PXQ(-1)-FXQS*PXQS(-1)+FXB*PXB(-1))/PXBY(-1)$ FRML IPXBY PXBY =XBY/FXBY$ FRML IYFBY YFBY =YFN+YFQ-YFQS+YFB$ FRML IFYFBY FYFBY =(FYFN*PYFN(-1)+FYFQ*PYFQ(-1)-FYFQS*PYFQS(-1)+FYFB*PYFB(-1))/PYFBY(-1)$ FRML IPYFBY PYFBY =YFBY/FYFBY$ FRML IYWBY YWBY =YWN1+YWQ1-YWQS1+YWB1$ FRML IYRBY YRBY =YRN1+YRQ1-YRQS1+YRB1$ FRML IBYWBY1 BYWBY1 =YWBY/(YWBY+YRBY)$ FRML IQBY QBY =QN1+QQ1-QQS1+QB1$ FRML IHQBY HQBY =HQN1+HQQ1-HQQS1+HQB1$ FRML IKQYFBY KQYFBY =FYFBY/HQBY$ FRML IFVEBY FVEBY =FVEN+FVEQ-FVEQS+FVEB$ FRML IVEBY VEBY =VEN+VEQ-VEQS+VEB$ FRML IPVEBY PVEBY =VEBY/FVEBY$ FRML IBVEBY BVEBY =VEBY/XBY$ FRML IFVMBY FVMBY =FVMN+FVMQ-FVMQS+FVMB$ FRML IBIPMP BIPMP =100.*PIMP11*FIMP11/YFP1$ FRML IBIPBP BIPBP =100.*PIBP11*FIBP11/YFP1$ FRML IBIPBY BIPBY =((PIMN*FIMN+PIMQ*FIMQ-PIMQS*FIMQS+PIMB*FIMB)+(PIBN*FIBN+PIBQ*FIBQ-PIBQS*FIBQS+PIBB* FIBB))*100./YFBY$ FRML IKQYF KQYF =FYF/HQ1$ FRML IKQYFP KQYFP =FYFP/HQP1$ FRML IBULA1 BULA1 =100.*(UL/UA1)$ FRML IBULW1 BULW1 =100.*(UL/UAW)$ FRML IHG HG =1000.*HQ1/Q1$ FRML IPI PI =I/FI$ FRML IPIF PIF =(I-FIL*PIL)/FIF$ FRML IPIP11 PIP11 =IP11/FIP11$ 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))$ 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-0.000*SIQEJ- SIQNGL)/FXNG$ FRML IPWQSW1 PWQSW1 =(UIMQS*FKMQSW1+UIBQS*FKBQS+LQS1*HQQSW1+PVEQS*FVEQS+PVMQS*FVMQS+SIQQS-0.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$ FRML IPWA1 PWA1 =(UIMA*FKMA+UIBA*FKBA+LA1*HQA1+PVEA*FVEA+PVMA*FVMA+SIQA-0.094*SIQEJ-SIQAL)/FXA$ FRML IPWE1 PWE1 =(UIME*FKME+UIBE*FKBE+LE1*HQE1+PVEE*FVEE+PVME*FVME+SIQE-0.000*SIQEJ-SIQEL)/FXE$ FRML IPWNG1 PWNG1 =(UIMNG*FKMNG+UIBNG*FKBNG+LNG1*HQNG1+PVENG*FVENG+PVMNG*FVMNG+SIQNG-0.000*SIQEJ-SIQNGL) /FXNG$ FRML IPWNE1 PWNE1 =(UIMNE*FKMNE+UIBNE*FKBNE+LNE1*HQNE1+PVENE*FVENE+PVMNE*FVMNE+SIQNE-0.006*SIQEJ-SIQNEL) /FXNE$ FRML IPWNF1 PWNF1 =(UIMNF*FKMNF+UIBNF*FKBNF+LNF1*HQNF1+PVENF*FVENF+PVMNF*FVMNF+SIQNF-0.008*SIQEJ-SIQNFL) /FXNF$ FRML IPWNN1 PWNN1 =(UIMNN*FKMNN+UIBNN*FKBNN+LNN1*HQNN1+PVENN*FVENN+PVMNN*FVMNN+SIQNN-0.003*SIQEJ-SIQNNL) /FXNN$ FRML IPWNB1 PWNB1 =(UIMNB*FKMNB+UIBNB*FKBNB+LNB1*HQNB1+PVENB*FVENB+PVMNB*FVMNB+SIQNB-0.006*SIQEJ-SIQNBL) /FXNB$ FRML IPWNM1 PWNM1 =(UIMNM*FKMNM+UIBNM*FKBNM+LNM1*HQNM1+PVENM*FVENM+PVMNM*FVMNM+SIQNM-0.018*SIQEJ-SIQNML) /FXNM$ FRML IPWNT1 PWNT1 =(UIMNT*FKMNT+UIBNT*FKBNT+LNT1*HQNT1+PVENT*FVENT+PVMNT*FVMNT+SIQNT-0.003*SIQEJ-SIQNTL) /FXNT$ FRML IPWNK1 PWNK1 =(UIMNK*FKMNK+UIBNK*FKBNK+LNK1*HQNK1+PVENK*FVENK+PVMNK*FVMNK+SIQNK-0.009*SIQEJ-SIQNKL) /FXNK$ FRML IPWNQ1 PWNQ1 =(UIMNQ*FKMNQ+UIBNQ*FKBNQ+LNQ1*HQNQ1+PVENQ*FVENQ+PVMNQ*FVMNQ+SIQNQ-0.011*SIQEJ-SIQNQL) /FXNQ$ FRML IPWB1 PWB1 =(UIMB*FKMB+UIBB*FKBB+LB1*HQB1+PVEB*FVEB+PVMB*FVMB+SIQB-0.006*SIQEJ-SIQBL)/FXB$ FRML IPWQH1 PWQH1 =(UIMQH*FKMQH+UIBQH*FKBQH+LQH1*HQQH1+PVEQH*FVEQH+PVMQH*FVMQH+SIQQH-0.056*SIQEJ-SIQQHL) /FXQH$ FRML IPWQS1 PWQS1 =(UIMQS*FKMQS+UIBQS*FKBQS+LQS1*HQQS1+PVEQS*FVEQS+PVMQS*FVMQS+SIQQS-0.006*SIQEJ-SIQQSL) /FXQS$ FRML IPWQT1 PWQT1 =(UIMQT*FKMQT+UIBQT*FKBQT+LQT1*HQQT1+PVEQT*FVEQT+PVMQT*FVMQT+SIQQT-0.017*SIQEJ-SIQQTL) /FXQT$ FRML IPWQF1 PWQF1 =(UIMQF*FKMQF+UIBQF*FKBQF+LQF1*HQQF1+PVEQF*FVEQF+PVMQF*FVMQF+SIQQF-0.016*SIQEJ-SIQQFL) /FXQF$ FRML IPWQQ1 PWQQ1 =(UIMQQ*FKMQQ+UIBQQ*FKBQQ+LQQ1*HQQQ1+PVEQQ*FVEQQ+PVMQQ*FVMQQ+SIQQQ-0.136*SIQEJ-SIQQQL) /FXQQ$ FRML IPWH1 PWH1 =(UIMH*FKMH+UIBH*FKBH+LH1*HQH1+PVEH*FVEH+PVMH*FVMH+SIQH-0.565*SIQEJ-SIQHL)/FXH$ FRML IPWO1 PWO1 =(UIMO*FKMO+UIBO*FKBO+LO1*HQO2+PVEO*FVEO+PVMO*FVMO+SIQO-0.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$ 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 ITIPPHPL1 TIPPHPL1 =TISHL1+TIHHL1$ FRML ITIPPHPK1 TIPPHPK1 =TISHK1+TIHSK1$ FRML ITIPPHPS1 TIPPHPS1 =TISHL1+TISHK1$ FRML ITIPPHPH1 TIPPHPH1 =TIHHL1+TIHSK1$ 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-TPATPI-(TIHSP-SDRPSL-SDRPSK-SDRATP))$ FRML ITPHHBI TPHHBI =TPHHI-TPHHPI$ FRML ITPHHPU TPHHPU =TFFPU-TYPSHP$ FRML ITPHHBU TPHHBU =TPHHU-TPHHPU$ FRML IOLP OLP =OSELP+OSDKLP+OBLP$ FRML ITISHL1 TIDSHL1 =TISHL1-SDRPSL$ FRML ITISHK1 TIDSHK1 =TISHK1-SDRPSK$ FRML ITIHHL1 TIDHHL1 =TIHHL1-SDRPPL$ FRML ITIHSK1 TIDHSK1 =TIHSK1-SDRPPK$ FRML ITIATP TIDATP =TIATP-SDRATP$ FRML ITIDMP TIDDMP =TIDMP-SDRDMP$ FRML ITISP TIDSP =TISP-SDRSP$ FRML ITIDLD TIDLD =TILD-SDRLD$ FRML ITIDPPHPB TIDPPHPB =TIPPHPB-SDRPH$ FRML ITIDPPHLP TIDPPHLP =TIPPHLP-SDRPP$ FRML YZFCP ZFCP =FCP$ FRML YJRCPUXH JRCPUXH =LOG(CPUXH-JCPUXH)-(0.365845*(LOG(YDPHK2)-LOG(YDPHK2(-1)))+0.097410*(LOG(WCP(-1))-LOG( WCP(-2)))-0.531462*(LOG(PCPUXH)-LOG(PCPUXH(-1)))+0.077129*(LOG(PCHU)- LOG(PCHU(-1)))-0.347112*LOG(CPUXH(-1)/CPUXHW(-1))+LOG(CPUXH(-1)/ PCPUXH(-1))+LOG(PCPUXH))$ FRML YJDUUXA JDUUXA =UUXA-(-0.52017*((Q1/U1564)-(Q1(-1)/U1564(-1)))+UUXA(-1)/U1529(-1))*U1529*(1.-D7184)$ FRML YJRQAK JRQAK =(QAK+D7194(-1))/(D7194(-1)+(BQAK*(UL/UL(-1)-1.)+1.)*QAK(-1))-1.$ FRML YJRQLTJ JRQLTJ =(QLTJ+D7194(-1))/(D7194(-1)+(BQLTJ*(UL/UL(-1)-1.)+1.)*QLTJ(-1))-1.$ FRML YJRQLTF JRQLTF =(QLTF+D4799(-1))/(D4799(-1)+(BQLTF*(UL/UL(-1)-1.)+1.)*QLTF(-1))-1.$ FRML YJRQLTS JRQLTS =(QLTS+D4799(-1))/(D4799(-1)+(BQLTS*(UL/UL(-1)-1.)+1.)*QLTS(-1))-1.$ FRML YJRQLTR JRQLTR =(QLTR+D7194(-1))/(D7194(-1)+(BQLTR*(UL/UL(-1)-1.)+1.)*QLTR(-1))-1.$ FRML YJRUAKX JRUAKX =(UAKX+D7193(-1))/(D7193(-1)+(BUAKX*(UL/UL(-1)-1.)+1.)*UAKX(-1))-1.$ FRML YJRUKAK JRUKAK =(UKAK+D7100(-1))/(D7100(-1)+(BUKAK*(UL/UL(-1)-1.)+1.)*UKAK(-1))-1.$ FRML YJRUEFW JRUEFW =(UEFW+D4778)/(EXP(LOG(UEFE*(1.-D4778)+D4778)+EUEFYL*LOG(((YDUEF+D99(-1))*(1.-D4799)+ D4799)/((YDUA+D99(-1))*(1.-D4799)+D4799)*((YDUAE+D99(-1))*(1.-D4799)+ D4799)/((YDUEFE+D99(-1))*(1.-D4799)+D4799))))-1.$ FRML YJRUEF JRUEF =(UEF+D4778)/(EXP((LOG((UEFE)*(1.-D4778)+D4778)-LOG((UEFE(-1))*(1.-D4778(-1))+D4778(-1) ))+EUEFYS*(LOG(((YDUEF+D99(-1))*(1.-D4799)+D4799)/((YDUA+D99(-1))*(1. -D4799)+D4799)*((YDUAE+D99(-1))*(1.-D4799)+D4799)/((YDUEFE+D99(-1))*( 1.-D4799)+D4799))-LOG(((YDUEF(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1))/ ((YDUA(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1))*((YDUAE(-1)+D99(-2))*(1. -D4799(-1))+D4799(-1))/((YDUEFE(-1)+D99(-2))*(1.-D4799(-1))+D4799(-1) )))+0.25*LOG(((UEFW(-1))*(1.-D4778(-1))+D4778(-1))/((UEF(-1))*(1.- D4778(-1))+D4778(-1)))+LOG((UEF(-1))*(1.-D4778(-1))+D4778(-1))))-1.$ FRML YZUEF ZUEF =UEF$ FRML YZUWXA ZUWXA =UWXA$ FRML YUWXA UR =UWXA-(UUXA+UAKX+UREV+ULY+UFDP+USXA+USB+UMF+UEF+UOV+UFOX+UKXA+UKAK-(UR1+UR2))$ FRML YJRPXNN JRPXNN =PXNN/(EXP(LOG(PXNN(-1))+0.50371*(LOG(PWNNVL1)-LOG(PWNNVL1(-1)))*PWNNVL1(-1)/PXNN(-1)+ 0.65486*(LOG(PWNNVV)-LOG(PWNNVV(-1)))*PWNNVV(-1)/PXNN(-1)+0.49629*(LOG (PWNNVL1(-1))-LOG(PWNNVL1(-2)))*PWNNVL1(-1)/PXNN(-1)+0.34514*(LOG( PWNNVV(-1))-LOG(PWNNVV(-2)))*PWNNVV(-1)/PXNN(-1)-0.20000*LOG(PXNN(-1) /PXNNW1(-1))))-1.0$ FRML YZPXNN ZPXNN =PXNN$ FRML YZBYWNN1 ZBYWNN1 =BYWNN1$ FRML YJRPXNB JRPXNB =PXNB/(EXP(LOG(PXNB(-1))+0.66081*(LOG(PWNBVL1)-LOG(PWNBVL1(-1)))*PWNBVL1(-1)/PXNB(-1)+ 0.95405*(LOG(PWNBVV)-LOG(PWNBVV(-1)))*PWNBVV(-1)/PXNB(-1)+0.33919*(LOG (PWNBVL1(-1))-LOG(PWNBVL1(-2)))*PWNBVL1(-1)/PXNB(-1)+0.21207*(LOG( PWNBVV(-1))-LOG(PWNBVV(-2)))*PWNBVV(-1)/PXNB(-1)-0.20000*LOG(PXNB(-1) /PXNBW1(-1))))-1.0$ FRML YZPXNB ZPXNB =PXNB$ FRML YZBYWNB1 ZBYWNB1 =BYWNB1$ FRML YJRPXNM JRPXNM =PXNM/(EXP(LOG(PXNM(-1))+0.46913*(LOG(PWNMVL1)-LOG(PWNMVL1(-1)))*PWNMVL1(-1)/PXNM(-1)+ 0.74061*(LOG(PWNMVV)-LOG(PWNMVV(-1)))*PWNMVV(-1)/PXNM(-1)+0.53087*(LOG (PWNMVL1(-1))-LOG(PWNMVL1(-2)))*PWNMVL1(-1)/PXNM(-1)+0.25939*(LOG( PWNMVV(-1))-LOG(PWNMVV(-2)))*PWNMVV(-1)/PXNM(-1)-0.20000*LOG(PXNM(-1) /PXNMW1(-1))))-1.0$ FRML YZPXNM ZPXNM =PXNM$ FRML YZBYWNM1 ZBYWNM1 =BYWNM1$ FRML YJRPXNT JRPXNT =PXNT/(EXP(LOG(PXNT(-1))+0.098764*(LOG(PWNTVL1)-LOG(PWNTVL1(-1)))*PWNTVL1(-1)/PXNT(-1) +0.74937*(LOG(PWNTVV)-LOG(PWNTVV(-1)))*PWNTVV(-1)/PXNT(-1)+0.90124*(LOG (PWNTVL1(-1))-LOG(PWNTVL1(-2)))*PWNTVL1(-1)/PXNT(-1)+0.25063*(LOG( PWNTVV(-1))-LOG(PWNTVV(-2)))*PWNTVV(-1)/PXNT(-1)-0.20000*LOG(PXNT(-1) /PXNTW1(-1))))-1.0$ FRML YZPXNT ZPXNT =PXNT$ FRML YZBYWNT1 ZBYWNT1 =BYWNT1$ FRML YJRPXNK JRPXNK =PXNK/(EXP(LOG(PXNK(-1))+0.32028*(LOG(PWNKVL1)-LOG(PWNKVL1(-1)))*PWNKVL1(-1)/PXNK(-1)+ 0.87126*(LOG(PWNKVV)-LOG(PWNKVV(-1)))*PWNKVV(-1)/PXNK(-1)+0.67972*(LOG (PWNKVL1(-1))-LOG(PWNKVL1(-2)))*PWNKVL1(-1)/PXNK(-1)+0.12874*(LOG( PWNKVV(-1))-LOG(PWNKVV(-2)))*PWNKVV(-1)/PXNK(-1)-0.20000*LOG(PXNK(-1) /PXNKW1(-1))))-1.0$ FRML YZPXNK ZPXNK =PXNK$ FRML YZBYWNK1 ZBYWNK1 =BYWNK1$ FRML YJRPXNQ JRPXNQ =PXNQ/(EXP(LOG(PXNQ(-1))+0.645322*(LOG(PWNQVL1)-LOG(PWNQVL1(-1)))*PWNQVL1(-1)/PXNQ(-1) +0.855308*(LOG(PWNQVV)-LOG(PWNQVV(-1)))*PWNQVV(-1)/PXNQ(-1)+0.354678* (LOG(PWNQVL1(-1))-LOG(PWNQVL1(-2)))*PWNQVL1(-1)/PXNQ(-1)+0.184350*(LOG (PWNQVV(-1))-LOG(PWNQVV(-2)))*PWNQVV(-1)/PXNQ(-1)-0.26889*LOG(PXNQ(-1) /PXNQW1(-1))))-1.0$ FRML YZPXNQ ZPXNQ =PXNQ$ FRML YZBYWNQ1 ZBYWNQ1 =BYWNQ1$ FRML YJRPXB JRPXB =PXB/(EXP(LOG(PXB(-1))+0.539263*(LOG(PWBVL1)-LOG(PWBVL1(-1)))*PWBVL1(-1)/PXB(-1)+0.751764 *(LOG(PWBVV)-LOG(PWBVV(-1)))*PWBVV(-1)/PXB(-1)+0.460737*(LOG(PWBVL1(-1) )-LOG(PWBVL1(-2)))*PWBVL1(-1)/PXB(-1)+0.248236*(LOG(PWBVV(-1))-LOG( PWBVV(-2)))*PWBVV(-1)/PXB(-1)-0.20000*LOG(PXB(-1)/PXBW1(-1))))-1.0$ FRML YZPXB ZPXB =PXB$ FRML YZBYWB1 ZBYWB1 =BYWB1$ FRML YJRPXQH JRPXQH =PXQH/(EXP(LOG(PXQH(-1))+1.01665*(LOG(PWQHVL1)-LOG(PWQHVL1(-1)))*PWQHVL1(-1)/PXQH(-1)+ 1.21235*(LOG(PWQHVV)-LOG(PWQHVV(-1)))*PWQHVV(-1)/PXQH(-1)+0.29358*(LOG (PWQHVL1(-1))-LOG(PWQHVL1(-2)))*PWQHVL1(-1)/PXQH(-1)+0.00000*(LOG( PWQHVV(-1))-LOG(PWQHVV(-2)))*PWQHVV(-1)/PXQH(-1)-0.20000*LOG(PXQH(-1) /PXQHW1(-1))))-1.0$ FRML YZPXQH ZPXQH =PXQH$ FRML YZBYWQH1 ZBYWQH1 =BYWQH1$ FRML YJRPXQT JRPXQT =PXQT/(EXP(LOG(PXQT(-1))+0.356266*(LOG(PWQTVL1)-LOG(PWQTVL1(-1)))*PWQTVL1(-1)/PXQT(-1) +0.85*(LOG(PWQTVV)-LOG(PWQTVV(-1)))*PWQTVV(-1)/PXQT(-1)+0.0000*(LOG( PWQTVL1(-1))-LOG(PWQTVL1(-2)))*PWQTVL1(-1)/PXQT(-1)+0.00000*(LOG( PWQTVV(-1))-LOG(PWQTVV(-2)))*PWQTVV(-1)/PXQT(-1)-0.20000*LOG(PXQT(-1) /PXQTW1(-1))))-1.0$ FRML YZPXQT ZPXQT =PXQT$ FRML YZBYWQT1 ZBYWQT1 =BYWQT1$ FRML YJRPXQQ JRPXQQ =PXQQ/(EXP(LOG(PXQQ(-1))+0.67039*(LOG(PWQQVL1)-LOG(PWQQVL1(-1)))*PWQQVL1(-1)/PXQQ(-1)+ 0.88296*(LOG(PWQQVV)-LOG(PWQQVV(-1)))*PWQQVV(-1)/PXQQ(-1)+0.49131*(LOG (PWQQVL1(-1))-LOG(PWQQVL1(-2)))*PWQQVL1(-1)/PXQQ(-1)+0.11704*(LOG( PWQQVV(-1))-LOG(PWQQVV(-2)))*PWQQVV(-1)/PXQQ(-1)-0.20000*LOG(PXQQ(-1) /PXQQW1(-1))))-1.0$ FRML YZPXQQ ZPXQQ =PXQQ$ FRML YZBYWQQ1 ZBYWQQ1 =BYWQQ1$ FRML YJRPXQF JRPXQF =EXP((LOG(PXQF)-LOG(PXQF(-1)))+LOG(1.+JRPXQF(-1))-(0.30074*((LOG(PWQFWV1)-LOG(PWQFWV1(-1) ))-(LOG(PWQFWV1(-1))-LOG(PWQFWV1(-2))))-0.78730*((LOG(PXQF(-1))-LOG( PXQF(-2)))-(LOG(PWQFW1(-1))-LOG(PWQFW1(-2))))+(LOG(PXQF(-1))-LOG( PXQF(-2)))))-1.$ FRML YZPXQF ZPXQF =PXQF$ FRML YZBYWQF1 ZBYWQF1 =BYWQF1$ FRML YJFILA JFILA =FILA-(0.20394*(0.75*(((FXA)-(FXA(-1)))-((FILA)-(FILA(-1))))+(1.-0.75)*(((FXA(-1))-( FXA(-2)))-((FILA(-1))-(FILA(-2)))))+0.66667*(HOSTKOR-0.5*HOSTKOR(-1)- 0.5*HOSTKOR(-2)))$ FRML YJFILE JFILE =FILE-(0.05217*(0.75*(((FXE)-(FXE(-1)))-((FILE)-(FILE(-1))))+(1.-0.75)*(((FXE(-1))-( FXE(-2)))-((FILE(-1))-(FILE(-2))))))$ FRML YJFILNG JFILNG =FILNG-(BNGIL*(((FXNG)-(FXNG(-1)))-((FILNG)-(FILNG(-1)))))$ FRML YJFILNE JFILNE =FILNE-(0.03845*(0.00*(((FXNE)-(FXNE(-1)))-((FILNE)-(FILNE(-1))))+(1.-0.00)*(((FXNE(-1) )-(FXNE(-2)))-((FILNE(-1))-(FILNE(-2))))))$ FRML YJFILNF JFILNF =FILNF-(BNFIL*(((FXNF)-(FXNF(-1)))-((FILNF)-(FILNF(-1)))))$ FRML YJFILNN JFILNN =FILNN-(0.37875*(0.75*(((FXNN)-(FXNN(-1)))-((FILNN)-(FILNN(-1))))+(1.-0.75)*(((FXNN(-1) )-(FXNN(-2)))-((FILNN(-1))-(FILNN(-2))))))$ FRML YJFILNB JFILNB =FILNB-(0.19120*(0.75*(((FXNB)-(FXNB(-1)))-((FILNB)-(FILNB(-1))))+(1.-0.75)*(((FXNB(-1) )-(FXNB(-2)))-((FILNB(-1))-(FILNB(-2))))))$ FRML YJFILNM JFILNM =FILNM-(0.18587*(0.00*(((FXNM)-(FXNM(-1)))-((FILNM)-(FILNM(-1))))+(1.-0.00)*(((FXNM(-1) )-(FXNM(-2)))-((FILNM(-1))-(FILNM(-2))))))$ FRML YJFILNT JFILNT =FILNT-(BNTIL*(((FXNT)-(FXNT(-1)))-((FILNT)-(FILNT(-1)))))$ FRML YJFILNK JFILNK =FILNK-(0.14686*(0.25*(((FXNK)-(FXNK(-1)))-((FILNK)-(FILNK(-1))))+(1.-0.25)*(((FXNK(-1) )-(FXNK(-2)))-((FILNK(-1))-(FILNK(-2))))))$ FRML YJFILNQ JFILNQ =FILNQ-(0.14348*(0.50*(((FXNQ)-(FXNQ(-1)))-((FILNQ)-(FILNQ(-1))))+(1.-0.50)*(((FXNQ(-1) )-(FXNQ(-2)))-((FILNQ(-1))-(FILNQ(-2))))))$ FRML YJFILQH JFILQH =FILQH-(0.01967*(0.50*(((FXQH)-(FXQH(-1)))-((FILQH)-(FILQH(-1))))+(1.-0.50)*(((FXQH(-1) )-(FXQH(-2)))-((FILQH(-1))-(FILQH(-2))))))$ FRML YJFILQQ JFILQQ =FILQQ-(0.00920*(0.50*(((FXQQ)-(FXQQ(-1)))-((FILQQ)-(FILQQ(-1))))+(1.-0.50)*(((FXQQ(-1) )-(FXQQ(-2)))-((FILQQ(-1))-(FILQQ(-2))))))$ FRML YJFILM0 JFILM0 =FILM0-(0.05276*(((FM0)-(FM0(-1)))-((FILM0)-(FILM0(-1)))))$ FRML YJFILM1 JFILM1 =FILM1-(BM1IL*(((FM1)-(FM1(-1)))-((FILM1)-(FILM1(-1)))))$ FRML YJFILM2 JFILM2 =FILM2-(0.06441*(0.00*(((FM2)-(FM2(-1)))-((FILM2)-(FILM2(-1))))+(1.-0.00)*(((FM2(-1))- (FM2(-2)))-((FILM2(-1))-(FILM2(-2))))))$ FRML YJFILM3K JFILM3K =FILM3K-(0.41176*(0.00*(((FM3K)-(FM3K(-1)))-((FILM3K)-(FILM3K(-1))))+(1.-0.00)*((( FM3K(-1))-(FM3K(-2)))-((FILM3K(-1))-(FILM3K(-2))))))$ FRML YJFILM3R JFILM3R =FILM3R-(0.05948*(0.00*(((FM3R)-(FM3R(-1)))-((FILM3R)-(FILM3R(-1))))+(1.-0.00)*((( FM3R(-1))-(FM3R(-2)))-((FILM3R(-1))-(FILM3R(-2))))))$ FRML YJFILM3Q JFILM3Q =FILM3Q-(0.30000*(((FM3Q(-1))-(FM3Q(-2)))-((FILM3Q(-1))-(FILM3Q(-2)))))$ FRML YJFILM5 JFILM5 =FILM5-(0.13059*(0.50*(((FM5)-(FM5(-1)))-((FILM5)-(FILM5(-1))))+(1.-0.50)*(((FM5(-1))- (FM5(-2)))-((FILM5(-1))-(FILM5(-2))))))$ FRML YJFILM6M JFILM6M =FILM6M-(0.26917*(0.75*(((FM6M)-(FM6M(-1)))-((FILM6M)-(FILM6M(-1))))+(1.-0.75)*((( FM6M(-1))-(FM6M(-2)))-((FILM6M(-1))-(FILM6M(-2))))))$ FRML YJFILM6Q JFILM6Q =FILM6Q-(0.12061*((((FM6Q)-(FM6Q(-1)))-((FILM6Q)-(FILM6Q(-1))))))$ FRML YJFILM7B JFILM7B =FILM7B-(0.19654*(0.25*(((FM7B)-(FM7B(-1)))-((FILM7B)-(FILM7B(-1))))+(1.-0.25)*((( FM7B(-1))-(FM7B(-2)))-((FILM7B(-1))-(FILM7B(-2))))))$ FRML YJFILM7Y JFILM7Y =FILM7Y-(0.00848*((((FM7Y)-(FM7Y(-1)))-((FILM7Y)-(FILM7Y(-1))))))$ FRML YJFILM7Q JFILM7Q =FILM7Q-(0.10938*((((FM7Q)-(FM7Q(-1)))-((FILM7Q)-(FILM7Q(-1))))))$ FRML YJFILM8 JFILM8 =FILM8-(0.11208*(0.75*(((FM8)-(FM8(-1)))-((FILM8)-(FILM8(-1))))+(1.-0.75)*(((FM8(-1))- (FM8(-2)))-((FILM8(-1))-(FILM8(-2))))))$ FRML YZFILA ZFILA =FILA$ FRML YZFILE ZFILE =FILE$ FRML YZFILNG ZFILNG =FILNG$ FRML YZFILNE ZFILNE =FILNE$ FRML YZFILNF ZFILNF =FILNF$ FRML YZFILNN ZFILNN =FILNN$ FRML YZFILNB ZFILNB =FILNB$ FRML YZFILNM ZFILNM =FILNM$ FRML YZFILNT ZFILNT =FILNT$ FRML YZFILNK ZFILNK =FILNK$ FRML YZFILNQ ZFILNQ =FILNQ$ FRML YZFILQH ZFILQH =FILQH$ FRML YZFILQQ ZFILQQ =FILQQ$ FRML YZFILM0 ZFILM0 =FILM0$ FRML YZFILM1 ZFILM1 =FILM1$ FRML YZFILM2 ZFILM2 =FILM2$ FRML YZFILM3K ZFILM3K =FILM3K$ FRML YZFILM3R ZFILM3R =FILM3R$ FRML YZFILM3Q ZFILM3Q =FILM3Q$ FRML YZFILM5 ZFILM5 =FILM5$ FRML YZFILM6M ZFILM6M =FILM6M$ FRML YZFILM6Q ZFILM6Q =FILM6Q$ FRML YZFILM7B ZFILM7B =FILM7B$ FRML YZFILM7Y ZFILM7Y =FILM7Y$ FRML YZFILM7Q ZFILM7Q =FILM7Q$ FRML YZFILM8 ZFILM8 =FILM8$ FRML YJRFKBE JRFKBE =(FKBE+D6680)/(FIBE/KFIBE+(1.-BIVBE)*FKBE(-1)+D6680)-1.$ FRML YZFKBE ZFKBE =FKBE$ FRML YJRPXNE JRPXNE =PXNE/(EXP(LOG(PXNE(-1))+0.85454*(LOG(PWNEVE)-LOG(PWNEVE(-1)))*(PWNEVE(-1)/PXNE(-1))+( 1.-0.85454)*(LOG(PWNEVE(-1))-LOG(PWNEVE(-2)))*(PWNEVE(-1)/PXNE(-1))-0.50000 *(LOG(PXNE(-1))-LOG(PXNEW1(-1)))))-1.0$ FRML YZPXNE ZPXNE =PXNE$ FRML YZBYWNE1 ZBYWNE1 =BYWNE1$ FRML YZUSY ZUSY =USY$ FRML YJUSY JUSY =USY-(1.-DSK2)*((UW+UFPX)*KUSY2*(1.-DSK1)+DSK1*(UA1+UFPX+UFOX+UEF+UMF)*KUSY1)-DSK2*( USSY+UWSY+ULSY+UEFSY+UFPSY+UQSY)$ FRML YKUSY1 KUSY1 =(USY-JUSY)/(UA1+UFPX+UFOX+UEF+UMF)$ FRML YKUSY2 KUSY2 =(USY-JUSY)/(UW+UFPX)$ 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$ FRML YJKBYSP1 JKBYSP1 =KBYSP1-(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1))$ FRML YJKBYSP2 JKBYSP2 =KBYSP2-(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1))$ FRML YJKBYSP3 JKBYSP3 =KBYSP3-(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1))$ FRML YJKBYSP4 JKBYSP4 =KBYSP4-(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1))$ FRML YJKBYSP5 JKBYSP5 =KBYSP5-(((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1))$ FRML YJKBYS1 JKBYS1 =KBYS1-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YJKBYS2 JKBYS2 =KBYS2-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YJKBYS3 JKBYS3 =KBYS3-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YJKBYS4 JKBYS4 =KBYS4-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YJKBYS5 JKBYS5 =KBYS5-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YJKBYSP JKBYSP =KBYSP-((YSP+D93)*USYE*PCRS1E-(YSPE+D93)*USY*PCRS1)/((YSPE+D93)*USY*PCRS1)$ FRML YJKBYS JKBYS =KBYS-((YS*USYE*PCRS1E-YSE*USY*PCRS1)/(YSE*USY*PCRS1))$ FRML YTPF ZTPF =TPF$ FRML YTPN ZTPN =TPN$ FRML YTPI ZTPI =TPI$ FRML YTPB ZTPB =TPB$ FRML YTPH ZTPH =TPH$ FRML YTPE ZTPE =TPE$ FRML YTPG ZTPG =TPG$ FRML YTPV ZTPV =TPV$ FRML YTPS ZTPS =TPS$ FRML YTPKR ZTPKR =TPKR$ FRML YTPIMO1 ZTPIMO1 =TPIMO1$ FRML YTPIMP1 ZTPIMP1 =TPIMP1$ FRML YTPIBH ZTPIBH =TPIBH$ FRML YTPIBP1 ZTPIBP1 =TPIBP1$ FRML YTPIBO1 ZTPIBO1 =TPIBO1$ FRML YTPIL ZTPIL =TPIL$ FRML YTVMA ZTVMA =TVMA$ FRML YTVME ZTVME =TVME$ FRML YTVMNG ZTVMNG =TVMNG$ FRML YTVMNE ZTVMNE =TVMNE$ FRML YTVMNF ZTVMNF =TVMNF$ FRML YTVMNN ZTVMNN =TVMNN$ FRML YTVMNB ZTVMNB =TVMNB$ FRML YTVMNM ZTVMNM =TVMNM$ FRML YTVMNT ZTVMNT =TVMNT$ FRML YTVMNK ZTVMNK =TVMNK$ FRML YTVMNQ ZTVMNQ =TVMNQ$ FRML YTVMB ZTVMB =TVMB$ FRML YTVMQH ZTVMQH =TVMQH$ FRML YTVMQS ZTVMQS =TVMQS$ FRML YTVMQT ZTVMQT =TVMQT$ FRML YTVMQF ZTVMQF =TVMQF$ FRML YTVMQQ ZTVMQQ =TVMQQ$ FRML YTVMH ZTVMH =TVMH$ FRML YTVMO ZTVMO =TVMO$ FRML YTVEA ZTVEA =TVEA$ FRML YTVEE ZTVEE =TVEE$ FRML YTVENG ZTVENG =TVENG$ FRML YTVENE ZTVENE =TVENE$ FRML YTVENF ZTVENF =TVENF$ FRML YTVENN ZTVENN =TVENN$ FRML YTVENB ZTVENB =TVENB$ FRML YTVENM ZTVENM =TVENM$ FRML YTVENT ZTVENT =TVENT$ FRML YTVENK ZTVENK =TVENK$ FRML YTVENQ ZTVENQ =TVENQ$ FRML YTVEB ZTVEB =TVEB$ FRML YTVEQH ZTVEQH =TVEQH$ FRML YTVEQS ZTVEQS =TVEQS$ FRML YTVEQT ZTVEQT =TVEQT$ FRML YTVEQF ZTVEQF =TVEQF$ FRML YTVEQQ ZTVEQQ =TVEQQ$ FRML YTVEH ZTVEH =TVEH$ FRML YTVEO ZTVEO =TVEO$ FRML YJDTPF JDTPF =TPF-(PCPN(-1)/PCPN(-2))*TPF(-1)$ FRML YJDTPN JDTPN =TPN-(PCPN(-1)/PCPN(-2))*TPN(-1)$ FRML YJDTPI JDTPI =TPI-(PCPN(-1)/PCPN(-2))*TPI(-1)$ FRML YJDTPB JDTPB =TPB-(PCPN(-1)/PCPN(-2))*TPB(-1)$ FRML YJDTPH JDTPH =TPH-(PCPN(-1)/PCPN(-2))*TPH(-1)$ FRML YJDTPE JDTPE =TPE-(PCPN(-1)/PCPN(-2))*TPE(-1)$ FRML YJDTPG JDTPG =TPG-(PCPN(-1)/PCPN(-2))*TPG(-1)$ FRML YJDTPV JDTPV =TPV-(PCPN(-1)/PCPN(-2))*TPV(-1)$ FRML YJDTPS JDTPS =TPS-(PCPN(-1)/PCPN(-2))*TPS(-1)$ FRML YJDTPKR JDTPKR =TPKR-(PCPN(-1)/PCPN(-2))*TPKR(-1)$ FRML YJDTPIMO1 JDTPIMO1 =TPIMO1-(PCPN(-1)/PCPN(-2))*TPIMO1(-1)$ FRML YJDTPIMP1 JDTPIMP1 =TPIMP1-(PCPN(-1)/PCPN(-2))*TPIMP1(-1)$ FRML YJDTPIBH JDTPIBH =TPIBH-(PCPN(-1)/PCPN(-2))*TPIBH(-1)$ FRML YJDTPIBP1 JDTPIBP1 =TPIBP1-(PCPN(-1)/PCPN(-2))*TPIBP1(-1)$ FRML YJDTPIBO1 JDTPIBO1 =TPIBO1-(PCPN(-1)/PCPN(-2))*TPIBO1(-1)$ FRML YJDTPIL JDTPIL =TPIL-(PCPN(-1)/PCPN(-2))*TPIL(-1)$ FRML YJDTVMA JDTVMA =TVMA-(PCPN(-1)/PCPN(-2))*TVMA(-1)$ FRML YJDTVME JDTVME =TVME-(PCPN(-1)/PCPN(-2))*TVME(-1)$ FRML YJDTVMNG JDTVMNG =TVMNG-(PCPN(-1)/PCPN(-2))*TVMNG(-1)$ FRML YJDTVMNE JDTVMNE =TVMNE-(PCPN(-1)/PCPN(-2))*TVMNE(-1)$ FRML YJDTVMNF JDTVMNF =TVMNF-(PCPN(-1)/PCPN(-2))*TVMNF(-1)$ FRML YJDTVMNN JDTVMNN =TVMNN-(PCPN(-1)/PCPN(-2))*TVMNN(-1)$ FRML YJDTVMNB JDTVMNB =TVMNB-(PCPN(-1)/PCPN(-2))*TVMNB(-1)$ FRML YJDTVMNM JDTVMNM =TVMNM-(PCPN(-1)/PCPN(-2))*TVMNM(-1)$ FRML YJDTVMNT JDTVMNT =TVMNT-(PCPN(-1)/PCPN(-2))*TVMNT(-1)$ FRML YJDTVMNK JDTVMNK =TVMNK-(PCPN(-1)/PCPN(-2))*TVMNK(-1)$ FRML YJDTVMNQ JDTVMNQ =TVMNQ-(PCPN(-1)/PCPN(-2))*TVMNQ(-1)$ FRML YJDTVMB JDTVMB =TVMB-(PCPN(-1)/PCPN(-2))*TVMB(-1)$ FRML YJDTVMQH JDTVMQH =TVMQH-(PCPN(-1)/PCPN(-2))*TVMQH(-1)$ FRML YJDTVMQS JDTVMQS =TVMQS-(PCPN(-1)/PCPN(-2))*TVMQS(-1)$ FRML YJDTVMQT JDTVMQT =TVMQT-(PCPN(-1)/PCPN(-2))*TVMQT(-1)$ FRML YJDTVMQF JDTVMQF =TVMQF-(PCPN(-1)/PCPN(-2))*TVMQF(-1)$ FRML YJDTVMQQ JDTVMQQ =TVMQQ-(PCPN(-1)/PCPN(-2))*TVMQQ(-1)$ FRML YJDTVMH JDTVMH =TVMH-(PCPN(-1)/PCPN(-2))*TVMH(-1)$ FRML YJDTVMO JDTVMO =TVMO-(PCPN(-1)/PCPN(-2))*TVMO(-1)$ FRML YJDTVEA JDTVEA =TVEA-(PCPN(-1)/PCPN(-2))*TVEA(-1)$ FRML YJDTVEE JDTVEE =TVEE-(PCPN(-1)/PCPN(-2))*TVEE(-1)$ FRML YJDTVENG JDTVENG =TVENG-(PCPN(-1)/PCPN(-2))*TVENG(-1)$ FRML YJDTVENE JDTVENE =TVENE-(PCPN(-1)/PCPN(-2))*TVENE(-1)$ FRML YJDTVENF JDTVENF =TVENF-(PCPN(-1)/PCPN(-2))*TVENF(-1)$ FRML YJDTVENN JDTVENN =TVENN-(PCPN(-1)/PCPN(-2))*TVENN(-1)$ FRML YJDTVENB JDTVENB =TVENB-(PCPN(-1)/PCPN(-2))*TVENB(-1)$ FRML YJDTVENM JDTVENM =TVENM-(PCPN(-1)/PCPN(-2))*TVENM(-1)$ FRML YJDTVENT JDTVENT =TVENT-(PCPN(-1)/PCPN(-2))*TVENT(-1)$ FRML YJDTVENK JDTVENK =TVENK-(PCPN(-1)/PCPN(-2))*TVENK(-1)$ FRML YJDTVENQ JDTVENQ =TVENQ-(PCPN(-1)/PCPN(-2))*TVENQ(-1)$ FRML YJDTVEB JDTVEB =TVEB-(PCPN(-1)/PCPN(-2))*TVEB(-1)$ FRML YJDTVEQH JDTVEQH =TVEQH-(PCPN(-1)/PCPN(-2))*TVEQH(-1)$ FRML YJDTVEQS JDTVEQS =TVEQS-(PCPN(-1)/PCPN(-2))*TVEQS(-1)$ FRML YJDTVEQT JDTVEQT =TVEQT-(PCPN(-1)/PCPN(-2))*TVEQT(-1)$ FRML YJDTVEQF JDTVEQF =TVEQF-(PCPN(-1)/PCPN(-2))*TVEQF(-1)$ FRML YJDTVEQQ JDTVEQQ =TVEQQ-(PCPN(-1)/PCPN(-2))*TVEQQ(-1)$ FRML YJDTVEH JDTVEH =TVEH-(PCPN(-1)/PCPN(-2))*TVEH(-1)$ FRML YJDTVEO JDTVEO =TVEO-(PCPN(-1)/PCPN(-2))*TVEO(-1)$ FRML YJDAM3RNG JDAM3RNG =AM3RNG/KVENG-AM3RNG(-1)$ FRML YJDAM3KNE JDAM3KNE =AM3KNE/KVENE-AM3KNE(-1)$ FRML YZFM3RNG ZFM3RNG =AM3RNG*FXNG$ FRML YZFM3KNE ZFM3KNE =AM3KNE*FXNE$ FRML YZWSEP_Z_IQ ZWSEP_Z_IQ =WSEP_Z_IQ$ FRML YZWSDKP_Z_IQ ZWSDKP_Z_IQ =WSDKP_Z_IQ$ FRML YZWBP_Z_IQ ZWBP_Z_IQ =WBP_Z_IQ$ FRML YJDWSEP_Z_IQ JDWSEP_Z_IQ =WSEP_Z_IQ-(WSEP_Z_IQ(-1)+TFLPN*BWSP*BWSE_CF+OSELP)$ FRML YJDWSDKP_Z_IQ JDWSDKP_Z_IQ =WSDKP_Z_IQ-(WSDKP_Z_IQ(-1)+TFLPN*BWSP*(1.-BWSE_CF)+OSDKLP)$ FRML YZWSEATP ZWSEATP =WSEATP$ FRML YZWSDKATP ZWSDKATP =WSDKATP$ FRML YZWBATP ZWBATP =WBATP$ FRML YJDWSEATP JDWSEATP =WSEATP-(WSEATP(-1)+(TPATPI-TPATPU+TIATP-SDRATP)*BWSP*BWSE_CF+OSEATP)$ FRML YJDWSDKATP JDWSDKATP =WSDKATP-(WSDKATP(-1)+(TPATPI-TPATPU+TIATP-SDRATP)*BWSP*(1.-BWSE_CF)+OSDKATP)$