ࡱ> Root EntryRoot Entry*0_^PxContentsY {\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl{\f0\fnil\fcharset0 Courier New;}} {\colortbl ;\red0\green0\blue255;\red0\green0\blue0;\red0\green175\blue0;} \viewkind4\uc1\pard\cf1\f0\fs20 MODEL\cf2 : \par \cf1 TITLE\cf2 Stochastic infinite-period inventory \cf1 model\cf2 with uniform demand - LING19j; \par \cf3 ! Calculate the optimal order up to stock level, S;\cf2 \par \cf1 DATA\cf2 : \par MU = 400; \cf3 ! Mean demand per month, Assumed uniform in [0, 2*MU];\cf2 \par C = 35; \cf3 ! Cost/unit purchased;\cf2 \par P = 15; \cf3 ! Penalty/unit unsatisfied demand;\cf2 \par H = 1; \cf3 ! Holding cost/unit left in inventory;\cf2 \par ALPHA = .995; \cf3 ! Monthly discount factor;\cf2 \par \cf1 ENDDATA\cf2 \par \cf3 !------------------------------------------------------------;\cf2 \par \cf3 ! Compute the newsboy ratio;\cf2 \par RATIO = ( P - C*(1-ALPHA))/( P + H); \par \cf3 ! Solve;\cf2 \par S/(2*MU) = RATIO; \par \par \cf3 ! A free copy of LINGO can be downloaded from: \par http://www.lindo.com;\cf2 \par \cf1 END\cf2 \par \par }