Acme :: bloodtype.

ACME :: BloodTypeÀº À¯¸í ÀλçÀÇ Ç÷¾×Çü¿¡ »ç·Î ÀâÈù »ç¶÷µéÀ»À§ÇÑ Perl ¸ðµâÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Acme :: bloodtype. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Andrew Rodland
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~arodland/Acme-BloodType-0.01/lib/Acme/BloodType.pm

Acme :: bloodtype. ű×


Acme :: bloodtype. ¼³¸í

Acme :: BloodTypeÀº À¯¸í ÀλçÀÇ Ç÷¾×Çü¿¡ »ç·Î ÀâÈù »ç¶÷µéÀ»À§ÇÑ Perl ¸ðµâÀÔ´Ï´Ù. Acme :: BloodTypeÀº À¯¸í ÀλçÀÇ Ç÷¾×Çü¿¡ »ç·Î ÀâÈù »ç¶÷µéÀ»À§ÇÑ Perl ¸ðµâÀÔ´Ï´Ù. ´Ù¾çÇÑ Ç÷¾×ÇüÀ» °¡Áø »ç¶÷µéÀ» ¸ðµ¨¸µÇÏ°í ¾ÆÀÌ°¡ÀÖ´Â °æ¿ì ¾î¶² ÀÏÀÌ ÀϾÁö¸¦ ¸¸µå´Â °ÍÀ» ¾Ë ¼ö ÀÖ½À´Ï´Ù. ¾ËÆÄ ¹öÀüÀº ÇöÀç ABO¸¦ ó¸®ÇÕ´Ï´Ù. ACME :: BloodTypeÀ» »ç¿ëÇϽʽÿÀ. # HOOLAY Gene Sequencers $ Mary = Acme :: BloodType-> New ({enotype => "AA"}); $ Bill = Acme :: BloodType-> new ({phenotype => "o"}); $ baby = $ mary-> ½ÊÀÚ°¡ ($ bill); "±×°ÍÀº", $ baby-> get_bloodtype, "! n"; methodAcme :: bloodtype-> new (% ÁöÁ¤ ÀÚ) »ç¶÷À» ³ªÅ¸³»´Â ACME :: BloodType °´Ã¼¸¦ ¸¸µì´Ï´Ù. À¯ÀüÀÚÇü, Ç¥ÇöÇü (ÀÌ °æ¿ì À¯ÀüÀÚÇüÀÌ ¹«ÀÛÀ§·Î ¼±ÅÃµÈ °æ¿ì) ¶Ç´Â ¾Æ¹« °Íµµ ¼±ÅÃÇÏÁö ¾Ê°Å³ª ¸ðµç °ÍÀÌ ¹«ÀÛÀ§·Î ÁöÁ¤ÇÒ ¼ö ÀÖ½À´Ï´Ù. È®·üÀº (¾ÆÁ÷) ½ÇÁ¦ ¹èÆ÷ÆÇÀ» ¸ðµ¨¸µÇÏÁö ¾Ê½À´Ï´Ù. $ bt-> get_bloodtypegetÀÌ »ç¶÷ÀÇ bloodtype (phenotype). "a", "b", "ab"¶Ç´Â "o"¸¦ ¹ÝȯÇÕ´Ï´Ù. $ bt-> get_genotypegetÀÌ »ç¶÷ÀÇ À¯ÀüÀÚÇüÀÔ´Ï´Ù. "a", "b"¶Ç´Â "o"ÀÏ ¼öÀÖ´Â µÎ ÀÚÀÇ ¹®ÀÚ¿­À» ¹ÝȯÇÕ´Ï´Ù. $ BT1-> Cross ($ bt2) "´Ù¸¥ »ç¶÷"À» ´Ù¸¥ »ç¶÷°ú ÇÔ²² ¼±ÅÃÇÏ¿© ¹«ÀÛÀ§·Î ¼±ÅÃÇÑ °á°ú¸¦ »ý¼ºÇÕ´Ï´Ù. ¸àµ¨. ¿ä±¸ »çÇ× : ¡¤ Perl.


Acme :: bloodtype. °ü·Ã ¼ÒÇÁÆ®¿þ¾î

³» Æ®À§ÅÍ

³» Æ®À§ÅÍ´Â Twitter »ç¿ëÀÚ »óŸ¦ ¼³Á¤ÇÏ°í °Ë»öÇÏ´Â µ¥ PHP Ŭ·¡½º¸¦ »ç¿ëÇÒ ¼ö ÀÖ½À´Ï´Ù. ...

89

´Ù¿î·Îµå