| ¼öÇÐ :: ÀüÈ Åë½Å :: erlangb. ¼öÇÐ :: ÀüÈ Åë½Å :: ErlangB´Â Erlang B °è»êÀ»À§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
¼öÇÐ :: ÀüÈ Åë½Å :: erlangb. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Flavio Poletti
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~polettix/
¼öÇÐ :: ÀüÈ Åë½Å :: erlangb. ű×
¼öÇÐ :: ÀüÈ Åë½Å :: erlangb. ¼³¸í
¼öÇÐ :: ÀüÈ Åë½Å :: ErlangB´Â Erlang B °è»êÀ»À§ÇÑ Perl È®ÀåÀÚÀÔ´Ï´Ù. ¼öÇÐ :: ÀüÈ Åë½Å :: erlangb´Â erlang b °è»êÀ»À§ÇÑ perl È®ÀåÀÚÀÔ´Ï´Ù. ½Ä ³ëÇÁ°¡ ¼öÇÐ :: ÀüÈ :: erlangb qw (: ¸ðµÎ); # Â÷´Ü È®·ü $ bprob = blocking_probability ($ Æ®·¡ÇÈ, $ ¼¹ö)¸¦ Æò°¡ÇÕ´Ï´Ù. $ gos = gos ($ Æ®·¡ÇÈ, $ ¼¹ö); # À§ÀÇ °Í°ú µ¿ÀÏÇÑ °á°ú ÇÊ¿äÇÑ ¼¹ö ¼ö $ Servers = ¼¹ö ($ Æ®·¡ÇÈ, $ gos); # ÃÖ´ë ¼ºñÀÏ Æ®·¡ÇÈ Æ®·¡ÇÈ = Æ®·¡ÇÈ ($ ¼¹ö, $ GOS)À» °è»êÇÕ´Ï´Ù. # ±âº» Á¤¹Ðµµ 0.001 $ Traffic = Æ®·¡ÇÈ ($ ¼¹ö, $ GOS, 1E-10);ÀÌ ¸ðµâ¿¡´Â Erlang B °è»êÀ» ó¸®ÇÏ´Â ´Ù¾çÇÑ ±â´ÉÀÌ Æ÷ÇԵǾî ÀÖ½À´Ï´Ù. Erlang B ¸ðµ¨Àº M / M / S / 0 / INF ¸ðµ¨ (KENDALL Ç¥±â¹ý) : ¡¤ ÀÔ·Â ÇÁ·Î¼¼½º´Â ¸¶¸£ÄÚºñ¾Æ (ÀÌ °æ¿ì Æ÷¾Æ¼Û) ¡¤ ¼ºù °øÁ¤Àº ¸¶¸£ÄÚºñ¾Æ (DITTO) ¡¤ S ¼¹ö°¡ ÀÖ½À´Ï´Ù ¡¤ ±â´Ù¸®Áö ¾Ê´Â ¼± (¼ø¼öÇÑ ¼Õ½Ç) ¡¤ ÀÔ·Â Àα¸´Â ¹«ÇÑÇÑ °ÍÀÔ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
¼öÇÐ :: ÀüÈ Åë½Å :: erlangb. °ü·Ã ¼ÒÇÁÆ®¿þ¾î