#include <stdlife.h> DEATH human( void ) { MAN i = born( MOTHER, random_gene( MALE ) ); while ( i.Age < SchoolAge ) { if ( play( i ) == ERROR ) /* 事故など */ return( NORMAL ); i.Age += grow( i.Health ); } short result = -1; /* 試験結果 */ while ( i.Age < Adult ) { result = exam( i ); if (result <= ( last_average( i.Age ) * 0.80 )) /* ここは */ break; /* 法規により定数使用不可 */ i.Age += grow( i.Health ); } if ( i.Age == Adult ) { /* 最終学歴まで達していれば */ liveAsMaster( i ); /* 行政に参与 */ } else { while ( i.Age < TooOld ) { if ( ( workAsSlave( i ) == ERROR ) || ( i.Health < MACHINE ) ) return( NORMAL ); else i.Age += grow( MACHINE ); /* ここでは、法規により */ } /* i.Health の使用不可 */ } /* NOT REACHED */ return( LOGIC_ERROR ); /* プログラムに問題あり */ |
「日経MIX」のsf会議で投稿された「暗黒時代のプロクラム」kneo@mix.or.jpさん作 |