home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / talk / origins / 14371 < prev    next >
Encoding:
Text File  |  1992-11-17  |  4.5 KB  |  135 lines
  1. Newsgroups: talk.origins
  2. Path: sparky!uunet!charon.amdahl.com!pacbell.com!sgiblab!zaphod.mps.ohio-state.edu!moe.ksu.ksu.edu!hobbes.physics.uiowa.edu!news.uiowa.edu!icaen!cdminter
  3. From: cdminter@icaen.uiowa.edu (Corey D Minter)
  4. Subject: dna.h
  5. Message-ID: <1992Nov17.202329.22353@icaen.uiowa.edu>
  6. Summary: I found the genentic code, no really :)
  7. Keywords: dna c header file
  8. Sender: usenet@icaen.uiowa.edu (UseNet News daemon)
  9. Organization: Iowa Computer Aided Engineering Network, University of Iowa
  10. Date: Tue, 17 Nov 1992 20:23:29 GMT
  11. Lines: 122
  12.  
  13. I couldn't decide whether to call this post...
  14. "Hey, I've Cracked the Genetic Code!" or "Who Typed MAKE?  No One It is a
  15. Boostrap Program." or "Who Created the SysAdmin?  (Of course there is no
  16. SysAdmin)"  are you following along?  Great!
  17.                                                  
  18. Anyway, I dug this out of a directory here from the ISCA bbs...
  19. ===============================================================================
  20. Date: Fri, 2 Aug 91 13:57:29 hst
  21. From: Timothy Newsham <newsham@wiliki.eng.hawaii.edu>
  22.   
  23.  For many years molecular biologists have been mystified by the fact that 
  24.  very little of an organism's DNA seems to serve any useful function. 
  25.   
  26.  I have solved the mystery.  The reason why only 30% of human DNA performs 
  27.  any useful function is that the rest of it is comments. 
  28.   
  29.  Once we decode a typical human genome, we see that the contents begin as 
  30.  follows: 
  31.   
  32.  /*  HUMAN_DNA.H 
  33.  * 
  34.  *   Human Genome 
  35.  *   Version 2.1 
  36.  * 
  37.  *   (C) God 
  38.  */ 
  39.   
  40.  /*  Revision history: 
  41.  * 
  42.  *   0000-00-01 00:00 1.0  Adam. 
  43.  *   0000-00-02 10:00 1.1  Eve. 
  44.  *   0000-00-03 02:11 1.2  Added penis code to male version.  A bit messy 
  45.  *                         will require a rewrite later on to make it neater. 
  46.  *   0017-03-12 03:14 1.3  Added extra sex drive to male.h; took code from 
  47.  *                         elephant_dna.c 
  48.  *   0145-10-03 16:33 1.4  Removed tail. 
  49.  *   1115-00-31 17:20 1.5  Shortened forearms, expanded brain case. 
  50.  *   2091-08-20 13:56 1.6  Opposable thumbs added to hand() routine. 
  51.  *   2501-04-09 14:04 1.7  Minor cosmetic improvements - skin colour made 
  52.  *                         darker to match my own image. 
  53.  *   2909-07-12 02:21 1.8  Dentition inadequate; added extra 'wisdom' 
  54.  *                         teeth.  Must remember to make mouth bigger to 
  55.  *                         compensate. 
  56.  *   4501-12-31 14:18 1.9  Increase average height. 
  57.  *   5533-02-12 17:09 2.0  Added gay option, triggered by high population 
  58.  *                         density, to try and slow the overpopulation 
  59.  *                         problem. 
  60.  *   6004-11-04 16:11 2.1  Made forefinger narrower to fit hole in centre 
  61.  *                         of CD. 
  62.  */ 
  63.   
  64.  /*  Standard definitions 
  65.  */ 
  66.   
  67.  #define SEX male 
  68.  #define HEIGHT 1.84 
  69.  #define RACE caucasian 
  70.   
  71.  /*  Include inherited traits from parent DNA files. 
  72.  * 
  73.  *   Files must be pre-processed with MENDEL program to provide proper 
  74.  *   inheritance features. 
  75.  */ 
  76.   
  77.  #include "mother.h" 
  78.  #include "father.h" 
  79.   
  80.  #infndef FATHER 
  81.  #warn("Father unknown - guessing/n") 
  82.  #include "bastard.h" 
  83.  #endif 
  84.   
  85.  /*  Set up sex-specific functions and variables 
  86.  */ 
  87.  #include <sex.h> 
  88.   
  89.  /*  Kludged code - I'll re-deisgn this lot and re-write it as a proper 
  90.  *   library sometime soon. 
  91.  */ 
  92.  struct genitals 
  93.  { 
  94.  #ifdef MALE 
  95.      Penis *jt; 
  96.  #endif 
  97.  /*  G_spot*g;  Removed for debugging purposes */ 
  98.  #ifdef FEMALE 
  99.  Vagina *p; 
  100.  #endif 
  101.  } 
  102.   
  103.  /*  Initialization bootstrap routine - called before DNA duplication. 
  104.  *   Allocates buffers and sets up protein file pointers 
  105.  */ 
  106.  DNA *zygote_initialize(Sperm *, Ovum *); 
  107.   
  108.  /*  MAIN INITIALIZATION CODE 
  109.  * 
  110.  *   Returns structures containing pre-processed phenotypes for the 
  111.  *   organism to display at birth. 
  112.  * 
  113.  *   Will be improved later to make output less ugly. 
  114.  */ 
  115.   
  116.  Characteristic *lookup_phenotype(Identifier *i); 
  117.   
  118.  ...and so on. 
  119.  
  120.  [Note that God uses three-space tabs] 
  121.  [Make sure to call Hell when it comes back up soon] 
  122. ===============================================================================
  123.  
  124.  
  125.  
  126.  
  127.  
  128. -- 
  129. ==============================================================================
  130. Internet: cdminter@icaen.uiowa.edu | Stimpy: "...what will happen if I push
  131.   Q-Link: EarthsWake (was Chaos0)  |          the button"
  132. ===================================|    Ren: "Maaaaybe someting goooood...
  133. Opinions expressed imply nothing   |          Maaaaybe someting baaaaad...
  134. about my employer, why should they?|          But I guess we'll neeever know?"
  135.