whale.c
上传用户:xk288cn
上传日期:2007-05-28
资源大小:4876k
文件大小:49k
源码类别:

GIS编程

开发平台:

Visual C++

  1. /**
  2.  * (c) Copyright 1993, 1994, Silicon Graphics, Inc.
  3.  * ALL RIGHTS RESERVED
  4.  * Permission to use, copy, modify, and distribute this software for
  5.  * any purpose and without fee is hereby granted, provided that the above
  6.  * copyright notice appear in all copies and that both the copyright notice
  7.  * and this permission notice appear in supporting documentation, and that
  8.  * the name of Silicon Graphics, Inc. not be used in advertising
  9.  * or publicity pertaining to distribution of the software without specific,
  10.  * written prior permission.
  11.  *
  12.  * THE MATERIAL EMBODIED ON THIS SOFTWARE IS PROVIDED TO YOU "AS-IS"
  13.  * AND WITHOUT WARRANTY OF ANY KIND, EXPRESS, IMPLIED OR OTHERWISE,
  14.  * INCLUDING WITHOUT LIMITATION, ANY WARRANTY OF MERCHANTABILITY OR
  15.  * FITNESS FOR A PARTICULAR PURPOSE.  IN NO EVENT SHALL SILICON
  16.  * GRAPHICS, INC.  BE LIABLE TO YOU OR ANYONE ELSE FOR ANY DIRECT,
  17.  * SPECIAL, INCIDENTAL, INDIRECT OR CONSEQUENTIAL DAMAGES OF ANY
  18.  * KIND, OR ANY DAMAGES WHATSOEVER, INCLUDING WITHOUT LIMITATION,
  19.  * LOSS OF PROFIT, LOSS OF USE, SAVINGS OR REVENUE, OR THE CLAIMS OF
  20.  * THIRD PARTIES, WHETHER OR NOT SILICON GRAPHICS, INC.  HAS BEEN
  21.  * ADVISED OF THE POSSIBILITY OF SUCH LOSS, HOWEVER CAUSED AND ON
  22.  * ANY THEORY OF LIABILITY, ARISING OUT OF OR IN CONNECTION WITH THE
  23.  * POSSESSION, USE OR PERFORMANCE OF THIS SOFTWARE.
  24.  *
  25.  * US Government Users Restricted Rights
  26.  * Use, duplication, or disclosure by the Government is subject to
  27.  * restrictions set forth in FAR 52.227.19(c)(2) or subparagraph
  28.  * (c)(1)(ii) of the Rights in Technical Data and Computer Software
  29.  * clause at DFARS 252.227-7013 and/or in similar or successor
  30.  * clauses in the FAR or the DOD or NASA FAR Supplement.
  31.  * Unpublished-- rights reserved under the copyright laws of the
  32.  * United States.  Contractor/manufacturer is Silicon Graphics,
  33.  * Inc., 2011 N.  Shoreline Blvd., Mountain View, CA 94039-7311.
  34.  *
  35.  * OpenGL(TM) is a trademark of Silicon Graphics, Inc.
  36.  */
  37. #include <GL/glut.h>
  38. #include <math.h>
  39. #include "atlantis.h"
  40. /* *INDENT-OFF* */
  41. static float N001[3] = {0.019249 ,0.011340 ,-0.999750};
  42. static float N002[3] = {-0.132579 ,0.954547 ,0.266952};
  43. static float N003[3] = {-0.196061 ,0.980392 ,-0.019778};
  44. static float N004[3] = {0.695461 ,0.604704 ,0.388158};
  45. static float N005[3] = {0.870600 ,0.425754 ,0.246557};
  46. static float N006[3] = {-0.881191 ,0.392012 ,0.264251};
  47. static float N008[3] = {-0.341437 ,0.887477 ,0.309523};
  48. static float N009[3] = {0.124035 ,-0.992278 ,0.000000};
  49. static float N010[3] = {0.242536 ,0.000000 ,-0.970143};
  50. static float N011[3] = {0.588172 ,0.000000 ,0.808736};
  51. static float N012[3] = {0.929824 ,-0.340623 ,-0.139298};
  52. static float N013[3] = {0.954183 ,0.267108 ,-0.134865};
  53. static float N014[3] = {0.495127 ,0.855436 ,-0.151914};
  54. static float N015[3] = {-0.390199 ,0.906569 ,-0.160867};
  55. static float N016[3] = {-0.923605 ,0.354581 ,-0.145692};
  56. static float N017[3] = {-0.955796 ,-0.260667 ,-0.136036};
  57. static float N018[3] = {-0.501283 ,-0.853462 ,-0.142540};
  58. static float N019[3] = {0.405300 ,-0.901974 ,-0.148913};
  59. static float N020[3] = {0.909913 ,-0.392746 ,-0.133451};
  60. static float N021[3] = {0.936494 ,0.331147 ,-0.115414};
  61. static float N022[3] = {0.600131 ,0.793724 ,-0.099222};
  62. static float N023[3] = {-0.231556 ,0.968361 ,-0.093053};
  63. static float N024[3] = {-0.844369 ,0.525330 ,-0.105211};
  64. static float N025[3] = {-0.982725 ,-0.136329 ,-0.125164};
  65. static float N026[3] = {-0.560844 ,-0.822654 ,-0.093241};
  66. static float N027[3] = {0.263884 ,-0.959981 ,-0.093817};
  67. static float N028[3] = {0.842057 ,-0.525192 ,-0.122938};
  68. static float N029[3] = {0.921620 ,0.367565 ,-0.124546};
  69. static float N030[3] = {0.613927 ,0.784109 ,-0.090918};
  70. static float N031[3] = {-0.448754 ,0.888261 ,-0.098037};
  71. static float N032[3] = {-0.891865 ,0.434376 ,-0.126077};
  72. static float N033[3] = {-0.881447 ,-0.448017 ,-0.149437};
  73. static float N034[3] = {-0.345647 ,-0.922057 ,-0.174183};
  74. static float N035[3] = {0.307998 ,-0.941371 ,-0.137688};
  75. static float N036[3] = {0.806316 ,-0.574647 ,-0.140124};
  76. static float N037[3] = {0.961346 ,0.233646 ,-0.145681};
  77. static float N038[3] = {0.488451 ,0.865586 ,-0.110351};
  78. static float N039[3] = {-0.374290 ,0.921953 ,-0.099553};
  79. static float N040[3] = {-0.928504 ,0.344533 ,-0.138485};
  80. static float N041[3] = {-0.918419 ,-0.371792 ,-0.135189};
  81. static float N042[3] = {-0.520666 ,-0.833704 ,-0.183968};
  82. static float N043[3] = {0.339204 ,-0.920273 ,-0.195036};
  83. static float N044[3] = {0.921475 ,-0.387382 ,-0.028636};
  84. static float N045[3] = {0.842465 ,0.533335 ,-0.076204};
  85. static float N046[3] = {0.380110 ,0.924939 ,0.002073};
  86. static float N047[3] = {-0.276128 ,0.961073 ,-0.009579};
  87. static float N048[3] = {-0.879684 ,0.473001 ,-0.049250};
  88. static float N049[3] = {-0.947184 ,-0.317614 ,-0.044321};
  89. static float N050[3] = {-0.642059 ,-0.764933 ,-0.051363};
  90. static float N051[3] = {0.466794 ,-0.880921 ,-0.077990};
  91. static float N052[3] = {0.898509 ,-0.432277 ,0.076279};
  92. static float N053[3] = {0.938985 ,0.328141 ,0.103109};
  93. static float N054[3] = {0.442420 ,0.895745 ,0.043647};
  94. static float N055[3] = {-0.255163 ,0.966723 ,0.018407};
  95. static float N056[3] = {-0.833769 ,0.540650 ,0.111924};
  96. static float N057[3] = {-0.953653 ,-0.289939 ,0.080507};
  97. static float N058[3] = {-0.672357 ,-0.730524 ,0.119461};
  98. static float N059[3] = {0.522249 ,-0.846652 ,0.102157};
  99. static float N060[3] = {0.885868 ,-0.427631 ,0.179914};
  100. static float N062[3] = {0.648942 ,0.743116 ,0.163255};
  101. static float N063[3] = {-0.578967 ,0.807730 ,0.111219};
  102. static float N065[3] = {-0.909864 ,-0.352202 ,0.219321};
  103. static float N066[3] = {-0.502541 ,-0.818090 ,0.279610};
  104. static float N067[3] = {0.322919 ,-0.915358 ,0.240504};
  105. static float N068[3] = {0.242536 ,0.000000 ,-0.970143};
  106. static float N069[3] = {0.000000 ,1.000000 ,0.000000};
  107. static float N070[3] = {0.000000 ,1.000000 ,0.000000};
  108. static float N071[3] = {0.000000 ,1.000000 ,0.000000};
  109. static float N072[3] = {0.000000 ,1.000000 ,0.000000};
  110. static float N073[3] = {0.000000 ,1.000000 ,0.000000};
  111. static float N074[3] = {0.000000 ,1.000000 ,0.000000};
  112. static float N075[3] = {0.031220 ,0.999025 ,-0.031220};
  113. static float N076[3] = {0.000000 ,1.000000 ,0.000000};
  114. static float N077[3] = {0.446821 ,0.893642 ,0.041889};
  115. static float N078[3] = {0.863035 ,-0.100980 ,0.494949};
  116. static float N079[3] = {0.585597 ,-0.808215 ,0.062174};
  117. static float N080[3] = {0.000000 ,1.000000 ,0.000000};
  118. static float N081[3] = {1.000000 ,0.000000 ,0.000000};
  119. static float N082[3] = {0.000000 ,1.000000 ,0.000000};
  120. static float N083[3] = {-1.000000 ,0.000000 ,0.000000};
  121. static float N084[3] = {-0.478893 ,0.837129 ,-0.264343};
  122. static float N085[3] = {0.000000 ,1.000000 ,0.000000};
  123. static float N086[3] = {0.763909 ,0.539455 ,-0.354163};
  124. static float N087[3] = {0.446821 ,0.893642 ,0.041889};
  125. static float N088[3] = {0.385134 ,-0.908288 ,0.163352};
  126. static float N089[3] = {-0.605952 ,0.779253 ,-0.159961};
  127. static float N090[3] = {0.000000 ,1.000000 ,0.000000};
  128. static float N091[3] = {0.000000 ,1.000000 ,0.000000};
  129. static float N092[3] = {0.000000 ,1.000000 ,0.000000};
  130. static float N093[3] = {0.000000 ,1.000000 ,0.000000};
  131. static float N094[3] = {1.000000 ,0.000000 ,0.000000};
  132. static float N095[3] = {-1.000000 ,0.000000 ,0.000000};
  133. static float N096[3] = {0.644444 ,-0.621516 ,0.445433};
  134. static float N097[3] = {-0.760896 ,-0.474416 ,0.442681};
  135. static float N098[3] = {0.636888 ,-0.464314 ,0.615456};
  136. static float N099[3] = {-0.710295 ,0.647038 ,0.277168};
  137. static float N100[3] = {0.009604 ,0.993655 ,0.112063};
  138. static float iP001[3] = {18.74, 13.19, 3.76};
  139. static float P001[3] = {18.74, 13.19, 3.76};
  140. static float P002[3] = {0.00, 390.42, 10292.57};
  141. static float P003[3] = {55.80, 622.31, 8254.35};
  142. static float P004[3] = {20.80, 247.66, 10652.13};
  143. static float P005[3] = {487.51, 198.05, 9350.78};
  144. static float P006[3] = {-457.61, 199.04, 9353.01};
  145. static float P008[3] = {-34.67, 247.64, 10663.71};
  146. static float iP009[3] = {97.46, 67.63, 593.82};
  147. static float iP010[3] = {-84.33, 67.63, 588.18};
  148. static float iP011[3] = {118.69, 8.98, -66.91};
  149. static float P009[3] = {97.46, 67.63, 593.82};
  150. static float P010[3] = {-84.33, 67.63, 588.18};
  151. static float P011[3] = {118.69, 8.98, -66.91};
  152. static float iP012[3] = {156.48, -31.95, 924.54};
  153. static float iP013[3] = {162.00, 110.22, 924.54};
  154. static float iP014[3] = {88.16, 221.65, 924.54};
  155. static float iP015[3] = {-65.21, 231.16, 924.54};
  156. static float iP016[3] = {-156.48, 121.97, 924.54};
  157. static float iP017[3] = {-162.00, -23.93, 924.54};
  158. static float iP018[3] = {-88.16, -139.10, 924.54};
  159. static float iP019[3] = {65.21, -148.61, 924.54};
  160. static float iP020[3] = {246.87, -98.73, 1783.04};
  161. static float iP021[3] = {253.17, 127.76, 1783.04};
  162. static float iP022[3] = {132.34, 270.77, 1783.04};
  163. static float iP023[3] = {-97.88, 285.04, 1783.04};
  164. static float iP024[3] = {-222.97, 139.80, 1783.04};
  165. static float iP025[3] = {-225.29, -86.68, 1783.04};
  166. static float iP026[3] = {-108.44, -224.15, 1783.04};
  167. static float iP027[3] = {97.88, -221.56, 1783.04};
  168. static float iP028[3] = {410.55, -200.66, 3213.87};
  169. static float iP029[3] = {432.19, 148.42, 3213.87};
  170. static float iP030[3] = {200.66, 410.55, 3213.87};
  171. static float iP031[3] = {-148.42, 432.19, 3213.87};
  172. static float iP032[3] = {-407.48, 171.88, 3213.87};
  173. static float iP033[3] = {-432.19, -148.42, 3213.87};
  174. static float iP034[3] = {-148.88, -309.74, 3213.87};
  175. static float iP035[3] = {156.38, -320.17, 3213.87};
  176. static float iP036[3] = {523.39, -303.81, 4424.57};
  177. static float iP037[3] = {574.66, 276.84, 4424.57};
  178. static float iP038[3] = {243.05, 492.50, 4424.57};
  179. static float iP039[3] = {-191.23, 520.13, 4424.57};
  180. static float iP040[3] = {-523.39, 304.01, 4424.57};
  181. static float iP041[3] = {-574.66, -231.83, 4424.57};
  182. static float iP042[3] = {-266.95, -578.17, 4424.57};
  183. static float iP043[3] = {211.14, -579.67, 4424.57};
  184. static float iP044[3] = {680.57, -370.27, 5943.46};
  185. static float iP045[3] = {834.01, 363.09, 5943.46};
  186. static float iP046[3] = {371.29, 614.13, 5943.46};
  187. static float iP047[3] = {-291.43, 621.86, 5943.46};
  188. static float iP048[3] = {-784.13, 362.60, 5943.46};
  189. static float iP049[3] = {-743.29, -325.82, 5943.46};
  190. static float iP050[3] = {-383.24, -804.77, 5943.46};
  191. static float iP051[3] = {283.47, -846.09, 5943.46};
  192. static float P012[3] = {156.48, -31.95, 924.54};
  193. static float P013[3] = {162.00, 110.22, 924.54};
  194. static float P014[3] = {88.16, 221.65, 924.54};
  195. static float P015[3] = {-65.21, 231.16, 924.54};
  196. static float P016[3] = {-156.48, 121.97, 924.54};
  197. static float P017[3] = {-162.00, -23.93, 924.54};
  198. static float P018[3] = {-88.16, -139.10, 924.54};
  199. static float P019[3] = {65.21, -148.61, 924.54};
  200. static float P020[3] = {246.87, -98.73, 1783.04};
  201. static float P021[3] = {253.17, 127.76, 1783.04};
  202. static float P022[3] = {132.34, 270.77, 1783.04};
  203. static float P023[3] = {-97.88, 285.04, 1783.04};
  204. static float P024[3] = {-222.97, 139.80, 1783.04};
  205. static float P025[3] = {-225.29, -86.68, 1783.04};
  206. static float P026[3] = {-108.44, -224.15, 1783.04};
  207. static float P027[3] = {97.88, -221.56, 1783.04};
  208. static float P028[3] = {410.55, -200.66, 3213.87};
  209. static float P029[3] = {432.19, 148.42, 3213.87};
  210. static float P030[3] = {200.66, 410.55, 3213.87};
  211. static float P031[3] = {-148.42, 432.19, 3213.87};
  212. static float P032[3] = {-407.48, 171.88, 3213.87};
  213. static float P033[3] = {-432.19, -148.42, 3213.87};
  214. static float P034[3] = {-148.88, -309.74, 3213.87};
  215. static float P035[3] = {156.38, -320.17, 3213.87};
  216. static float P036[3] = {523.39, -303.81, 4424.57};
  217. static float P037[3] = {574.66, 276.84, 4424.57};
  218. static float P038[3] = {243.05, 492.50, 4424.57};
  219. static float P039[3] = {-191.23, 520.13, 4424.57};
  220. static float P040[3] = {-523.39, 304.01, 4424.57};
  221. static float P041[3] = {-574.66, -231.83, 4424.57};
  222. static float P042[3] = {-266.95, -578.17, 4424.57};
  223. static float P043[3] = {211.14, -579.67, 4424.57};
  224. static float P044[3] = {680.57, -370.27, 5943.46};
  225. static float P045[3] = {834.01, 363.09, 5943.46};
  226. static float P046[3] = {371.29, 614.13, 5943.46};
  227. static float P047[3] = {-291.43, 621.86, 5943.46};
  228. static float P048[3] = {-784.13, 362.60, 5943.46};
  229. static float P049[3] = {-743.29, -325.82, 5943.46};
  230. static float P050[3] = {-383.24, -804.77, 5943.46};
  231. static float P051[3] = {283.47, -846.09, 5943.46};
  232. static float P052[3] = {599.09, -332.24, 7902.59};
  233. static float P053[3] = {735.48, 306.26, 7911.92};
  234. static float P054[3] = {321.55, 558.53, 7902.59};
  235. static float P055[3] = {-260.54, 559.84, 7902.59};
  236. static float P056[3] = {-698.66, 320.83, 7902.59};
  237. static float P057[3] = {-643.29, -299.16, 7902.59};
  238. static float P058[3] = {-341.47, -719.30, 7902.59};
  239. static float P059[3] = {252.57, -756.12, 7902.59};
  240. static float P060[3] = {458.39, -265.31, 9355.44};
  241. static float P062[3] = {224.04, 438.98, 9364.77};
  242. static float P063[3] = {-165.71, 441.27, 9355.44};
  243. static float P065[3] = {-473.99, -219.71, 9355.44};
  244. static float P066[3] = {-211.97, -479.87, 9355.44};
  245. static float P067[3] = {192.86, -504.03, 9355.44};
  246. static float iP068[3] = {-112.44, 9.25, -64.42};
  247. static float iP069[3] = {1155.63, 0.00, -182.46};
  248. static float iP070[3] = {-1143.13, 0.00, -181.54};
  249. static float iP071[3] = {1424.23, 0.00, -322.09};
  250. static float iP072[3] = {-1368.01, 0.00, -310.38};
  251. static float iP073[3] = {1255.57, 2.31, 114.05};
  252. static float iP074[3] = {-1149.38, 0.00, 117.12};
  253. static float iP075[3] = {718.36, 0.00, 433.36};
  254. static float iP076[3] = {-655.90, 0.00, 433.36};
  255. static float P068[3] = {-112.44, 9.25, -64.42};
  256. static float P069[3] = {1155.63, 0.00, -182.46};
  257. static float P070[3] = {-1143.13, 0.00, -181.54};
  258. static float P071[3] = {1424.23, 0.00, -322.09};
  259. static float P072[3] = {-1368.01, 0.00, -310.38};
  260. static float P073[3] = {1255.57, 2.31, 114.05};
  261. static float P074[3] = {-1149.38, 0.00, 117.12};
  262. static float P075[3] = {718.36, 0.00, 433.36};
  263. static float P076[3] = {-655.90, 0.00, 433.36};
  264. static float P077[3] = {1058.00, -2.66, 7923.51};
  265. static float P078[3] = {-1016.51, -15.47, 7902.87};
  266. static float P079[3] = {-1363.99, -484.50, 7593.38};
  267. static float P080[3] = {1478.09, -861.47, 7098.12};
  268. static float P081[3] = {1338.06, -284.68, 7024.15};
  269. static float P082[3] = {-1545.51, -860.64, 7106.60};
  270. static float P083[3] = {1063.19, -70.46, 7466.60};
  271. static float P084[3] = {-1369.18, -288.11, 7015.34};
  272. static float P085[3] = {1348.44, -482.50, 7591.41};
  273. static float P086[3] = {-1015.45, -96.80, 7474.86};
  274. static float P087[3] = {731.04, 148.38, 7682.58};
  275. static float P088[3] = {-697.03, 151.82, 7668.81};
  276. static float P089[3] = {-686.82, 157.09, 7922.29};
  277. static float P090[3] = {724.73, 147.75, 7931.39};
  278. static float iP091[3] = {0.00, 327.10, 2346.55};
  279. static float iP092[3] = {0.00, 552.28, 2311.31};
  280. static float iP093[3] = {0.00, 721.16, 2166.41};
  281. static float iP094[3] = {0.00, 693.42, 2388.80};
  282. static float iP095[3] = {0.00, 389.44, 2859.97};
  283. static float P091[3] = {0.00, 327.10, 2346.55};
  284. static float P092[3] = {0.00, 552.28, 2311.31};
  285. static float P093[3] = {0.00, 721.16, 2166.41};
  286. static float P094[3] = {0.00, 693.42, 2388.80};
  287. static float P095[3] = {0.00, 389.44, 2859.97};
  288. static float iP096[3] = {222.02, -183.67, 10266.89};
  289. static float iP097[3] = {-128.90, -182.70, 10266.89};
  290. static float iP098[3] = {41.04, 88.31, 10659.36};
  291. static float iP099[3] = {-48.73, 88.30, 10659.36};
  292. static float P096[3] = {222.02, -183.67, 10266.89};
  293. static float P097[3] = {-128.90, -182.70, 10266.89};
  294. static float P098[3] = {41.04, 88.31, 10659.36};
  295. static float P099[3] = {-48.73, 88.30, 10659.36};
  296. static float P100[3] = {0.00, 603.42, 9340.68};
  297. static float P104[3] = {-9.86, 567.62, 7858.65};
  298. static float P105[3] = {31.96, 565.27, 7908.46};
  299. static float P106[3] = {22.75, 568.13, 7782.83};
  300. static float P107[3] = {58.93, 568.42, 7775.94};
  301. static float P108[3] = {55.91, 565.59, 7905.86};
  302. static float P109[3] = {99.21, 566.00, 7858.65};
  303. static float P110[3] = {-498.83, 148.14, 9135.10};
  304. static float P111[3] = {-495.46, 133.24, 9158.48};
  305. static float P112[3] = {-490.82, 146.23, 9182.76};
  306. static float P113[3] = {-489.55, 174.11, 9183.66};
  307. static float P114[3] = {-492.92, 189.00, 9160.28};
  308. static float P115[3] = {-497.56, 176.02, 9136.00};
  309. static float P116[3] = {526.54, 169.68, 9137.70};
  310. static float P117[3] = {523.49, 184.85, 9161.42};
  311. static float P118[3] = {518.56, 171.78, 9186.06};
  312. static float P119[3] = {516.68, 143.53, 9186.98};
  313. static float P120[3] = {519.73, 128.36, 9163.26};
  314. static float P121[3] = {524.66, 141.43, 9138.62};
  315. /* *INDENT-ON* */
  316. void
  317. Whale001(void)
  318. {
  319.     glBegin(GL_POLYGON);
  320.     glNormal3fv(N001);
  321.     glVertex3fv(P001);
  322.     glNormal3fv(N068);
  323.     glVertex3fv(P068);
  324.     glNormal3fv(N010);
  325.     glVertex3fv(P010);
  326.     glEnd();
  327.     glBegin(GL_POLYGON);
  328.     glNormal3fv(N068);
  329.     glVertex3fv(P068);
  330.     glNormal3fv(N076);
  331.     glVertex3fv(P076);
  332.     glNormal3fv(N010);
  333.     glVertex3fv(P010);
  334.     glEnd();
  335.     glBegin(GL_POLYGON);
  336.     glNormal3fv(N068);
  337.     glVertex3fv(P068);
  338.     glNormal3fv(N070);
  339.     glVertex3fv(P070);
  340.     glNormal3fv(N076);
  341.     glVertex3fv(P076);
  342.     glEnd();
  343.     glBegin(GL_POLYGON);
  344.     glNormal3fv(N076);
  345.     glVertex3fv(P076);
  346.     glNormal3fv(N070);
  347.     glVertex3fv(P070);
  348.     glNormal3fv(N074);
  349.     glVertex3fv(P074);
  350.     glEnd();
  351.     glBegin(GL_POLYGON);
  352.     glNormal3fv(N070);
  353.     glVertex3fv(P070);
  354.     glNormal3fv(N072);
  355.     glVertex3fv(P072);
  356.     glNormal3fv(N074);
  357.     glVertex3fv(P074);
  358.     glEnd();
  359.     glBegin(GL_POLYGON);
  360.     glNormal3fv(N072);
  361.     glVertex3fv(P072);
  362.     glNormal3fv(N070);
  363.     glVertex3fv(P070);
  364.     glNormal3fv(N074);
  365.     glVertex3fv(P074);
  366.     glEnd();
  367.     glBegin(GL_POLYGON);
  368.     glNormal3fv(N074);
  369.     glVertex3fv(P074);
  370.     glNormal3fv(N070);
  371.     glVertex3fv(P070);
  372.     glNormal3fv(N076);
  373.     glVertex3fv(P076);
  374.     glEnd();
  375.     glBegin(GL_POLYGON);
  376.     glNormal3fv(N070);
  377.     glVertex3fv(P070);
  378.     glNormal3fv(N068);
  379.     glVertex3fv(P068);
  380.     glNormal3fv(N076);
  381.     glVertex3fv(P076);
  382.     glEnd();
  383.     glBegin(GL_POLYGON);
  384.     glNormal3fv(N076);
  385.     glVertex3fv(P076);
  386.     glNormal3fv(N068);
  387.     glVertex3fv(P068);
  388.     glNormal3fv(N010);
  389.     glVertex3fv(P010);
  390.     glEnd();
  391.     glBegin(GL_POLYGON);
  392.     glNormal3fv(N068);
  393.     glVertex3fv(P068);
  394.     glNormal3fv(N001);
  395.     glVertex3fv(P001);
  396.     glNormal3fv(N010);
  397.     glVertex3fv(P010);
  398.     glEnd();
  399. }
  400. void
  401. Whale002(void)
  402. {
  403.     glBegin(GL_POLYGON);
  404.     glNormal3fv(N011);
  405.     glVertex3fv(P011);
  406.     glNormal3fv(N001);
  407.     glVertex3fv(P001);
  408.     glNormal3fv(N009);
  409.     glVertex3fv(P009);
  410.     glEnd();
  411.     glBegin(GL_POLYGON);
  412.     glNormal3fv(N075);
  413.     glVertex3fv(P075);
  414.     glNormal3fv(N011);
  415.     glVertex3fv(P011);
  416.     glNormal3fv(N009);
  417.     glVertex3fv(P009);
  418.     glEnd();
  419.     glBegin(GL_POLYGON);
  420.     glNormal3fv(N069);
  421.     glVertex3fv(P069);
  422.     glNormal3fv(N011);
  423.     glVertex3fv(P011);
  424.     glNormal3fv(N075);
  425.     glVertex3fv(P075);
  426.     glEnd();
  427.     glBegin(GL_POLYGON);
  428.     glNormal3fv(N069);
  429.     glVertex3fv(P069);
  430.     glNormal3fv(N075);
  431.     glVertex3fv(P075);
  432.     glNormal3fv(N073);
  433.     glVertex3fv(P073);
  434.     glEnd();
  435.     glBegin(GL_POLYGON);
  436.     glNormal3fv(N071);
  437.     glVertex3fv(P071);
  438.     glNormal3fv(N069);
  439.     glVertex3fv(P069);
  440.     glNormal3fv(N073);
  441.     glVertex3fv(P073);
  442.     glEnd();
  443.     glBegin(GL_POLYGON);
  444.     glNormal3fv(N001);
  445.     glVertex3fv(P001);
  446.     glNormal3fv(N011);
  447.     glVertex3fv(P011);
  448.     glNormal3fv(N009);
  449.     glVertex3fv(P009);
  450.     glEnd();
  451.     glBegin(GL_POLYGON);
  452.     glNormal3fv(N009);
  453.     glVertex3fv(P009);
  454.     glNormal3fv(N011);
  455.     glVertex3fv(P011);
  456.     glNormal3fv(N075);
  457.     glVertex3fv(P075);
  458.     glEnd();
  459.     glBegin(GL_POLYGON);
  460.     glNormal3fv(N011);
  461.     glVertex3fv(P011);
  462.     glNormal3fv(N069);
  463.     glVertex3fv(P069);
  464.     glNormal3fv(N075);
  465.     glVertex3fv(P075);
  466.     glEnd();
  467.     glBegin(GL_POLYGON);
  468.     glNormal3fv(N069);
  469.     glVertex3fv(P069);
  470.     glNormal3fv(N073);
  471.     glVertex3fv(P073);
  472.     glNormal3fv(N075);
  473.     glVertex3fv(P075);
  474.     glEnd();
  475.     glBegin(GL_POLYGON);
  476.     glNormal3fv(N069);
  477.     glVertex3fv(P069);
  478.     glNormal3fv(N071);
  479.     glVertex3fv(P071);
  480.     glNormal3fv(N073);
  481.     glVertex3fv(P073);
  482.     glEnd();
  483. }
  484. void
  485. Whale003(void)
  486. {
  487.     glBegin(GL_POLYGON);
  488.     glNormal3fv(N018);
  489.     glVertex3fv(P018);
  490.     glNormal3fv(N001);
  491.     glVertex3fv(P001);
  492.     glNormal3fv(N019);
  493.     glVertex3fv(P019);
  494.     glEnd();
  495.     glBegin(GL_POLYGON);
  496.     glNormal3fv(N019);
  497.     glVertex3fv(P019);
  498.     glNormal3fv(N001);
  499.     glVertex3fv(P001);
  500.     glNormal3fv(N012);
  501.     glVertex3fv(P012);
  502.     glEnd();
  503.     glBegin(GL_POLYGON);
  504.     glNormal3fv(N017);
  505.     glVertex3fv(P017);
  506.     glNormal3fv(N001);
  507.     glVertex3fv(P001);
  508.     glNormal3fv(N018);
  509.     glVertex3fv(P018);
  510.     glEnd();
  511.     glBegin(GL_POLYGON);
  512.     glNormal3fv(N001);
  513.     glVertex3fv(P001);
  514.     glNormal3fv(N017);
  515.     glVertex3fv(P017);
  516.     glNormal3fv(N016);
  517.     glVertex3fv(P016);
  518.     glEnd();
  519.     glBegin(GL_POLYGON);
  520.     glNormal3fv(N001);
  521.     glVertex3fv(P001);
  522.     glNormal3fv(N013);
  523.     glVertex3fv(P013);
  524.     glNormal3fv(N012);
  525.     glVertex3fv(P012);
  526.     glEnd();
  527.     glBegin(GL_POLYGON);
  528.     glNormal3fv(N001);
  529.     glVertex3fv(P001);
  530.     glNormal3fv(N016);
  531.     glVertex3fv(P016);
  532.     glNormal3fv(N015);
  533.     glVertex3fv(P015);
  534.     glEnd();
  535.     glBegin(GL_POLYGON);
  536.     glNormal3fv(N001);
  537.     glVertex3fv(P001);
  538.     glNormal3fv(N014);
  539.     glVertex3fv(P014);
  540.     glNormal3fv(N013);
  541.     glVertex3fv(P013);
  542.     glEnd();
  543.     glBegin(GL_POLYGON);
  544.     glNormal3fv(N001);
  545.     glVertex3fv(P001);
  546.     glNormal3fv(N015);
  547.     glVertex3fv(P015);
  548.     glNormal3fv(N014);
  549.     glVertex3fv(P014);
  550.     glEnd();
  551. }
  552. void
  553. Whale004(void)
  554. {
  555.     glBegin(GL_POLYGON);
  556.     glNormal3fv(N014);
  557.     glVertex3fv(P014);
  558.     glNormal3fv(N015);
  559.     glVertex3fv(P015);
  560.     glNormal3fv(N023);
  561.     glVertex3fv(P023);
  562.     glNormal3fv(N022);
  563.     glVertex3fv(P022);
  564.     glEnd();
  565.     glBegin(GL_POLYGON);
  566.     glNormal3fv(N015);
  567.     glVertex3fv(P015);
  568.     glNormal3fv(N016);
  569.     glVertex3fv(P016);
  570.     glNormal3fv(N024);
  571.     glVertex3fv(P024);
  572.     glNormal3fv(N023);
  573.     glVertex3fv(P023);
  574.     glEnd();
  575.     glBegin(GL_POLYGON);
  576.     glNormal3fv(N016);
  577.     glVertex3fv(P016);
  578.     glNormal3fv(N017);
  579.     glVertex3fv(P017);
  580.     glNormal3fv(N025);
  581.     glVertex3fv(P025);
  582.     glNormal3fv(N024);
  583.     glVertex3fv(P024);
  584.     glEnd();
  585.     glBegin(GL_POLYGON);
  586.     glNormal3fv(N017);
  587.     glVertex3fv(P017);
  588.     glNormal3fv(N018);
  589.     glVertex3fv(P018);
  590.     glNormal3fv(N026);
  591.     glVertex3fv(P026);
  592.     glNormal3fv(N025);
  593.     glVertex3fv(P025);
  594.     glEnd();
  595.     glBegin(GL_POLYGON);
  596.     glNormal3fv(N013);
  597.     glVertex3fv(P013);
  598.     glNormal3fv(N014);
  599.     glVertex3fv(P014);
  600.     glNormal3fv(N022);
  601.     glVertex3fv(P022);
  602.     glNormal3fv(N021);
  603.     glVertex3fv(P021);
  604.     glEnd();
  605.     glBegin(GL_POLYGON);
  606.     glNormal3fv(N012);
  607.     glVertex3fv(P012);
  608.     glNormal3fv(N013);
  609.     glVertex3fv(P013);
  610.     glNormal3fv(N021);
  611.     glVertex3fv(P021);
  612.     glNormal3fv(N020);
  613.     glVertex3fv(P020);
  614.     glEnd();
  615.     glBegin(GL_POLYGON);
  616.     glNormal3fv(N018);
  617.     glVertex3fv(P018);
  618.     glNormal3fv(N019);
  619.     glVertex3fv(P019);
  620.     glNormal3fv(N027);
  621.     glVertex3fv(P027);
  622.     glNormal3fv(N026);
  623.     glVertex3fv(P026);
  624.     glEnd();
  625.     glBegin(GL_POLYGON);
  626.     glNormal3fv(N019);
  627.     glVertex3fv(P019);
  628.     glNormal3fv(N012);
  629.     glVertex3fv(P012);
  630.     glNormal3fv(N020);
  631.     glVertex3fv(P020);
  632.     glNormal3fv(N027);
  633.     glVertex3fv(P027);
  634.     glEnd();
  635. }
  636. void
  637. Whale005(void)
  638. {
  639.     glBegin(GL_POLYGON);
  640.     glNormal3fv(N022);
  641.     glVertex3fv(P022);
  642.     glNormal3fv(N023);
  643.     glVertex3fv(P023);
  644.     glNormal3fv(N031);
  645.     glVertex3fv(P031);
  646.     glNormal3fv(N030);
  647.     glVertex3fv(P030);
  648.     glEnd();
  649.     glBegin(GL_POLYGON);
  650.     glNormal3fv(N021);
  651.     glVertex3fv(P021);
  652.     glNormal3fv(N022);
  653.     glVertex3fv(P022);
  654.     glNormal3fv(N030);
  655.     glVertex3fv(P030);
  656.     glEnd();
  657.     glBegin(GL_POLYGON);
  658.     glNormal3fv(N021);
  659.     glVertex3fv(P021);
  660.     glNormal3fv(N030);
  661.     glVertex3fv(P030);
  662.     glNormal3fv(N029);
  663.     glVertex3fv(P029);
  664.     glEnd();
  665.     glBegin(GL_POLYGON);
  666.     glNormal3fv(N023);
  667.     glVertex3fv(P023);
  668.     glNormal3fv(N024);
  669.     glVertex3fv(P024);
  670.     glNormal3fv(N031);
  671.     glVertex3fv(P031);
  672.     glEnd();
  673.     glBegin(GL_POLYGON);
  674.     glNormal3fv(N024);
  675.     glVertex3fv(P024);
  676.     glNormal3fv(N032);
  677.     glVertex3fv(P032);
  678.     glNormal3fv(N031);
  679.     glVertex3fv(P031);
  680.     glEnd();
  681.     glBegin(GL_POLYGON);
  682.     glNormal3fv(N024);
  683.     glVertex3fv(P024);
  684.     glNormal3fv(N025);
  685.     glVertex3fv(P025);
  686.     glNormal3fv(N032);
  687.     glVertex3fv(P032);
  688.     glEnd();
  689.     glBegin(GL_POLYGON);
  690.     glNormal3fv(N025);
  691.     glVertex3fv(P025);
  692.     glNormal3fv(N033);
  693.     glVertex3fv(P033);
  694.     glNormal3fv(N032);
  695.     glVertex3fv(P032);
  696.     glEnd();
  697.     glBegin(GL_POLYGON);
  698.     glNormal3fv(N020);
  699.     glVertex3fv(P020);
  700.     glNormal3fv(N021);
  701.     glVertex3fv(P021);
  702.     glNormal3fv(N029);
  703.     glVertex3fv(P029);
  704.     glEnd();
  705.     glBegin(GL_POLYGON);
  706.     glNormal3fv(N020);
  707.     glVertex3fv(P020);
  708.     glNormal3fv(N029);
  709.     glVertex3fv(P029);
  710.     glNormal3fv(N028);
  711.     glVertex3fv(P028);
  712.     glEnd();
  713.     glBegin(GL_POLYGON);
  714.     glNormal3fv(N027);
  715.     glVertex3fv(P027);
  716.     glNormal3fv(N020);
  717.     glVertex3fv(P020);
  718.     glNormal3fv(N028);
  719.     glVertex3fv(P028);
  720.     glEnd();
  721.     glBegin(GL_POLYGON);
  722.     glNormal3fv(N027);
  723.     glVertex3fv(P027);
  724.     glNormal3fv(N028);
  725.     glVertex3fv(P028);
  726.     glNormal3fv(N035);
  727.     glVertex3fv(P035);
  728.     glEnd();
  729.     glBegin(GL_POLYGON);
  730.     glNormal3fv(N025);
  731.     glVertex3fv(P025);
  732.     glNormal3fv(N026);
  733.     glVertex3fv(P026);
  734.     glNormal3fv(N033);
  735.     glVertex3fv(P033);
  736.     glEnd();
  737.     glBegin(GL_POLYGON);
  738.     glNormal3fv(N033);
  739.     glVertex3fv(P033);
  740.     glNormal3fv(N026);
  741.     glVertex3fv(P026);
  742.     glNormal3fv(N034);
  743.     glVertex3fv(P034);
  744.     glEnd();
  745.     glBegin(GL_POLYGON);
  746.     glNormal3fv(N026);
  747.     glVertex3fv(P026);
  748.     glNormal3fv(N027);
  749.     glVertex3fv(P027);
  750.     glNormal3fv(N035);
  751.     glVertex3fv(P035);
  752.     glNormal3fv(N034);
  753.     glVertex3fv(P034);
  754.     glEnd();
  755. }
  756. void
  757. Whale006(void)
  758. {
  759.     glBegin(GL_POLYGON);
  760.     glNormal3fv(N092);
  761.     glVertex3fv(P092);
  762.     glNormal3fv(N093);
  763.     glVertex3fv(P093);
  764.     glNormal3fv(N094);
  765.     glVertex3fv(P094);
  766.     glEnd();
  767.     glBegin(GL_POLYGON);
  768.     glNormal3fv(N093);
  769.     glVertex3fv(P093);
  770.     glNormal3fv(N092);
  771.     glVertex3fv(P092);
  772.     glNormal3fv(N094);
  773.     glVertex3fv(P094);
  774.     glEnd();
  775.     glBegin(GL_POLYGON);
  776.     glNormal3fv(N092);
  777.     glVertex3fv(P092);
  778.     glNormal3fv(N091);
  779.     glVertex3fv(P091);
  780.     glNormal3fv(N095);
  781.     glVertex3fv(P095);
  782.     glNormal3fv(N094);
  783.     glVertex3fv(P094);
  784.     glEnd();
  785.     glBegin(GL_POLYGON);
  786.     glNormal3fv(N091);
  787.     glVertex3fv(P091);
  788.     glNormal3fv(N092);
  789.     glVertex3fv(P092);
  790.     glNormal3fv(N094);
  791.     glVertex3fv(P094);
  792.     glNormal3fv(N095);
  793.     glVertex3fv(P095);
  794.     glEnd();
  795. }
  796. void
  797. Whale007(void)
  798. {
  799.     glBegin(GL_POLYGON);
  800.     glNormal3fv(N030);
  801.     glVertex3fv(P030);
  802.     glNormal3fv(N031);
  803.     glVertex3fv(P031);
  804.     glNormal3fv(N039);
  805.     glVertex3fv(P039);
  806.     glNormal3fv(N038);
  807.     glVertex3fv(P038);
  808.     glEnd();
  809.     glBegin(GL_POLYGON);
  810.     glNormal3fv(N029);
  811.     glVertex3fv(P029);
  812.     glNormal3fv(N030);
  813.     glVertex3fv(P030);
  814.     glNormal3fv(N038);
  815.     glVertex3fv(P038);
  816.     glEnd();
  817.     glBegin(GL_POLYGON);
  818.     glNormal3fv(N029);
  819.     glVertex3fv(P029);
  820.     glNormal3fv(N038);
  821.     glVertex3fv(P038);
  822.     glNormal3fv(N037);
  823.     glVertex3fv(P037);
  824.     glEnd();
  825.     glBegin(GL_POLYGON);
  826.     glNormal3fv(N028);
  827.     glVertex3fv(P028);
  828.     glNormal3fv(N029);
  829.     glVertex3fv(P029);
  830.     glNormal3fv(N037);
  831.     glVertex3fv(P037);
  832.     glEnd();
  833.     glBegin(GL_POLYGON);
  834.     glNormal3fv(N028);
  835.     glVertex3fv(P028);
  836.     glNormal3fv(N037);
  837.     glVertex3fv(P037);
  838.     glNormal3fv(N036);
  839.     glVertex3fv(P036);
  840.     glEnd();
  841.     glBegin(GL_POLYGON);
  842.     glNormal3fv(N035);
  843.     glVertex3fv(P035);
  844.     glNormal3fv(N028);
  845.     glVertex3fv(P028);
  846.     glNormal3fv(N036);
  847.     glVertex3fv(P036);
  848.     glEnd();
  849.     glBegin(GL_POLYGON);
  850.     glNormal3fv(N035);
  851.     glVertex3fv(P035);
  852.     glNormal3fv(N036);
  853.     glVertex3fv(P036);
  854.     glNormal3fv(N043);
  855.     glVertex3fv(P043);
  856.     glEnd();
  857.     glBegin(GL_POLYGON);
  858.     glNormal3fv(N034);
  859.     glVertex3fv(P034);
  860.     glNormal3fv(N035);
  861.     glVertex3fv(P035);
  862.     glNormal3fv(N043);
  863.     glVertex3fv(P043);
  864.     glNormal3fv(N042);
  865.     glVertex3fv(P042);
  866.     glEnd();
  867.     glBegin(GL_POLYGON);
  868.     glNormal3fv(N033);
  869.     glVertex3fv(P033);
  870.     glNormal3fv(N034);
  871.     glVertex3fv(P034);
  872.     glNormal3fv(N042);
  873.     glVertex3fv(P042);
  874.     glEnd();
  875.     glBegin(GL_POLYGON);
  876.     glNormal3fv(N033);
  877.     glVertex3fv(P033);
  878.     glNormal3fv(N042);
  879.     glVertex3fv(P042);
  880.     glNormal3fv(N041);
  881.     glVertex3fv(P041);
  882.     glEnd();
  883.     glBegin(GL_POLYGON);
  884.     glNormal3fv(N031);
  885.     glVertex3fv(P031);
  886.     glNormal3fv(N032);
  887.     glVertex3fv(P032);
  888.     glNormal3fv(N039);
  889.     glVertex3fv(P039);
  890.     glEnd();
  891.     glBegin(GL_POLYGON);
  892.     glNormal3fv(N039);
  893.     glVertex3fv(P039);
  894.     glNormal3fv(N032);
  895.     glVertex3fv(P032);
  896.     glNormal3fv(N040);
  897.     glVertex3fv(P040);
  898.     glEnd();
  899.     glBegin(GL_POLYGON);
  900.     glNormal3fv(N032);
  901.     glVertex3fv(P032);
  902.     glNormal3fv(N033);
  903.     glVertex3fv(P033);
  904.     glNormal3fv(N040);
  905.     glVertex3fv(P040);
  906.     glEnd();
  907.     glBegin(GL_POLYGON);
  908.     glNormal3fv(N040);
  909.     glVertex3fv(P040);
  910.     glNormal3fv(N033);
  911.     glVertex3fv(P033);
  912.     glNormal3fv(N041);
  913.     glVertex3fv(P041);
  914.     glEnd();
  915. }
  916. void
  917. Whale008(void)
  918. {
  919.     glBegin(GL_POLYGON);
  920.     glNormal3fv(N042);
  921.     glVertex3fv(P042);
  922.     glNormal3fv(N043);
  923.     glVertex3fv(P043);
  924.     glNormal3fv(N051);
  925.     glVertex3fv(P051);
  926.     glNormal3fv(N050);
  927.     glVertex3fv(P050);
  928.     glEnd();
  929.     glBegin(GL_POLYGON);
  930.     glNormal3fv(N043);
  931.     glVertex3fv(P043);
  932.     glNormal3fv(N036);
  933.     glVertex3fv(P036);
  934.     glNormal3fv(N051);
  935.     glVertex3fv(P051);
  936.     glEnd();
  937.     glBegin(GL_POLYGON);
  938.     glNormal3fv(N051);
  939.     glVertex3fv(P051);
  940.     glNormal3fv(N036);
  941.     glVertex3fv(P036);
  942.     glNormal3fv(N044);
  943.     glVertex3fv(P044);
  944.     glEnd();
  945.     glBegin(GL_POLYGON);
  946.     glNormal3fv(N041);
  947.     glVertex3fv(P041);
  948.     glNormal3fv(N042);
  949.     glVertex3fv(P042);
  950.     glNormal3fv(N050);
  951.     glVertex3fv(P050);
  952.     glEnd();
  953.     glBegin(GL_POLYGON);
  954.     glNormal3fv(N041);
  955.     glVertex3fv(P041);
  956.     glNormal3fv(N050);
  957.     glVertex3fv(P050);
  958.     glNormal3fv(N049);
  959.     glVertex3fv(P049);
  960.     glEnd();
  961.     glBegin(GL_POLYGON);
  962.     glNormal3fv(N036);
  963.     glVertex3fv(P036);
  964.     glNormal3fv(N037);
  965.     glVertex3fv(P037);
  966.     glNormal3fv(N044);
  967.     glVertex3fv(P044);
  968.     glEnd();
  969.     glBegin(GL_POLYGON);
  970.     glNormal3fv(N044);
  971.     glVertex3fv(P044);
  972.     glNormal3fv(N037);
  973.     glVertex3fv(P037);
  974.     glNormal3fv(N045);
  975.     glVertex3fv(P045);
  976.     glEnd();
  977.     glBegin(GL_POLYGON);
  978.     glNormal3fv(N040);
  979.     glVertex3fv(P040);
  980.     glNormal3fv(N041);
  981.     glVertex3fv(P041);
  982.     glNormal3fv(N049);
  983.     glVertex3fv(P049);
  984.     glEnd();
  985.     glBegin(GL_POLYGON);
  986.     glNormal3fv(N040);
  987.     glVertex3fv(P040);
  988.     glNormal3fv(N049);
  989.     glVertex3fv(P049);
  990.     glNormal3fv(N048);
  991.     glVertex3fv(P048);
  992.     glEnd();
  993.     glBegin(GL_POLYGON);
  994.     glNormal3fv(N039);
  995.     glVertex3fv(P039);
  996.     glNormal3fv(N040);
  997.     glVertex3fv(P040);
  998.     glNormal3fv(N048);
  999.     glVertex3fv(P048);
  1000.     glEnd();
  1001.     glBegin(GL_POLYGON);
  1002.     glNormal3fv(N039);
  1003.     glVertex3fv(P039);
  1004.     glNormal3fv(N048);
  1005.     glVertex3fv(P048);
  1006.     glNormal3fv(N047);
  1007.     glVertex3fv(P047);
  1008.     glEnd();
  1009.     glBegin(GL_POLYGON);
  1010.     glNormal3fv(N037);
  1011.     glVertex3fv(P037);
  1012.     glNormal3fv(N038);
  1013.     glVertex3fv(P038);
  1014.     glNormal3fv(N045);
  1015.     glVertex3fv(P045);
  1016.     glEnd();
  1017.     glBegin(GL_POLYGON);
  1018.     glNormal3fv(N038);
  1019.     glVertex3fv(P038);
  1020.     glNormal3fv(N046);
  1021.     glVertex3fv(P046);
  1022.     glNormal3fv(N045);
  1023.     glVertex3fv(P045);
  1024.     glEnd();
  1025.     glBegin(GL_POLYGON);
  1026.     glNormal3fv(N038);
  1027.     glVertex3fv(P038);
  1028.     glNormal3fv(N039);
  1029.     glVertex3fv(P039);
  1030.     glNormal3fv(N047);
  1031.     glVertex3fv(P047);
  1032.     glNormal3fv(N046);
  1033.     glVertex3fv(P046);
  1034.     glEnd();
  1035. }
  1036. void
  1037. Whale009(void)
  1038. {
  1039.     glBegin(GL_POLYGON);
  1040.     glNormal3fv(N050);
  1041.     glVertex3fv(P050);
  1042.     glNormal3fv(N051);
  1043.     glVertex3fv(P051);
  1044.     glNormal3fv(N059);
  1045.     glVertex3fv(P059);
  1046.     glNormal3fv(N058);
  1047.     glVertex3fv(P058);
  1048.     glEnd();
  1049.     glBegin(GL_POLYGON);
  1050.     glNormal3fv(N051);
  1051.     glVertex3fv(P051);
  1052.     glNormal3fv(N044);
  1053.     glVertex3fv(P044);
  1054.     glNormal3fv(N059);
  1055.     glVertex3fv(P059);
  1056.     glEnd();
  1057.     glBegin(GL_POLYGON);
  1058.     glNormal3fv(N059);
  1059.     glVertex3fv(P059);
  1060.     glNormal3fv(N044);
  1061.     glVertex3fv(P044);
  1062.     glNormal3fv(N052);
  1063.     glVertex3fv(P052);
  1064.     glEnd();
  1065.     glBegin(GL_POLYGON);
  1066.     glNormal3fv(N044);
  1067.     glVertex3fv(P044);
  1068.     glNormal3fv(N045);
  1069.     glVertex3fv(P045);
  1070.     glNormal3fv(N053);
  1071.     glVertex3fv(P053);
  1072.     glEnd();
  1073.     glBegin(GL_POLYGON);
  1074.     glNormal3fv(N044);
  1075.     glVertex3fv(P044);
  1076.     glNormal3fv(N053);
  1077.     glVertex3fv(P053);
  1078.     glNormal3fv(N052);
  1079.     glVertex3fv(P052);
  1080.     glEnd();
  1081.     glBegin(GL_POLYGON);
  1082.     glNormal3fv(N049);
  1083.     glVertex3fv(P049);
  1084.     glNormal3fv(N050);
  1085.     glVertex3fv(P050);
  1086.     glNormal3fv(N058);
  1087.     glVertex3fv(P058);
  1088.     glEnd();
  1089.     glBegin(GL_POLYGON);
  1090.     glNormal3fv(N049);
  1091.     glVertex3fv(P049);
  1092.     glNormal3fv(N058);
  1093.     glVertex3fv(P058);
  1094.     glNormal3fv(N057);
  1095.     glVertex3fv(P057);
  1096.     glEnd();
  1097.     glBegin(GL_POLYGON);
  1098.     glNormal3fv(N048);
  1099.     glVertex3fv(P048);
  1100.     glNormal3fv(N049);
  1101.     glVertex3fv(P049);
  1102.     glNormal3fv(N057);
  1103.     glVertex3fv(P057);
  1104.     glEnd();
  1105.     glBegin(GL_POLYGON);
  1106.     glNormal3fv(N048);
  1107.     glVertex3fv(P048);
  1108.     glNormal3fv(N057);
  1109.     glVertex3fv(P057);
  1110.     glNormal3fv(N056);
  1111.     glVertex3fv(P056);
  1112.     glEnd();
  1113.     glBegin(GL_POLYGON);
  1114.     glNormal3fv(N047);
  1115.     glVertex3fv(P047);
  1116.     glNormal3fv(N048);
  1117.     glVertex3fv(P048);
  1118.     glNormal3fv(N056);
  1119.     glVertex3fv(P056);
  1120.     glEnd();
  1121.     glBegin(GL_POLYGON);
  1122.     glNormal3fv(N047);
  1123.     glVertex3fv(P047);
  1124.     glNormal3fv(N056);
  1125.     glVertex3fv(P056);
  1126.     glNormal3fv(N055);
  1127.     glVertex3fv(P055);
  1128.     glEnd();
  1129.     glBegin(GL_POLYGON);
  1130.     glNormal3fv(N045);
  1131.     glVertex3fv(P045);
  1132.     glNormal3fv(N046);
  1133.     glVertex3fv(P046);
  1134.     glNormal3fv(N053);
  1135.     glVertex3fv(P053);
  1136.     glEnd();
  1137.     glBegin(GL_POLYGON);
  1138.     glNormal3fv(N046);
  1139.     glVertex3fv(P046);
  1140.     glNormal3fv(N054);
  1141.     glVertex3fv(P054);
  1142.     glNormal3fv(N053);
  1143.     glVertex3fv(P053);
  1144.     glEnd();
  1145.     glBegin(GL_POLYGON);
  1146.     glNormal3fv(N046);
  1147.     glVertex3fv(P046);
  1148.     glNormal3fv(N047);
  1149.     glVertex3fv(P047);
  1150.     glNormal3fv(N055);
  1151.     glVertex3fv(P055);
  1152.     glNormal3fv(N054);
  1153.     glVertex3fv(P054);
  1154.     glEnd();
  1155. }
  1156. void
  1157. Whale010(void)
  1158. {
  1159.     glBegin(GL_POLYGON);
  1160.     glNormal3fv(N080);
  1161.     glVertex3fv(P080);
  1162.     glNormal3fv(N081);
  1163.     glVertex3fv(P081);
  1164.     glNormal3fv(N085);
  1165.     glVertex3fv(P085);
  1166.     glEnd();
  1167.     glBegin(GL_POLYGON);
  1168.     glNormal3fv(N081);
  1169.     glVertex3fv(P081);
  1170.     glNormal3fv(N083);
  1171.     glVertex3fv(P083);
  1172.     glNormal3fv(N085);
  1173.     glVertex3fv(P085);
  1174.     glEnd();
  1175.     glBegin(GL_POLYGON);
  1176.     glNormal3fv(N085);
  1177.     glVertex3fv(P085);
  1178.     glNormal3fv(N083);
  1179.     glVertex3fv(P083);
  1180.     glNormal3fv(N077);
  1181.     glVertex3fv(P077);
  1182.     glEnd();
  1183.     glBegin(GL_POLYGON);
  1184.     glNormal3fv(N083);
  1185.     glVertex3fv(P083);
  1186.     glNormal3fv(N087);
  1187.     glVertex3fv(P087);
  1188.     glNormal3fv(N077);
  1189.     glVertex3fv(P077);
  1190.     glEnd();
  1191.     glBegin(GL_POLYGON);
  1192.     glNormal3fv(N077);
  1193.     glVertex3fv(P077);
  1194.     glNormal3fv(N087);
  1195.     glVertex3fv(P087);
  1196.     glNormal3fv(N090);
  1197.     glVertex3fv(P090);
  1198.     glEnd();
  1199.     glBegin(GL_POLYGON);
  1200.     glNormal3fv(N081);
  1201.     glVertex3fv(P081);
  1202.     glNormal3fv(N080);
  1203.     glVertex3fv(P080);
  1204.     glNormal3fv(N085);
  1205.     glVertex3fv(P085);
  1206.     glEnd();
  1207.     glBegin(GL_POLYGON);
  1208.     glNormal3fv(N083);
  1209.     glVertex3fv(P083);
  1210.     glNormal3fv(N081);
  1211.     glVertex3fv(P081);
  1212.     glNormal3fv(N085);
  1213.     glVertex3fv(P085);
  1214.     glEnd();
  1215.     glBegin(GL_POLYGON);
  1216.     glNormal3fv(N083);
  1217.     glVertex3fv(P083);
  1218.     glNormal3fv(N085);
  1219.     glVertex3fv(P085);
  1220.     glNormal3fv(N077);
  1221.     glVertex3fv(P077);
  1222.     glEnd();
  1223.     glBegin(GL_POLYGON);
  1224.     glNormal3fv(N087);
  1225.     glVertex3fv(P087);
  1226.     glNormal3fv(N083);
  1227.     glVertex3fv(P083);
  1228.     glNormal3fv(N077);
  1229.     glVertex3fv(P077);
  1230.     glEnd();
  1231.     glBegin(GL_POLYGON);
  1232.     glNormal3fv(N087);
  1233.     glVertex3fv(P087);
  1234.     glNormal3fv(N077);
  1235.     glVertex3fv(P077);
  1236.     glNormal3fv(N090);
  1237.     glVertex3fv(P090);
  1238.     glEnd();
  1239. }
  1240. void
  1241. Whale011(void)
  1242. {
  1243.     glBegin(GL_POLYGON);
  1244.     glNormal3fv(N082);
  1245.     glVertex3fv(P082);
  1246.     glNormal3fv(N084);
  1247.     glVertex3fv(P084);
  1248.     glNormal3fv(N079);
  1249.     glVertex3fv(P079);
  1250.     glEnd();
  1251.     glBegin(GL_POLYGON);
  1252.     glNormal3fv(N084);
  1253.     glVertex3fv(P084);
  1254.     glNormal3fv(N086);
  1255.     glVertex3fv(P086);
  1256.     glNormal3fv(N079);
  1257.     glVertex3fv(P079);
  1258.     glEnd();
  1259.     glBegin(GL_POLYGON);
  1260.     glNormal3fv(N079);
  1261.     glVertex3fv(P079);
  1262.     glNormal3fv(N086);
  1263.     glVertex3fv(P086);
  1264.     glNormal3fv(N078);
  1265.     glVertex3fv(P078);
  1266.     glEnd();
  1267.     glBegin(GL_POLYGON);
  1268.     glNormal3fv(N086);
  1269.     glVertex3fv(P086);
  1270.     glNormal3fv(N088);
  1271.     glVertex3fv(P088);
  1272.     glNormal3fv(N078);
  1273.     glVertex3fv(P078);
  1274.     glEnd();
  1275.     glBegin(GL_POLYGON);
  1276.     glNormal3fv(N078);
  1277.     glVertex3fv(P078);
  1278.     glNormal3fv(N088);
  1279.     glVertex3fv(P088);
  1280.     glNormal3fv(N089);
  1281.     glVertex3fv(P089);
  1282.     glEnd();
  1283.     glBegin(GL_POLYGON);
  1284.     glNormal3fv(N088);
  1285.     glVertex3fv(P088);
  1286.     glNormal3fv(N086);
  1287.     glVertex3fv(P086);
  1288.     glNormal3fv(N089);
  1289.     glVertex3fv(P089);
  1290.     glEnd();
  1291.     glBegin(GL_POLYGON);
  1292.     glNormal3fv(N089);
  1293.     glVertex3fv(P089);
  1294.     glNormal3fv(N086);
  1295.     glVertex3fv(P086);
  1296.     glNormal3fv(N078);
  1297.     glVertex3fv(P078);
  1298.     glEnd();
  1299.     glBegin(GL_POLYGON);
  1300.     glNormal3fv(N086);
  1301.     glVertex3fv(P086);
  1302.     glNormal3fv(N084);
  1303.     glVertex3fv(P084);
  1304.     glNormal3fv(N078);
  1305.     glVertex3fv(P078);
  1306.     glEnd();
  1307.     glBegin(GL_POLYGON);
  1308.     glNormal3fv(N078);
  1309.     glVertex3fv(P078);
  1310.     glNormal3fv(N084);
  1311.     glVertex3fv(P084);
  1312.     glNormal3fv(N079);
  1313.     glVertex3fv(P079);
  1314.     glEnd();
  1315.     glBegin(GL_POLYGON);
  1316.     glNormal3fv(N084);
  1317.     glVertex3fv(P084);
  1318.     glNormal3fv(N082);
  1319.     glVertex3fv(P082);
  1320.     glNormal3fv(N079);
  1321.     glVertex3fv(P079);
  1322.     glEnd();
  1323. }
  1324. void
  1325. Whale012(void)
  1326. {
  1327.     glBegin(GL_POLYGON);
  1328.     glNormal3fv(N058);
  1329.     glVertex3fv(P058);
  1330.     glNormal3fv(N059);
  1331.     glVertex3fv(P059);
  1332.     glNormal3fv(N067);
  1333.     glVertex3fv(P067);
  1334.     glNormal3fv(N066);
  1335.     glVertex3fv(P066);
  1336.     glEnd();
  1337.     glBegin(GL_POLYGON);
  1338.     glNormal3fv(N059);
  1339.     glVertex3fv(P059);
  1340.     glNormal3fv(N052);
  1341.     glVertex3fv(P052);
  1342.     glNormal3fv(N060);
  1343.     glVertex3fv(P060);
  1344.     glEnd();
  1345.     glBegin(GL_POLYGON);
  1346.     glNormal3fv(N059);
  1347.     glVertex3fv(P059);
  1348.     glNormal3fv(N060);
  1349.     glVertex3fv(P060);
  1350.     glNormal3fv(N067);
  1351.     glVertex3fv(P067);
  1352.     glEnd();
  1353.     glBegin(GL_POLYGON);
  1354.     glNormal3fv(N058);
  1355.     glVertex3fv(P058);
  1356.     glNormal3fv(N066);
  1357.     glVertex3fv(P066);
  1358.     glNormal3fv(N065);
  1359.     glVertex3fv(P065);
  1360.     glEnd();
  1361.     glBegin(GL_POLYGON);
  1362.     glNormal3fv(N058);
  1363.     glVertex3fv(P058);
  1364.     glNormal3fv(N065);
  1365.     glVertex3fv(P065);
  1366.     glNormal3fv(N057);
  1367.     glVertex3fv(P057);
  1368.     glEnd();
  1369.     glBegin(GL_POLYGON);
  1370.     glNormal3fv(N056);
  1371.     glVertex3fv(P056);
  1372.     glNormal3fv(N057);
  1373.     glVertex3fv(P057);
  1374.     glNormal3fv(N065);
  1375.     glVertex3fv(P065);
  1376.     glEnd();
  1377.     glBegin(GL_POLYGON);
  1378.     glNormal3fv(N056);
  1379.     glVertex3fv(P056);
  1380.     glNormal3fv(N065);
  1381.     glVertex3fv(P065);
  1382.     glNormal3fv(N006);
  1383.     glVertex3fv(P006);
  1384.     glEnd();
  1385.     glBegin(GL_POLYGON);
  1386.     glNormal3fv(N056);
  1387.     glVertex3fv(P056);
  1388.     glNormal3fv(N006);
  1389.     glVertex3fv(P006);
  1390.     glNormal3fv(N063);
  1391.     glVertex3fv(P063);
  1392.     glEnd();
  1393.     glBegin(GL_POLYGON);
  1394.     glNormal3fv(N056);
  1395.     glVertex3fv(P056);
  1396.     glNormal3fv(N063);
  1397.     glVertex3fv(P063);
  1398.     glNormal3fv(N055);
  1399.     glVertex3fv(P055);
  1400.     glEnd();
  1401.     glBegin(GL_POLYGON);
  1402.     glNormal3fv(N054);
  1403.     glVertex3fv(P054);
  1404.     glNormal3fv(N062);
  1405.     glVertex3fv(P062);
  1406.     glNormal3fv(N005);
  1407.     glVertex3fv(P005);
  1408.     glEnd();
  1409.     glBegin(GL_POLYGON);
  1410.     glNormal3fv(N054);
  1411.     glVertex3fv(P054);
  1412.     glNormal3fv(N005);
  1413.     glVertex3fv(P005);
  1414.     glNormal3fv(N053);
  1415.     glVertex3fv(P053);
  1416.     glEnd();
  1417.     glBegin(GL_POLYGON);
  1418.     glNormal3fv(N053);
  1419.     glVertex3fv(P053);
  1420.     glNormal3fv(N005);
  1421.     glVertex3fv(P005);
  1422.     glNormal3fv(N060);
  1423.     glVertex3fv(P060);
  1424.     glEnd();
  1425.     glBegin(GL_POLYGON);
  1426.     glNormal3fv(N053);
  1427.     glVertex3fv(P053);
  1428.     glNormal3fv(N060);
  1429.     glVertex3fv(P060);
  1430.     glNormal3fv(N052);
  1431.     glVertex3fv(P052);
  1432.     glEnd();
  1433. }
  1434. void
  1435. Whale013(void)
  1436. {
  1437.     glBegin(GL_POLYGON);
  1438.     glNormal3fv(N066);
  1439.     glVertex3fv(P066);
  1440.     glNormal3fv(N067);
  1441.     glVertex3fv(P067);
  1442.     glNormal3fv(N096);
  1443.     glVertex3fv(P096);
  1444.     glNormal3fv(N097);
  1445.     glVertex3fv(P097);
  1446.     glEnd();
  1447.     glBegin(GL_POLYGON);
  1448.     glNormal3fv(N097);
  1449.     glVertex3fv(P097);
  1450.     glNormal3fv(N096);
  1451.     glVertex3fv(P096);
  1452.     glNormal3fv(N098);
  1453.     glVertex3fv(P098);
  1454.     glNormal3fv(N099);
  1455.     glVertex3fv(P099);
  1456.     glEnd();
  1457.     glBegin(GL_POLYGON);
  1458.     glNormal3fv(N065);
  1459.     glVertex3fv(P065);
  1460.     glNormal3fv(N066);
  1461.     glVertex3fv(P066);
  1462.     glNormal3fv(N097);
  1463.     glVertex3fv(P097);
  1464.     glEnd();
  1465.     glBegin(GL_POLYGON);
  1466.     glNormal3fv(N067);
  1467.     glVertex3fv(P067);
  1468.     glNormal3fv(N060);
  1469.     glVertex3fv(P060);
  1470.     glNormal3fv(N096);
  1471.     glVertex3fv(P096);
  1472.     glEnd();
  1473.     glBegin(GL_POLYGON);
  1474.     glNormal3fv(N060);
  1475.     glVertex3fv(P060);
  1476.     glNormal3fv(N005);
  1477.     glVertex3fv(P005);
  1478.     glNormal3fv(N096);
  1479.     glVertex3fv(P096);
  1480.     glEnd();
  1481.     glBegin(GL_POLYGON);
  1482.     glNormal3fv(N096);
  1483.     glVertex3fv(P096);
  1484.     glNormal3fv(N005);
  1485.     glVertex3fv(P005);
  1486.     glNormal3fv(N098);
  1487.     glVertex3fv(P098);
  1488.     glEnd();
  1489.     glBegin(GL_POLYGON);
  1490.     glNormal3fv(N006);
  1491.     glVertex3fv(P006);
  1492.     glNormal3fv(N065);
  1493.     glVertex3fv(P065);
  1494.     glNormal3fv(N097);
  1495.     glVertex3fv(P097);
  1496.     glEnd();
  1497.     glBegin(GL_POLYGON);
  1498.     glNormal3fv(N006);
  1499.     glVertex3fv(P006);
  1500.     glNormal3fv(N097);
  1501.     glVertex3fv(P097);
  1502.     glNormal3fv(N099);
  1503.     glVertex3fv(P099);
  1504.     glEnd();
  1505.     glBegin(GL_POLYGON);
  1506.     glVertex3fv(P005);
  1507.     glVertex3fv(P006);
  1508.     glVertex3fv(P099);
  1509.     glVertex3fv(P098);
  1510.     glEnd();
  1511. }
  1512. void
  1513. Whale014(void)
  1514. {
  1515.     glBegin(GL_POLYGON);
  1516.     glNormal3fv(N062);
  1517.     glVertex3fv(P062);
  1518.     glNormal3fv(N004);
  1519.     glVertex3fv(P004);
  1520.     glNormal3fv(N005);
  1521.     glVertex3fv(P005);
  1522.     glEnd();
  1523.     glBegin(GL_POLYGON);
  1524.     glVertex3fv(P006);
  1525.     glVertex3fv(P005);
  1526.     glVertex3fv(P004);
  1527.     glVertex3fv(P008);
  1528.     glEnd();
  1529.     glBegin(GL_POLYGON);
  1530.     glNormal3fv(N063);
  1531.     glVertex3fv(P063);
  1532.     glNormal3fv(N006);
  1533.     glVertex3fv(P006);
  1534.     glNormal3fv(N002);
  1535.     glVertex3fv(P002);
  1536.     glEnd();
  1537.     glBegin(GL_POLYGON);
  1538.     glNormal3fv(N002);
  1539.     glVertex3fv(P002);
  1540.     glNormal3fv(N006);
  1541.     glVertex3fv(P006);
  1542.     glNormal3fv(N008);
  1543.     glVertex3fv(P008);
  1544.     glEnd();
  1545.     glBegin(GL_POLYGON);
  1546.     glNormal3fv(N002);
  1547.     glVertex3fv(P002);
  1548.     glNormal3fv(N008);
  1549.     glVertex3fv(P008);
  1550.     glNormal3fv(N004);
  1551.     glVertex3fv(P004);
  1552.     glEnd();
  1553.     glBegin(GL_POLYGON);
  1554.     glNormal3fv(N062);
  1555.     glVertex3fv(P062);
  1556.     glNormal3fv(N002);
  1557.     glVertex3fv(P002);
  1558.     glNormal3fv(N004);
  1559.     glVertex3fv(P004);
  1560.     glEnd();
  1561. }
  1562. void
  1563. Whale015(void)
  1564. {
  1565.     glBegin(GL_POLYGON);
  1566.     glNormal3fv(N055);
  1567.     glVertex3fv(P055);
  1568.     glNormal3fv(N003);
  1569.     glVertex3fv(P003);
  1570.     glNormal3fv(N054);
  1571.     glVertex3fv(P054);
  1572.     glEnd();
  1573.     glBegin(GL_POLYGON);
  1574.     glNormal3fv(N003);
  1575.     glVertex3fv(P003);
  1576.     glNormal3fv(N055);
  1577.     glVertex3fv(P055);
  1578.     glNormal3fv(N063);
  1579.     glVertex3fv(P063);
  1580.     glEnd();
  1581.     glBegin(GL_POLYGON);
  1582.     glNormal3fv(N003);
  1583.     glVertex3fv(P003);
  1584.     glNormal3fv(N063);
  1585.     glVertex3fv(P063);
  1586.     glNormal3fv(N100);
  1587.     glVertex3fv(P100);
  1588.     glEnd();
  1589.     glBegin(GL_POLYGON);
  1590.     glNormal3fv(N003);
  1591.     glVertex3fv(P003);
  1592.     glNormal3fv(N100);
  1593.     glVertex3fv(P100);
  1594.     glNormal3fv(N054);
  1595.     glVertex3fv(P054);
  1596.     glEnd();
  1597.     glBegin(GL_POLYGON);
  1598.     glNormal3fv(N054);
  1599.     glVertex3fv(P054);
  1600.     glNormal3fv(N100);
  1601.     glVertex3fv(P100);
  1602.     glNormal3fv(N062);
  1603.     glVertex3fv(P062);
  1604.     glEnd();
  1605.     glBegin(GL_POLYGON);
  1606.     glNormal3fv(N100);
  1607.     glVertex3fv(P100);
  1608.     glNormal3fv(N063);
  1609.     glVertex3fv(P063);
  1610.     glNormal3fv(N002);
  1611.     glVertex3fv(P002);
  1612.     glEnd();
  1613.     glBegin(GL_POLYGON);
  1614.     glNormal3fv(N100);
  1615.     glVertex3fv(P100);
  1616.     glNormal3fv(N002);
  1617.     glVertex3fv(P002);
  1618.     glNormal3fv(N062);
  1619.     glVertex3fv(P062);
  1620.     glEnd();
  1621. }
  1622. void
  1623. Whale016(void)
  1624. {
  1625.     glBegin(GL_POLYGON);
  1626.     glVertex3fv(P104);
  1627.     glVertex3fv(P105);
  1628.     glVertex3fv(P106);
  1629.     glEnd();
  1630.     glBegin(GL_POLYGON);
  1631.     glVertex3fv(P107);
  1632.     glVertex3fv(P108);
  1633.     glVertex3fv(P109);
  1634.     glEnd();
  1635.     glBegin(GL_POLYGON);
  1636.     glVertex3fv(P110);
  1637.     glVertex3fv(P111);
  1638.     glVertex3fv(P112);
  1639.     glVertex3fv(P113);
  1640.     glVertex3fv(P114);
  1641.     glVertex3fv(P115);
  1642.     glEnd();
  1643.     glBegin(GL_POLYGON);
  1644.     glVertex3fv(P116);
  1645.     glVertex3fv(P117);
  1646.     glVertex3fv(P118);
  1647.     glVertex3fv(P119);
  1648.     glVertex3fv(P120);
  1649.     glVertex3fv(P121);
  1650.     glEnd();
  1651. }
  1652. void
  1653. DrawWhale(fishRec * fish)
  1654. {
  1655.     float seg0, seg1, seg2, seg3, seg4, seg5, seg6, seg7;
  1656.     float pitch, thrash, chomp;
  1657.     fish->htail = (int) (fish->htail - (int) (5.0 * fish->v)) % 360;
  1658.     thrash = 70.0 * fish->v;
  1659.     seg0 = 1.5 * thrash * sin((fish->htail) * RRAD);
  1660.     seg1 = 2.5 * thrash * sin((fish->htail + 10.0) * RRAD);
  1661.     seg2 = 3.7 * thrash * sin((fish->htail + 15.0) * RRAD);
  1662.     seg3 = 4.8 * thrash * sin((fish->htail + 23.0) * RRAD);
  1663.     seg4 = 6.0 * thrash * sin((fish->htail + 28.0) * RRAD);
  1664.     seg5 = 6.5 * thrash * sin((fish->htail + 35.0) * RRAD);
  1665.     seg6 = 6.5 * thrash * sin((fish->htail + 40.0) * RRAD);
  1666.     seg7 = 6.5 * thrash * sin((fish->htail + 55.0) * RRAD);
  1667.     pitch = fish->v * sin((fish->htail - 160.0) * RRAD);
  1668.     chomp = 0.0;
  1669.     if (fish->v > 2.0) {
  1670.         chomp = -(fish->v - 2.0) * 200.0;
  1671.     }
  1672.     P012[1] = iP012[1] + seg5;
  1673.     P013[1] = iP013[1] + seg5;
  1674.     P014[1] = iP014[1] + seg5;
  1675.     P015[1] = iP015[1] + seg5;
  1676.     P016[1] = iP016[1] + seg5;
  1677.     P017[1] = iP017[1] + seg5;
  1678.     P018[1] = iP018[1] + seg5;
  1679.     P019[1] = iP019[1] + seg5;
  1680.     P020[1] = iP020[1] + seg4;
  1681.     P021[1] = iP021[1] + seg4;
  1682.     P022[1] = iP022[1] + seg4;
  1683.     P023[1] = iP023[1] + seg4;
  1684.     P024[1] = iP024[1] + seg4;
  1685.     P025[1] = iP025[1] + seg4;
  1686.     P026[1] = iP026[1] + seg4;
  1687.     P027[1] = iP027[1] + seg4;
  1688.     P028[1] = iP028[1] + seg2;
  1689.     P029[1] = iP029[1] + seg2;
  1690.     P030[1] = iP030[1] + seg2;
  1691.     P031[1] = iP031[1] + seg2;
  1692.     P032[1] = iP032[1] + seg2;
  1693.     P033[1] = iP033[1] + seg2;
  1694.     P034[1] = iP034[1] + seg2;
  1695.     P035[1] = iP035[1] + seg2;
  1696.     P036[1] = iP036[1] + seg1;
  1697.     P037[1] = iP037[1] + seg1;
  1698.     P038[1] = iP038[1] + seg1;
  1699.     P039[1] = iP039[1] + seg1;
  1700.     P040[1] = iP040[1] + seg1;
  1701.     P041[1] = iP041[1] + seg1;
  1702.     P042[1] = iP042[1] + seg1;
  1703.     P043[1] = iP043[1] + seg1;
  1704.     P044[1] = iP044[1] + seg0;
  1705.     P045[1] = iP045[1] + seg0;
  1706.     P046[1] = iP046[1] + seg0;
  1707.     P047[1] = iP047[1] + seg0;
  1708.     P048[1] = iP048[1] + seg0;
  1709.     P049[1] = iP049[1] + seg0;
  1710.     P050[1] = iP050[1] + seg0;
  1711.     P051[1] = iP051[1] + seg0;
  1712.     P009[1] = iP009[1] + seg6;
  1713.     P010[1] = iP010[1] + seg6;
  1714.     P075[1] = iP075[1] + seg6;
  1715.     P076[1] = iP076[1] + seg6;
  1716.     P001[1] = iP001[1] + seg7;
  1717.     P011[1] = iP011[1] + seg7;
  1718.     P068[1] = iP068[1] + seg7;
  1719.     P069[1] = iP069[1] + seg7;
  1720.     P070[1] = iP070[1] + seg7;
  1721.     P071[1] = iP071[1] + seg7;
  1722.     P072[1] = iP072[1] + seg7;
  1723.     P073[1] = iP073[1] + seg7;
  1724.     P074[1] = iP074[1] + seg7;
  1725.     P091[1] = iP091[1] + seg3 * 1.1;
  1726.     P092[1] = iP092[1] + seg3;
  1727.     P093[1] = iP093[1] + seg3;
  1728.     P094[1] = iP094[1] + seg3;
  1729.     P095[1] = iP095[1] + seg3 * 0.9;
  1730.     P099[1] = iP099[1] + chomp;
  1731.     P098[1] = iP098[1] + chomp;
  1732.     P097[1] = iP097[1] + chomp;
  1733.     P096[1] = iP096[1] + chomp;
  1734.     glPushMatrix();
  1735.     glRotatef(pitch, 1.0, 0.0, 0.0);
  1736.     glTranslatef(0.0, 0.0, 8000.0);
  1737.     glRotatef(180.0, 0.0, 1.0, 0.0);
  1738.     glScalef(3.0, 3.0, 3.0);
  1739.     glEnable(GL_CULL_FACE);
  1740.     Whale001();
  1741.     Whale002();
  1742.     Whale003();
  1743.     Whale004();
  1744.     Whale005();
  1745.     Whale006();
  1746.     Whale007();
  1747.     Whale008();
  1748.     Whale009();
  1749.     Whale010();
  1750.     Whale011();
  1751.     Whale012();
  1752.     Whale013();
  1753.     Whale014();
  1754.     Whale015();
  1755.     Whale016();
  1756.     glDisable(GL_CULL_FACE);
  1757.     glPopMatrix();
  1758. }