home *** CD-ROM | disk | FTP | other *** search
- /* @(#)hsi.h 1.1 92/05/28 SMI */
- /* from hsi.h 1.3 90/07/23 SMI */
-
- /*
- * Copyright (c) 1986 by Sun Microsystems, Inc.
- */
-
- #define NLAT 7
- #define NLON 16
-
- static Pt3d lons[NLON][NLAT+2] = {
- { 0.000, 1.000, 0.000},
- { 0.000, 0.924,-0.383},
- { 0.000, 0.707,-0.707},
- { 0.000, 0.383,-0.924},
- { 0.000, 0.000,-1.000},
- { 0.000,-0.383,-0.924},
- { 0.000,-0.707,-0.707},
- { 0.000,-0.924,-0.383},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.146, 0.924,-0.354},
- { 0.271, 0.707,-0.653},
- { 0.354, 0.383,-0.854},
- { 0.383, 0.000,-0.924},
- { 0.354,-0.383,-0.854},
- { 0.271,-0.707,-0.653},
- { 0.146,-0.924,-0.354},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.271, 0.924,-0.271},
- { 0.500, 0.707,-0.500},
- { 0.653, 0.383,-0.653},
- { 0.707, 0.000,-0.707},
- { 0.653,-0.383,-0.653},
- { 0.500,-0.707,-0.500},
- { 0.271,-0.924,-0.271},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.354, 0.924,-0.146},
- { 0.653, 0.707,-0.271},
- { 0.854, 0.383,-0.354},
- { 0.924, 0.000,-0.383},
- { 0.854,-0.383,-0.354},
- { 0.653,-0.707,-0.271},
- { 0.354,-0.924,-0.146},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.383, 0.924, 0.000},
- { 0.707, 0.707, 0.000},
- { 0.924, 0.383, 0.000},
- { 1.000, 0.000, 0.000},
- { 0.924,-0.383, 0.000},
- { 0.707,-0.707, 0.000},
- { 0.383,-0.924, 0.000},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.354, 0.924, 0.146},
- { 0.653, 0.707, 0.271},
- { 0.854, 0.383, 0.354},
- { 0.924, 0.000, 0.383},
- { 0.854,-0.383, 0.354},
- { 0.653,-0.707, 0.271},
- { 0.354,-0.924, 0.146},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.271, 0.924, 0.271},
- { 0.500, 0.707, 0.500},
- { 0.653, 0.383, 0.653},
- { 0.707, 0.000, 0.707},
- { 0.653,-0.383, 0.653},
- { 0.500,-0.707, 0.500},
- { 0.271,-0.924, 0.271},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.146, 0.924, 0.354},
- { 0.271, 0.707, 0.653},
- { 0.354, 0.383, 0.854},
- { 0.383, 0.000, 0.924},
- { 0.354,-0.383, 0.854},
- { 0.271,-0.707, 0.653},
- { 0.146,-0.924, 0.354},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- { 0.000, 0.924, 0.383},
- { 0.000, 0.707, 0.707},
- { 0.000, 0.383, 0.924},
- { 0.000, 0.000, 1.000},
- { 0.000,-0.383, 0.924},
- { 0.000,-0.707, 0.707},
- { 0.000,-0.924, 0.383},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.146, 0.924, 0.354},
- {-0.271, 0.707, 0.653},
- {-0.354, 0.383, 0.854},
- {-0.383, 0.000, 0.924},
- {-0.354,-0.383, 0.854},
- {-0.271,-0.707, 0.653},
- {-0.146,-0.924, 0.354},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.271, 0.924, 0.271},
- {-0.500, 0.707, 0.500},
- {-0.653, 0.383, 0.653},
- {-0.707, 0.000, 0.707},
- {-0.653,-0.383, 0.653},
- {-0.500,-0.707, 0.500},
- {-0.271,-0.924, 0.271},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.354, 0.924, 0.146},
- {-0.653, 0.707, 0.271},
- {-0.854, 0.383, 0.354},
- {-0.924, 0.000, 0.383},
- {-0.854,-0.383, 0.354},
- {-0.653,-0.707, 0.271},
- {-0.354,-0.924, 0.146},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.383, 0.924, 0.000},
- {-0.707, 0.707, 0.000},
- {-0.924, 0.383, 0.000},
- {-1.000, 0.000, 0.000},
- {-0.924,-0.383, 0.000},
- {-0.707,-0.707, 0.000},
- {-0.383,-0.924, 0.000},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.354, 0.924,-0.146},
- {-0.653, 0.707,-0.271},
- {-0.854, 0.383,-0.354},
- {-0.924, 0.000,-0.383},
- {-0.854,-0.383,-0.354},
- {-0.653,-0.707,-0.271},
- {-0.354,-0.924,-0.146},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.271, 0.924,-0.271},
- {-0.500, 0.707,-0.500},
- {-0.653, 0.383,-0.653},
- {-0.707, 0.000,-0.707},
- {-0.653,-0.383,-0.653},
- {-0.500,-0.707,-0.500},
- {-0.271,-0.924,-0.271},
- { 0.000,-1.000, 0.000},
-
- { 0.000, 1.000, 0.000},
- {-0.146, 0.924,-0.354},
- {-0.271, 0.707,-0.653},
- {-0.354, 0.383,-0.854},
- {-0.383, 0.000,-0.924},
- {-0.354,-0.383,-0.854},
- {-0.271,-0.707,-0.653},
- {-0.146,-0.924,-0.354},
- { 0.000,-1.000, 0.000},
- } ;
-
- static Pt3d lats[NLAT][NLON+1] = {
- { 0.000, 0.924, 0.383},
- { 0.146, 0.924, 0.354},
- { 0.271, 0.924, 0.271},
- { 0.354, 0.924, 0.146},
- { 0.383, 0.924, 0.000},
- { 0.354, 0.924,-0.146},
- { 0.271, 0.924,-0.271},
- { 0.146, 0.924,-0.354},
- { 0.000, 0.924,-0.383},
- {-0.146, 0.924,-0.354},
- {-0.271, 0.924,-0.271},
- {-0.354, 0.924,-0.146},
- {-0.383, 0.924, 0.000},
- {-0.354, 0.924, 0.146},
- {-0.271, 0.924, 0.271},
- {-0.146, 0.924, 0.354},
- { 0.000, 0.924, 0.383},
-
- { 0.000, 0.707, 0.707},
- { 0.271, 0.707, 0.653},
- { 0.500, 0.707, 0.500},
- { 0.653, 0.707, 0.271},
- { 0.707, 0.707, 0.000},
- { 0.653, 0.707,-0.271},
- { 0.500, 0.707,-0.500},
- { 0.271, 0.707,-0.653},
- { 0.000, 0.707,-0.707},
- {-0.271, 0.707,-0.653},
- {-0.500, 0.707,-0.500},
- {-0.653, 0.707,-0.271},
- {-0.707, 0.707, 0.000},
- {-0.653, 0.707, 0.271},
- {-0.500, 0.707, 0.500},
- {-0.271, 0.707, 0.653},
- { 0.000, 0.707, 0.707},
-
- { 0.000, 0.383, 0.924},
- { 0.354, 0.383, 0.854},
- { 0.653, 0.383, 0.653},
- { 0.854, 0.383, 0.354},
- { 0.924, 0.383, 0.000},
- { 0.854, 0.383,-0.354},
- { 0.653, 0.383,-0.653},
- { 0.354, 0.383,-0.854},
- { 0.000, 0.383,-0.924},
- {-0.354, 0.383,-0.854},
- {-0.653, 0.383,-0.653},
- {-0.854, 0.383,-0.354},
- {-0.924, 0.383, 0.000},
- {-0.854, 0.383, 0.354},
- {-0.653, 0.383, 0.653},
- {-0.354, 0.383, 0.854},
- { 0.000, 0.383, 0.924},
-
- { 0.000, 0.000, 1.000},
- { 0.383, 0.000, 0.924},
- { 0.707, 0.000, 0.707},
- { 0.924, 0.000, 0.383},
- { 1.000, 0.000, 0.000},
- { 0.924, 0.000,-0.383},
- { 0.707, 0.000,-0.707},
- { 0.383, 0.000,-0.924},
- { 0.000, 0.000,-1.000},
- {-0.383, 0.000,-0.924},
- {-0.707, 0.000,-0.707},
- {-0.924, 0.000,-0.383},
- {-1.000, 0.000, 0.000},
- {-0.924, 0.000, 0.383},
- {-0.707, 0.000, 0.707},
- {-0.383, 0.000, 0.924},
- { 0.000, 0.000, 1.000},
-
- { 0.000,-0.383, 0.924},
- { 0.354,-0.383, 0.854},
- { 0.653,-0.383, 0.653},
- { 0.854,-0.383, 0.354},
- { 0.924,-0.383, 0.000},
- { 0.854,-0.383,-0.354},
- { 0.653,-0.383,-0.653},
- { 0.354,-0.383,-0.854},
- { 0.000,-0.383,-0.924},
- {-0.354,-0.383,-0.854},
- {-0.653,-0.383,-0.653},
- {-0.854,-0.383,-0.354},
- {-0.924,-0.383, 0.000},
- {-0.854,-0.383, 0.354},
- {-0.653,-0.383, 0.653},
- {-0.354,-0.383, 0.854},
- { 0.000,-0.383, 0.924},
-
- { 0.000,-0.707, 0.707},
- { 0.271,-0.707, 0.653},
- { 0.500,-0.707, 0.500},
- { 0.653,-0.707, 0.271},
- { 0.707,-0.707, 0.000},
- { 0.653,-0.707,-0.271},
- { 0.500,-0.707,-0.500},
- { 0.271,-0.707,-0.653},
- { 0.000,-0.707,-0.707},
- {-0.271,-0.707,-0.653},
- {-0.500,-0.707,-0.500},
- {-0.653,-0.707,-0.271},
- {-0.707,-0.707, 0.000},
- {-0.653,-0.707, 0.271},
- {-0.500,-0.707, 0.500},
- {-0.271,-0.707, 0.653},
- { 0.000,-0.707, 0.707},
-
- { 0.000,-0.924, 0.383},
- { 0.146,-0.924, 0.354},
- { 0.271,-0.924, 0.271},
- { 0.354,-0.924, 0.146},
- { 0.383,-0.924, 0.000},
- { 0.354,-0.924,-0.146},
- { 0.271,-0.924,-0.271},
- { 0.146,-0.924,-0.354},
- { 0.000,-0.924,-0.383},
- {-0.146,-0.924,-0.354},
- {-0.271,-0.924,-0.271},
- {-0.354,-0.924,-0.146},
- {-0.383,-0.924, 0.000},
- {-0.354,-0.924, 0.146},
- {-0.271,-0.924, 0.271},
- {-0.146,-0.924, 0.354},
- { 0.000,-0.924, 0.383},
- } ;
-
-