OB.DAAC Logo
NASA Logo
Ocean Color Science Software

ocssw V2022
nnr_001.modo_Tau.f
Go to the documentation of this file.
1 c ##################################################################
2 c THIS FILE IS AUTOMATICALLY GENERATED WITH:
3 c
4 c ffnet-0.6.2, feed-forward neural network for python
5 c http://ffnet.sourceforge.net
6 c
7 c Copyright (C) 2006 by Marek Wojciechowski
8 c <mwojc@p.lodz.pl>
9 c
10 c Distributed under the terms of the GNU General Public License:
11 c http://www.gnu.org/copyleft/gpl.html
12 c ##################################################################
13 c
14 c NETWORK SPECIFICATION
15 c Feed-forward neural network:
16 c inputs: 15
17 c hiddens: 15
18 c outputs: 1
19 c connections and biases: 256
20 c
21 c INPUT LIMITS
22 c 1 --> [ 0.092 0.39500001]
23 c 2 --> [ 0.049 0.336]
24 c 3 --> [ 0.025 0.31200001]
25 c 4 --> [ 0.009 0.292]
26 c 5 --> [ 0.002 0.255]
27 c 6 --> [ 0. 0.237]
28 c 7 --> [ 0. 0.206]
29 c 8 --> [-0.99998806 0.18172069]
30 c 9 --> [-0.32488776 0.93322823]
31 c 10 --> [-0.99999986 1. ]
32 c 11 --> [ 0.31084233 0.99605656]
33 c 12 --> [-0.79874048 0.99990252]
34 c 13 --> [ 0.42135238 0.99999263]
35 c 14 --> [ 0. 0.84899998]
36 c 15 --> [ 0.11056475 15.28216619]
37 c
38 c OUTPUT LIMITS
39 c 1 --> [-4.37405846 0.92107929]
40 c
41 c NOTE: You need 'ffnet.f' file distributed with ffnet-0.6.2
42 c sources to get the below routines to work.
43 c
44 c ------------------------------------------------------------------
45  SUBROUTINE ffnet_terra(input, output)
46 c ------------------------------------------------------------------
47 c
48 c Returns network answer (numpy array) to input sequence
49 c (for one input sample or 2D array of input samples)
50 c Arguments:
51 c input - 1-d array of length 15
52 c output - 1-d array of length 1
53 c ------------------------------------------------------------------
54  INTEGER conec(256, 2)
55  INTEGER inno(15)
56  INTEGER outno(1)
57  DOUBLE PRECISION weights(256)
58  DOUBLE PRECISION eni(15, 2)
59  DOUBLE PRECISION deo(1, 2)
60  DOUBLE PRECISION units(31)
61  DOUBLE PRECISION input(15)
62  DOUBLE PRECISION output(1)
63 c
64 cf2py intent(in) input
65 cf2py intent(out) output
66 c
67  conec(1, 1) = 0
68  conec(2, 1) = 1
69  conec(3, 1) = 2
70  conec(4, 1) = 3
71  conec(5, 1) = 4
72  conec(6, 1) = 5
73  conec(7, 1) = 6
74  conec(8, 1) = 7
75  conec(9, 1) = 8
76  conec(10, 1) = 9
77  conec(11, 1) = 10
78  conec(12, 1) = 11
79  conec(13, 1) = 12
80  conec(14, 1) = 13
81  conec(15, 1) = 14
82  conec(16, 1) = 15
83  conec(17, 1) = 0
84  conec(18, 1) = 1
85  conec(19, 1) = 2
86  conec(20, 1) = 3
87  conec(21, 1) = 4
88  conec(22, 1) = 5
89  conec(23, 1) = 6
90  conec(24, 1) = 7
91  conec(25, 1) = 8
92  conec(26, 1) = 9
93  conec(27, 1) = 10
94  conec(28, 1) = 11
95  conec(29, 1) = 12
96  conec(30, 1) = 13
97  conec(31, 1) = 14
98  conec(32, 1) = 15
99  conec(33, 1) = 0
100  conec(34, 1) = 1
101  conec(35, 1) = 2
102  conec(36, 1) = 3
103  conec(37, 1) = 4
104  conec(38, 1) = 5
105  conec(39, 1) = 6
106  conec(40, 1) = 7
107  conec(41, 1) = 8
108  conec(42, 1) = 9
109  conec(43, 1) = 10
110  conec(44, 1) = 11
111  conec(45, 1) = 12
112  conec(46, 1) = 13
113  conec(47, 1) = 14
114  conec(48, 1) = 15
115  conec(49, 1) = 0
116  conec(50, 1) = 1
117  conec(51, 1) = 2
118  conec(52, 1) = 3
119  conec(53, 1) = 4
120  conec(54, 1) = 5
121  conec(55, 1) = 6
122  conec(56, 1) = 7
123  conec(57, 1) = 8
124  conec(58, 1) = 9
125  conec(59, 1) = 10
126  conec(60, 1) = 11
127  conec(61, 1) = 12
128  conec(62, 1) = 13
129  conec(63, 1) = 14
130  conec(64, 1) = 15
131  conec(65, 1) = 0
132  conec(66, 1) = 1
133  conec(67, 1) = 2
134  conec(68, 1) = 3
135  conec(69, 1) = 4
136  conec(70, 1) = 5
137  conec(71, 1) = 6
138  conec(72, 1) = 7
139  conec(73, 1) = 8
140  conec(74, 1) = 9
141  conec(75, 1) = 10
142  conec(76, 1) = 11
143  conec(77, 1) = 12
144  conec(78, 1) = 13
145  conec(79, 1) = 14
146  conec(80, 1) = 15
147  conec(81, 1) = 0
148  conec(82, 1) = 1
149  conec(83, 1) = 2
150  conec(84, 1) = 3
151  conec(85, 1) = 4
152  conec(86, 1) = 5
153  conec(87, 1) = 6
154  conec(88, 1) = 7
155  conec(89, 1) = 8
156  conec(90, 1) = 9
157  conec(91, 1) = 10
158  conec(92, 1) = 11
159  conec(93, 1) = 12
160  conec(94, 1) = 13
161  conec(95, 1) = 14
162  conec(96, 1) = 15
163  conec(97, 1) = 0
164  conec(98, 1) = 1
165  conec(99, 1) = 2
166  conec(100, 1) = 3
167  conec(101, 1) = 4
168  conec(102, 1) = 5
169  conec(103, 1) = 6
170  conec(104, 1) = 7
171  conec(105, 1) = 8
172  conec(106, 1) = 9
173  conec(107, 1) = 10
174  conec(108, 1) = 11
175  conec(109, 1) = 12
176  conec(110, 1) = 13
177  conec(111, 1) = 14
178  conec(112, 1) = 15
179  conec(113, 1) = 0
180  conec(114, 1) = 1
181  conec(115, 1) = 2
182  conec(116, 1) = 3
183  conec(117, 1) = 4
184  conec(118, 1) = 5
185  conec(119, 1) = 6
186  conec(120, 1) = 7
187  conec(121, 1) = 8
188  conec(122, 1) = 9
189  conec(123, 1) = 10
190  conec(124, 1) = 11
191  conec(125, 1) = 12
192  conec(126, 1) = 13
193  conec(127, 1) = 14
194  conec(128, 1) = 15
195  conec(129, 1) = 0
196  conec(130, 1) = 1
197  conec(131, 1) = 2
198  conec(132, 1) = 3
199  conec(133, 1) = 4
200  conec(134, 1) = 5
201  conec(135, 1) = 6
202  conec(136, 1) = 7
203  conec(137, 1) = 8
204  conec(138, 1) = 9
205  conec(139, 1) = 10
206  conec(140, 1) = 11
207  conec(141, 1) = 12
208  conec(142, 1) = 13
209  conec(143, 1) = 14
210  conec(144, 1) = 15
211  conec(145, 1) = 0
212  conec(146, 1) = 1
213  conec(147, 1) = 2
214  conec(148, 1) = 3
215  conec(149, 1) = 4
216  conec(150, 1) = 5
217  conec(151, 1) = 6
218  conec(152, 1) = 7
219  conec(153, 1) = 8
220  conec(154, 1) = 9
221  conec(155, 1) = 10
222  conec(156, 1) = 11
223  conec(157, 1) = 12
224  conec(158, 1) = 13
225  conec(159, 1) = 14
226  conec(160, 1) = 15
227  conec(161, 1) = 0
228  conec(162, 1) = 1
229  conec(163, 1) = 2
230  conec(164, 1) = 3
231  conec(165, 1) = 4
232  conec(166, 1) = 5
233  conec(167, 1) = 6
234  conec(168, 1) = 7
235  conec(169, 1) = 8
236  conec(170, 1) = 9
237  conec(171, 1) = 10
238  conec(172, 1) = 11
239  conec(173, 1) = 12
240  conec(174, 1) = 13
241  conec(175, 1) = 14
242  conec(176, 1) = 15
243  conec(177, 1) = 0
244  conec(178, 1) = 1
245  conec(179, 1) = 2
246  conec(180, 1) = 3
247  conec(181, 1) = 4
248  conec(182, 1) = 5
249  conec(183, 1) = 6
250  conec(184, 1) = 7
251  conec(185, 1) = 8
252  conec(186, 1) = 9
253  conec(187, 1) = 10
254  conec(188, 1) = 11
255  conec(189, 1) = 12
256  conec(190, 1) = 13
257  conec(191, 1) = 14
258  conec(192, 1) = 15
259  conec(193, 1) = 0
260  conec(194, 1) = 1
261  conec(195, 1) = 2
262  conec(196, 1) = 3
263  conec(197, 1) = 4
264  conec(198, 1) = 5
265  conec(199, 1) = 6
266  conec(200, 1) = 7
267  conec(201, 1) = 8
268  conec(202, 1) = 9
269  conec(203, 1) = 10
270  conec(204, 1) = 11
271  conec(205, 1) = 12
272  conec(206, 1) = 13
273  conec(207, 1) = 14
274  conec(208, 1) = 15
275  conec(209, 1) = 0
276  conec(210, 1) = 1
277  conec(211, 1) = 2
278  conec(212, 1) = 3
279  conec(213, 1) = 4
280  conec(214, 1) = 5
281  conec(215, 1) = 6
282  conec(216, 1) = 7
283  conec(217, 1) = 8
284  conec(218, 1) = 9
285  conec(219, 1) = 10
286  conec(220, 1) = 11
287  conec(221, 1) = 12
288  conec(222, 1) = 13
289  conec(223, 1) = 14
290  conec(224, 1) = 15
291  conec(225, 1) = 0
292  conec(226, 1) = 1
293  conec(227, 1) = 2
294  conec(228, 1) = 3
295  conec(229, 1) = 4
296  conec(230, 1) = 5
297  conec(231, 1) = 6
298  conec(232, 1) = 7
299  conec(233, 1) = 8
300  conec(234, 1) = 9
301  conec(235, 1) = 10
302  conec(236, 1) = 11
303  conec(237, 1) = 12
304  conec(238, 1) = 13
305  conec(239, 1) = 14
306  conec(240, 1) = 15
307  conec(241, 1) = 0
308  conec(242, 1) = 16
309  conec(243, 1) = 17
310  conec(244, 1) = 18
311  conec(245, 1) = 19
312  conec(246, 1) = 20
313  conec(247, 1) = 21
314  conec(248, 1) = 22
315  conec(249, 1) = 23
316  conec(250, 1) = 24
317  conec(251, 1) = 25
318  conec(252, 1) = 26
319  conec(253, 1) = 27
320  conec(254, 1) = 28
321  conec(255, 1) = 29
322  conec(256, 1) = 30
323  conec(1, 2) = 16
324  conec(2, 2) = 16
325  conec(3, 2) = 16
326  conec(4, 2) = 16
327  conec(5, 2) = 16
328  conec(6, 2) = 16
329  conec(7, 2) = 16
330  conec(8, 2) = 16
331  conec(9, 2) = 16
332  conec(10, 2) = 16
333  conec(11, 2) = 16
334  conec(12, 2) = 16
335  conec(13, 2) = 16
336  conec(14, 2) = 16
337  conec(15, 2) = 16
338  conec(16, 2) = 16
339  conec(17, 2) = 17
340  conec(18, 2) = 17
341  conec(19, 2) = 17
342  conec(20, 2) = 17
343  conec(21, 2) = 17
344  conec(22, 2) = 17
345  conec(23, 2) = 17
346  conec(24, 2) = 17
347  conec(25, 2) = 17
348  conec(26, 2) = 17
349  conec(27, 2) = 17
350  conec(28, 2) = 17
351  conec(29, 2) = 17
352  conec(30, 2) = 17
353  conec(31, 2) = 17
354  conec(32, 2) = 17
355  conec(33, 2) = 18
356  conec(34, 2) = 18
357  conec(35, 2) = 18
358  conec(36, 2) = 18
359  conec(37, 2) = 18
360  conec(38, 2) = 18
361  conec(39, 2) = 18
362  conec(40, 2) = 18
363  conec(41, 2) = 18
364  conec(42, 2) = 18
365  conec(43, 2) = 18
366  conec(44, 2) = 18
367  conec(45, 2) = 18
368  conec(46, 2) = 18
369  conec(47, 2) = 18
370  conec(48, 2) = 18
371  conec(49, 2) = 19
372  conec(50, 2) = 19
373  conec(51, 2) = 19
374  conec(52, 2) = 19
375  conec(53, 2) = 19
376  conec(54, 2) = 19
377  conec(55, 2) = 19
378  conec(56, 2) = 19
379  conec(57, 2) = 19
380  conec(58, 2) = 19
381  conec(59, 2) = 19
382  conec(60, 2) = 19
383  conec(61, 2) = 19
384  conec(62, 2) = 19
385  conec(63, 2) = 19
386  conec(64, 2) = 19
387  conec(65, 2) = 20
388  conec(66, 2) = 20
389  conec(67, 2) = 20
390  conec(68, 2) = 20
391  conec(69, 2) = 20
392  conec(70, 2) = 20
393  conec(71, 2) = 20
394  conec(72, 2) = 20
395  conec(73, 2) = 20
396  conec(74, 2) = 20
397  conec(75, 2) = 20
398  conec(76, 2) = 20
399  conec(77, 2) = 20
400  conec(78, 2) = 20
401  conec(79, 2) = 20
402  conec(80, 2) = 20
403  conec(81, 2) = 21
404  conec(82, 2) = 21
405  conec(83, 2) = 21
406  conec(84, 2) = 21
407  conec(85, 2) = 21
408  conec(86, 2) = 21
409  conec(87, 2) = 21
410  conec(88, 2) = 21
411  conec(89, 2) = 21
412  conec(90, 2) = 21
413  conec(91, 2) = 21
414  conec(92, 2) = 21
415  conec(93, 2) = 21
416  conec(94, 2) = 21
417  conec(95, 2) = 21
418  conec(96, 2) = 21
419  conec(97, 2) = 22
420  conec(98, 2) = 22
421  conec(99, 2) = 22
422  conec(100, 2) = 22
423  conec(101, 2) = 22
424  conec(102, 2) = 22
425  conec(103, 2) = 22
426  conec(104, 2) = 22
427  conec(105, 2) = 22
428  conec(106, 2) = 22
429  conec(107, 2) = 22
430  conec(108, 2) = 22
431  conec(109, 2) = 22
432  conec(110, 2) = 22
433  conec(111, 2) = 22
434  conec(112, 2) = 22
435  conec(113, 2) = 23
436  conec(114, 2) = 23
437  conec(115, 2) = 23
438  conec(116, 2) = 23
439  conec(117, 2) = 23
440  conec(118, 2) = 23
441  conec(119, 2) = 23
442  conec(120, 2) = 23
443  conec(121, 2) = 23
444  conec(122, 2) = 23
445  conec(123, 2) = 23
446  conec(124, 2) = 23
447  conec(125, 2) = 23
448  conec(126, 2) = 23
449  conec(127, 2) = 23
450  conec(128, 2) = 23
451  conec(129, 2) = 24
452  conec(130, 2) = 24
453  conec(131, 2) = 24
454  conec(132, 2) = 24
455  conec(133, 2) = 24
456  conec(134, 2) = 24
457  conec(135, 2) = 24
458  conec(136, 2) = 24
459  conec(137, 2) = 24
460  conec(138, 2) = 24
461  conec(139, 2) = 24
462  conec(140, 2) = 24
463  conec(141, 2) = 24
464  conec(142, 2) = 24
465  conec(143, 2) = 24
466  conec(144, 2) = 24
467  conec(145, 2) = 25
468  conec(146, 2) = 25
469  conec(147, 2) = 25
470  conec(148, 2) = 25
471  conec(149, 2) = 25
472  conec(150, 2) = 25
473  conec(151, 2) = 25
474  conec(152, 2) = 25
475  conec(153, 2) = 25
476  conec(154, 2) = 25
477  conec(155, 2) = 25
478  conec(156, 2) = 25
479  conec(157, 2) = 25
480  conec(158, 2) = 25
481  conec(159, 2) = 25
482  conec(160, 2) = 25
483  conec(161, 2) = 26
484  conec(162, 2) = 26
485  conec(163, 2) = 26
486  conec(164, 2) = 26
487  conec(165, 2) = 26
488  conec(166, 2) = 26
489  conec(167, 2) = 26
490  conec(168, 2) = 26
491  conec(169, 2) = 26
492  conec(170, 2) = 26
493  conec(171, 2) = 26
494  conec(172, 2) = 26
495  conec(173, 2) = 26
496  conec(174, 2) = 26
497  conec(175, 2) = 26
498  conec(176, 2) = 26
499  conec(177, 2) = 27
500  conec(178, 2) = 27
501  conec(179, 2) = 27
502  conec(180, 2) = 27
503  conec(181, 2) = 27
504  conec(182, 2) = 27
505  conec(183, 2) = 27
506  conec(184, 2) = 27
507  conec(185, 2) = 27
508  conec(186, 2) = 27
509  conec(187, 2) = 27
510  conec(188, 2) = 27
511  conec(189, 2) = 27
512  conec(190, 2) = 27
513  conec(191, 2) = 27
514  conec(192, 2) = 27
515  conec(193, 2) = 28
516  conec(194, 2) = 28
517  conec(195, 2) = 28
518  conec(196, 2) = 28
519  conec(197, 2) = 28
520  conec(198, 2) = 28
521  conec(199, 2) = 28
522  conec(200, 2) = 28
523  conec(201, 2) = 28
524  conec(202, 2) = 28
525  conec(203, 2) = 28
526  conec(204, 2) = 28
527  conec(205, 2) = 28
528  conec(206, 2) = 28
529  conec(207, 2) = 28
530  conec(208, 2) = 28
531  conec(209, 2) = 29
532  conec(210, 2) = 29
533  conec(211, 2) = 29
534  conec(212, 2) = 29
535  conec(213, 2) = 29
536  conec(214, 2) = 29
537  conec(215, 2) = 29
538  conec(216, 2) = 29
539  conec(217, 2) = 29
540  conec(218, 2) = 29
541  conec(219, 2) = 29
542  conec(220, 2) = 29
543  conec(221, 2) = 29
544  conec(222, 2) = 29
545  conec(223, 2) = 29
546  conec(224, 2) = 29
547  conec(225, 2) = 30
548  conec(226, 2) = 30
549  conec(227, 2) = 30
550  conec(228, 2) = 30
551  conec(229, 2) = 30
552  conec(230, 2) = 30
553  conec(231, 2) = 30
554  conec(232, 2) = 30
555  conec(233, 2) = 30
556  conec(234, 2) = 30
557  conec(235, 2) = 30
558  conec(236, 2) = 30
559  conec(237, 2) = 30
560  conec(238, 2) = 30
561  conec(239, 2) = 30
562  conec(240, 2) = 30
563  conec(241, 2) = 31
564  conec(242, 2) = 31
565  conec(243, 2) = 31
566  conec(244, 2) = 31
567  conec(245, 2) = 31
568  conec(246, 2) = 31
569  conec(247, 2) = 31
570  conec(248, 2) = 31
571  conec(249, 2) = 31
572  conec(250, 2) = 31
573  conec(251, 2) = 31
574  conec(252, 2) = 31
575  conec(253, 2) = 31
576  conec(254, 2) = 31
577  conec(255, 2) = 31
578  conec(256, 2) = 31
579 c
580  inno(1) = 15
581  inno(2) = 14
582  inno(3) = 13
583  inno(4) = 12
584  inno(5) = 11
585  inno(6) = 10
586  inno(7) = 9
587  inno(8) = 8
588  inno(9) = 7
589  inno(10) = 6
590  inno(11) = 5
591  inno(12) = 4
592  inno(13) = 3
593  inno(14) = 2
594  inno(15) = 1
595 c
596  outno(1) = 31
597 c
598  weights(1) = 0.0586755525877
599  weights(2) = 2.66260287155
600  weights(3) = -0.205684950416
601  weights(4) = 0.63186794161
602  weights(5) = -6.99934143687
603  weights(6) = -2.98806842755
604  weights(7) = 0.624556281931
605  weights(8) = 2.49772139325
606  weights(9) = 4.55290874193
607  weights(10) = -4.40320680068
608  weights(11) = 10.5045321111
609  weights(12) = 2.09606444889
610  weights(13) = -25.4880175048
611  weights(14) = 20.6233282314
612  weights(15) = 0.462597916382
613  weights(16) = -0.73528502631
614  weights(17) = -4.61753072897
615  weights(18) = 2.07120425216
616  weights(19) = -0.526758105629
617  weights(20) = 0.059727991516
618  weights(21) = -1.6522747859
619  weights(22) = -1.09414991239
620  weights(23) = 0.172266242542
621  weights(24) = 7.30336419333
622  weights(25) = 0.390545057207
623  weights(26) = 11.4132555147
624  weights(27) = 5.41796634086
625  weights(28) = -66.8077044402
626  weights(29) = 25.6048944158
627  weights(30) = 36.6215471708
628  weights(31) = 5.52492637708
629  weights(32) = 0.679496851907
630  weights(33) = -0.614707063917
631  weights(34) = -0.303725826543
632  weights(35) = -0.395131396707
633  weights(36) = -0.643482565241
634  weights(37) = -0.86468419265
635  weights(38) = -1.29848966045
636  weights(39) = 0.522595775213
637  weights(40) = 0.615259708359
638  weights(41) = 2.20780057426
639  weights(42) = 3.57767752805
640  weights(43) = -2.57119009629
641  weights(44) = -1.6473302987
642  weights(45) = -1.69349893031
643  weights(46) = -2.08150948686
644  weights(47) = 0.766998291334
645  weights(48) = 2.87558206561
646  weights(49) = 2.17072346769
647  weights(50) = -0.0421020374552
648  weights(51) = 0.385296802595
649  weights(52) = -1.55684503986
650  weights(53) = -0.63599166382
651  weights(54) = -2.55858823629
652  weights(55) = -2.1128633918
653  weights(56) = -1.5221868504
654  weights(57) = -2.0268712129
655  weights(58) = 3.19597341044
656  weights(59) = -7.83126166576
657  weights(60) = 15.463092176
658  weights(61) = -13.254758932
659  weights(62) = 2.34393527011
660  weights(63) = -0.444815563938
661  weights(64) = -2.24664836367
662  weights(65) = 0.0477671073407
663  weights(66) = -2.76469643537
664  weights(67) = 0.63029443311
665  weights(68) = -3.52932188768
666  weights(69) = -3.51542750926
667  weights(70) = -3.56465827499
668  weights(71) = -1.36625908062
669  weights(72) = -0.356325731004
670  weights(73) = -1.24408098581
671  weights(74) = 10.7882528506
672  weights(75) = 9.36618696103
673  weights(76) = -2.455757206
674  weights(77) = 8.79927223599
675  weights(78) = 7.60258276331
676  weights(79) = 14.9046690239
677  weights(80) = 4.02976798902
678  weights(81) = 2.7304734218
679  weights(82) = -2.52976473961
680  weights(83) = -0.982209700612
681  weights(84) = -2.12486841038
682  weights(85) = 2.52294357677
683  weights(86) = -2.33692163846
684  weights(87) = 1.28139514172
685  weights(88) = 0.859823516615
686  weights(89) = -4.80392221437
687  weights(90) = -4.33214125953
688  weights(91) = -12.3227038746
689  weights(92) = 24.5079176659
690  weights(93) = -7.81794683044
691  weights(94) = -8.73121761546
692  weights(95) = -5.13840500061
693  weights(96) = 5.39677249345
694  weights(97) = -2.10643268626
695  weights(98) = -1.81493630727
696  weights(99) = -0.66111800259
697  weights(100) = 4.00637523569
698  weights(101) = 6.49901511646
699  weights(102) = -3.81726622753
700  weights(103) = 0.253177193821
701  weights(104) = 0.125976886355
702  weights(105) = -2.23501982173
703  weights(106) = -1.14742937244
704  weights(107) = 0.79071640224
705  weights(108) = -0.262228348409
706  weights(109) = -2.65828800908
707  weights(110) = -4.61273893478
708  weights(111) = -7.28442493591
709  weights(112) = 4.89574060816
710  weights(113) = -4.38650755077
711  weights(114) = -0.593681542897
712  weights(115) = -0.463175335857
713  weights(116) = 0.397001346368
714  weights(117) = -0.484981801368
715  weights(118) = 1.96259431862
716  weights(119) = 1.28608799941
717  weights(120) = -0.438161039004
718  weights(121) = 3.65811560424
719  weights(122) = 4.60080766078
720  weights(123) = 10.3811854671
721  weights(124) = -6.08870590892
722  weights(125) = 23.1300435319
723  weights(126) = -7.34652989784
724  weights(127) = -20.2168335091
725  weights(128) = 23.4210305861
726  weights(129) = 0.800399745093
727  weights(130) = 2.16648182963
728  weights(131) = -0.423620897432
729  weights(132) = 0.0307432811503
730  weights(133) = 1.22234688992
731  weights(134) = 0.555717874965
732  weights(135) = 1.01918567073
733  weights(136) = 4.54096185361
734  weights(137) = -1.74077061689
735  weights(138) = 5.52975004698
736  weights(139) = -1.39477598877
737  weights(140) = -2.15320397661
738  weights(141) = -1.78576061847
739  weights(142) = -29.7260649174
740  weights(143) = -6.04541177381
741  weights(144) = -1.62004675309
742  weights(145) = -0.166208495004
743  weights(146) = -1.90906397486
744  weights(147) = -0.595454229439
745  weights(148) = 0.192089082158
746  weights(149) = 0.964697494121
747  weights(150) = -0.123858732412
748  weights(151) = 0.241978602288
749  weights(152) = -0.525475732945
750  weights(153) = -0.376827020882
751  weights(154) = -3.07477548105
752  weights(155) = 0.674318407993
753  weights(156) = -1.4754686585
754  weights(157) = 3.23063591391
755  weights(158) = 7.25855590511
756  weights(159) = -1.12343326037
757  weights(160) = 0.474100249593
758  weights(161) = -1.58479603643
759  weights(162) = 2.33275637801
760  weights(163) = 1.19245411755
761  weights(164) = -0.963596944951
762  weights(165) = -0.393117700825
763  weights(166) = -0.765694615113
764  weights(167) = -2.02408679663
765  weights(168) = 3.36306831556
766  weights(169) = 4.17882413536
767  weights(170) = -5.03137081937
768  weights(171) = -8.73177336263
769  weights(172) = 3.59230528223
770  weights(173) = 3.17199780802
771  weights(174) = 19.6705604709
772  weights(175) = 1.84609124417
773  weights(176) = -8.66395479804
774  weights(177) = 4.35656158847
775  weights(178) = 0.220563826989
776  weights(179) = -0.0208381899523
777  weights(180) = -0.601353368326
778  weights(181) = 0.267425763933
779  weights(182) = -0.54287897271
780  weights(183) = 0.18580974935
781  weights(184) = -2.03167259563
782  weights(185) = 1.53793792374
783  weights(186) = -2.77176985303
784  weights(187) = -0.926592732803
785  weights(188) = -8.18246826535
786  weights(189) = -43.7649844166
787  weights(190) = 13.0791764852
788  weights(191) = -0.507716761424
789  weights(192) = 0.394498144483
790  weights(193) = -8.28860104493
791  weights(194) = -1.83420129397
792  weights(195) = -0.0826808309374
793  weights(196) = -3.62835269452
794  weights(197) = -4.79178171801
795  weights(198) = 0.731536970641
796  weights(199) = 0.303873579582
797  weights(200) = 4.5942263196
798  weights(201) = 1.73500133711
799  weights(202) = 4.49361982385
800  weights(203) = 7.41268094427
801  weights(204) = 8.33141953307
802  weights(205) = 36.0243992781
803  weights(206) = 18.1717923588
804  weights(207) = 0.879444048519
805  weights(208) = -0.273390298626
806  weights(209) = -0.729375003161
807  weights(210) = -0.0120198775563
808  weights(211) = -0.00489140362444
809  weights(212) = -3.44820713951
810  weights(213) = -2.77012802643
811  weights(214) = -0.548377658694
812  weights(215) = 1.09727392717
813  weights(216) = 2.68554287899
814  weights(217) = -0.319274619203
815  weights(218) = 17.6731901294
816  weights(219) = 10.0874812986
817  weights(220) = 2.69167529495
818  weights(221) = -0.858124991138
819  weights(222) = 12.8762708112
820  weights(223) = -4.39516778432
821  weights(224) = -3.26021928215
822  weights(225) = -27.7983898494
823  weights(226) = 2.66358465215
824  weights(227) = -0.902513181519
825  weights(228) = 12.318391194
826  weights(229) = 8.22864830504
827  weights(230) = 7.25969583306
828  weights(231) = 1.01098479496
829  weights(232) = 7.52375537258
830  weights(233) = -0.649168318822
831  weights(234) = 83.9167355881
832  weights(235) = 44.8367765132
833  weights(236) = -33.5187606871
834  weights(237) = -60.7871179987
835  weights(238) = -41.355153731
836  weights(239) = 78.3768515895
837  weights(240) = 1.05411648006
838  weights(241) = -1.6621215287
839  weights(242) = 0.787553819379
840  weights(243) = 1.97390700994
841  weights(244) = -2.70613088663
842  weights(245) = -5.16845028377
843  weights(246) = -2.23895003275
844  weights(247) = 2.92712023703
845  weights(248) = -1.03390338989
846  weights(249) = 2.48607789495
847  weights(250) = -3.2329771763
848  weights(251) = 1.53187679115
849  weights(252) = 1.93161783885
850  weights(253) = -10.8575127738
851  weights(254) = 2.6803341526
852  weights(255) = -4.14109066838
853  weights(256) = -1.2933394669
854 c
855  eni(1, 1) = 2.31023094266
856  eni(2, 1) = 2.43902441785
857  eni(3, 1) = 2.4390243387
858  eni(4, 1) = 2.47349826734
859  eni(5, 1) = 2.76679847216
860  eni(6, 1) = 2.95358645481
861  eni(7, 1) = 3.39805824849
862  eni(8, 1) = 0.592362543029
863  eni(9, 1) = 0.556387488181
864  eni(10, 1) = 0.350000023987
865  eni(11, 1) = 1.02157831172
866  eni(12, 1) = 0.389182288932
867  eni(13, 1) = 1.20973264173
868  eni(14, 1) = 0.8244994333
869  eni(15, 1) = 0.0461388339922
870  eni(1, 2) = -0.0625412471381
871  eni(2, 2) = 0.0304878066509
872  eni(3, 2) = 0.0890243906238
873  eni(4, 2) = 0.127738516552
874  eni(5, 2) = 0.144466402793
875  eni(6, 2) = 0.15
876  eni(7, 2) = 0.15
877  eni(8, 2) = 0.742355469702
878  eni(9, 2) = 0.330763486471
879  eni(10, 2) = 0.499999976013
880  eni(11, 2) = -0.167549784035
881  eni(12, 2) = 0.460855646998
882  eni(13, 2) = -0.359723723909
883  eni(14, 2) = 0.15
884  eni(15, 2) = 0.144898671197
885 c
886  deo(1, 1) = 7.56448250039
887  deo(1, 2) = -5.50873083952
888 c
889  CALL normcall( weights, conec, 256, units, 31,
890  & inno, 15, outno, 1, eni, deo, input, output )
891 c
892  END
893 c
894 c ------------------------------------------------------------------
895  SUBROUTINE dffnet_terra(input, deriv)
896 c ------------------------------------------------------------------
897 c
898 c Returns partial derivatives of the network's
899 c output vs its input at given input point
900 c (for one input sample or 2D array of input samples)
901 c in the following array:
902 c | o1/i1, o1/i2, ..., o1/in |
903 c | o2/i1, o2/i2, ..., o2/in |
904 c | ... |
905 c | om/i1, om/i2, ..., om/in |
906 c Arguments:
907 c input - 1-d array of length 15
908 c deriv - 2-d array of the shape (1, 15)
909 c ------------------------------------------------------------------
910  INTEGER conec(256, 2)
911  INTEGER dconecno(450)
912  INTEGER dconecmk(16)
913  INTEGER inno(15)
914  INTEGER outno(1)
915  DOUBLE PRECISION weights(256)
916  DOUBLE PRECISION eni(15, 2)
917  DOUBLE PRECISION ded(1, 15)
918  DOUBLE PRECISION units(31)
919  DOUBLE PRECISION input(15)
920  DOUBLE PRECISION deriv(1, 15)
921 c
922 cf2py intent(in) input
923 cf2py intent(out) deriv
924 c
925  conec(1, 1) = 0
926  conec(2, 1) = 1
927  conec(3, 1) = 2
928  conec(4, 1) = 3
929  conec(5, 1) = 4
930  conec(6, 1) = 5
931  conec(7, 1) = 6
932  conec(8, 1) = 7
933  conec(9, 1) = 8
934  conec(10, 1) = 9
935  conec(11, 1) = 10
936  conec(12, 1) = 11
937  conec(13, 1) = 12
938  conec(14, 1) = 13
939  conec(15, 1) = 14
940  conec(16, 1) = 15
941  conec(17, 1) = 0
942  conec(18, 1) = 1
943  conec(19, 1) = 2
944  conec(20, 1) = 3
945  conec(21, 1) = 4
946  conec(22, 1) = 5
947  conec(23, 1) = 6
948  conec(24, 1) = 7
949  conec(25, 1) = 8
950  conec(26, 1) = 9
951  conec(27, 1) = 10
952  conec(28, 1) = 11
953  conec(29, 1) = 12
954  conec(30, 1) = 13
955  conec(31, 1) = 14
956  conec(32, 1) = 15
957  conec(33, 1) = 0
958  conec(34, 1) = 1
959  conec(35, 1) = 2
960  conec(36, 1) = 3
961  conec(37, 1) = 4
962  conec(38, 1) = 5
963  conec(39, 1) = 6
964  conec(40, 1) = 7
965  conec(41, 1) = 8
966  conec(42, 1) = 9
967  conec(43, 1) = 10
968  conec(44, 1) = 11
969  conec(45, 1) = 12
970  conec(46, 1) = 13
971  conec(47, 1) = 14
972  conec(48, 1) = 15
973  conec(49, 1) = 0
974  conec(50, 1) = 1
975  conec(51, 1) = 2
976  conec(52, 1) = 3
977  conec(53, 1) = 4
978  conec(54, 1) = 5
979  conec(55, 1) = 6
980  conec(56, 1) = 7
981  conec(57, 1) = 8
982  conec(58, 1) = 9
983  conec(59, 1) = 10
984  conec(60, 1) = 11
985  conec(61, 1) = 12
986  conec(62, 1) = 13
987  conec(63, 1) = 14
988  conec(64, 1) = 15
989  conec(65, 1) = 0
990  conec(66, 1) = 1
991  conec(67, 1) = 2
992  conec(68, 1) = 3
993  conec(69, 1) = 4
994  conec(70, 1) = 5
995  conec(71, 1) = 6
996  conec(72, 1) = 7
997  conec(73, 1) = 8
998  conec(74, 1) = 9
999  conec(75, 1) = 10
1000  conec(76, 1) = 11
1001  conec(77, 1) = 12
1002  conec(78, 1) = 13
1003  conec(79, 1) = 14
1004  conec(80, 1) = 15
1005  conec(81, 1) = 0
1006  conec(82, 1) = 1
1007  conec(83, 1) = 2
1008  conec(84, 1) = 3
1009  conec(85, 1) = 4
1010  conec(86, 1) = 5
1011  conec(87, 1) = 6
1012  conec(88, 1) = 7
1013  conec(89, 1) = 8
1014  conec(90, 1) = 9
1015  conec(91, 1) = 10
1016  conec(92, 1) = 11
1017  conec(93, 1) = 12
1018  conec(94, 1) = 13
1019  conec(95, 1) = 14
1020  conec(96, 1) = 15
1021  conec(97, 1) = 0
1022  conec(98, 1) = 1
1023  conec(99, 1) = 2
1024  conec(100, 1) = 3
1025  conec(101, 1) = 4
1026  conec(102, 1) = 5
1027  conec(103, 1) = 6
1028  conec(104, 1) = 7
1029  conec(105, 1) = 8
1030  conec(106, 1) = 9
1031  conec(107, 1) = 10
1032  conec(108, 1) = 11
1033  conec(109, 1) = 12
1034  conec(110, 1) = 13
1035  conec(111, 1) = 14
1036  conec(112, 1) = 15
1037  conec(113, 1) = 0
1038  conec(114, 1) = 1
1039  conec(115, 1) = 2
1040  conec(116, 1) = 3
1041  conec(117, 1) = 4
1042  conec(118, 1) = 5
1043  conec(119, 1) = 6
1044  conec(120, 1) = 7
1045  conec(121, 1) = 8
1046  conec(122, 1) = 9
1047  conec(123, 1) = 10
1048  conec(124, 1) = 11
1049  conec(125, 1) = 12
1050  conec(126, 1) = 13
1051  conec(127, 1) = 14
1052  conec(128, 1) = 15
1053  conec(129, 1) = 0
1054  conec(130, 1) = 1
1055  conec(131, 1) = 2
1056  conec(132, 1) = 3
1057  conec(133, 1) = 4
1058  conec(134, 1) = 5
1059  conec(135, 1) = 6
1060  conec(136, 1) = 7
1061  conec(137, 1) = 8
1062  conec(138, 1) = 9
1063  conec(139, 1) = 10
1064  conec(140, 1) = 11
1065  conec(141, 1) = 12
1066  conec(142, 1) = 13
1067  conec(143, 1) = 14
1068  conec(144, 1) = 15
1069  conec(145, 1) = 0
1070  conec(146, 1) = 1
1071  conec(147, 1) = 2
1072  conec(148, 1) = 3
1073  conec(149, 1) = 4
1074  conec(150, 1) = 5
1075  conec(151, 1) = 6
1076  conec(152, 1) = 7
1077  conec(153, 1) = 8
1078  conec(154, 1) = 9
1079  conec(155, 1) = 10
1080  conec(156, 1) = 11
1081  conec(157, 1) = 12
1082  conec(158, 1) = 13
1083  conec(159, 1) = 14
1084  conec(160, 1) = 15
1085  conec(161, 1) = 0
1086  conec(162, 1) = 1
1087  conec(163, 1) = 2
1088  conec(164, 1) = 3
1089  conec(165, 1) = 4
1090  conec(166, 1) = 5
1091  conec(167, 1) = 6
1092  conec(168, 1) = 7
1093  conec(169, 1) = 8
1094  conec(170, 1) = 9
1095  conec(171, 1) = 10
1096  conec(172, 1) = 11
1097  conec(173, 1) = 12
1098  conec(174, 1) = 13
1099  conec(175, 1) = 14
1100  conec(176, 1) = 15
1101  conec(177, 1) = 0
1102  conec(178, 1) = 1
1103  conec(179, 1) = 2
1104  conec(180, 1) = 3
1105  conec(181, 1) = 4
1106  conec(182, 1) = 5
1107  conec(183, 1) = 6
1108  conec(184, 1) = 7
1109  conec(185, 1) = 8
1110  conec(186, 1) = 9
1111  conec(187, 1) = 10
1112  conec(188, 1) = 11
1113  conec(189, 1) = 12
1114  conec(190, 1) = 13
1115  conec(191, 1) = 14
1116  conec(192, 1) = 15
1117  conec(193, 1) = 0
1118  conec(194, 1) = 1
1119  conec(195, 1) = 2
1120  conec(196, 1) = 3
1121  conec(197, 1) = 4
1122  conec(198, 1) = 5
1123  conec(199, 1) = 6
1124  conec(200, 1) = 7
1125  conec(201, 1) = 8
1126  conec(202, 1) = 9
1127  conec(203, 1) = 10
1128  conec(204, 1) = 11
1129  conec(205, 1) = 12
1130  conec(206, 1) = 13
1131  conec(207, 1) = 14
1132  conec(208, 1) = 15
1133  conec(209, 1) = 0
1134  conec(210, 1) = 1
1135  conec(211, 1) = 2
1136  conec(212, 1) = 3
1137  conec(213, 1) = 4
1138  conec(214, 1) = 5
1139  conec(215, 1) = 6
1140  conec(216, 1) = 7
1141  conec(217, 1) = 8
1142  conec(218, 1) = 9
1143  conec(219, 1) = 10
1144  conec(220, 1) = 11
1145  conec(221, 1) = 12
1146  conec(222, 1) = 13
1147  conec(223, 1) = 14
1148  conec(224, 1) = 15
1149  conec(225, 1) = 0
1150  conec(226, 1) = 1
1151  conec(227, 1) = 2
1152  conec(228, 1) = 3
1153  conec(229, 1) = 4
1154  conec(230, 1) = 5
1155  conec(231, 1) = 6
1156  conec(232, 1) = 7
1157  conec(233, 1) = 8
1158  conec(234, 1) = 9
1159  conec(235, 1) = 10
1160  conec(236, 1) = 11
1161  conec(237, 1) = 12
1162  conec(238, 1) = 13
1163  conec(239, 1) = 14
1164  conec(240, 1) = 15
1165  conec(241, 1) = 0
1166  conec(242, 1) = 16
1167  conec(243, 1) = 17
1168  conec(244, 1) = 18
1169  conec(245, 1) = 19
1170  conec(246, 1) = 20
1171  conec(247, 1) = 21
1172  conec(248, 1) = 22
1173  conec(249, 1) = 23
1174  conec(250, 1) = 24
1175  conec(251, 1) = 25
1176  conec(252, 1) = 26
1177  conec(253, 1) = 27
1178  conec(254, 1) = 28
1179  conec(255, 1) = 29
1180  conec(256, 1) = 30
1181  conec(1, 2) = 16
1182  conec(2, 2) = 16
1183  conec(3, 2) = 16
1184  conec(4, 2) = 16
1185  conec(5, 2) = 16
1186  conec(6, 2) = 16
1187  conec(7, 2) = 16
1188  conec(8, 2) = 16
1189  conec(9, 2) = 16
1190  conec(10, 2) = 16
1191  conec(11, 2) = 16
1192  conec(12, 2) = 16
1193  conec(13, 2) = 16
1194  conec(14, 2) = 16
1195  conec(15, 2) = 16
1196  conec(16, 2) = 16
1197  conec(17, 2) = 17
1198  conec(18, 2) = 17
1199  conec(19, 2) = 17
1200  conec(20, 2) = 17
1201  conec(21, 2) = 17
1202  conec(22, 2) = 17
1203  conec(23, 2) = 17
1204  conec(24, 2) = 17
1205  conec(25, 2) = 17
1206  conec(26, 2) = 17
1207  conec(27, 2) = 17
1208  conec(28, 2) = 17
1209  conec(29, 2) = 17
1210  conec(30, 2) = 17
1211  conec(31, 2) = 17
1212  conec(32, 2) = 17
1213  conec(33, 2) = 18
1214  conec(34, 2) = 18
1215  conec(35, 2) = 18
1216  conec(36, 2) = 18
1217  conec(37, 2) = 18
1218  conec(38, 2) = 18
1219  conec(39, 2) = 18
1220  conec(40, 2) = 18
1221  conec(41, 2) = 18
1222  conec(42, 2) = 18
1223  conec(43, 2) = 18
1224  conec(44, 2) = 18
1225  conec(45, 2) = 18
1226  conec(46, 2) = 18
1227  conec(47, 2) = 18
1228  conec(48, 2) = 18
1229  conec(49, 2) = 19
1230  conec(50, 2) = 19
1231  conec(51, 2) = 19
1232  conec(52, 2) = 19
1233  conec(53, 2) = 19
1234  conec(54, 2) = 19
1235  conec(55, 2) = 19
1236  conec(56, 2) = 19
1237  conec(57, 2) = 19
1238  conec(58, 2) = 19
1239  conec(59, 2) = 19
1240  conec(60, 2) = 19
1241  conec(61, 2) = 19
1242  conec(62, 2) = 19
1243  conec(63, 2) = 19
1244  conec(64, 2) = 19
1245  conec(65, 2) = 20
1246  conec(66, 2) = 20
1247  conec(67, 2) = 20
1248  conec(68, 2) = 20
1249  conec(69, 2) = 20
1250  conec(70, 2) = 20
1251  conec(71, 2) = 20
1252  conec(72, 2) = 20
1253  conec(73, 2) = 20
1254  conec(74, 2) = 20
1255  conec(75, 2) = 20
1256  conec(76, 2) = 20
1257  conec(77, 2) = 20
1258  conec(78, 2) = 20
1259  conec(79, 2) = 20
1260  conec(80, 2) = 20
1261  conec(81, 2) = 21
1262  conec(82, 2) = 21
1263  conec(83, 2) = 21
1264  conec(84, 2) = 21
1265  conec(85, 2) = 21
1266  conec(86, 2) = 21
1267  conec(87, 2) = 21
1268  conec(88, 2) = 21
1269  conec(89, 2) = 21
1270  conec(90, 2) = 21
1271  conec(91, 2) = 21
1272  conec(92, 2) = 21
1273  conec(93, 2) = 21
1274  conec(94, 2) = 21
1275  conec(95, 2) = 21
1276  conec(96, 2) = 21
1277  conec(97, 2) = 22
1278  conec(98, 2) = 22
1279  conec(99, 2) = 22
1280  conec(100, 2) = 22
1281  conec(101, 2) = 22
1282  conec(102, 2) = 22
1283  conec(103, 2) = 22
1284  conec(104, 2) = 22
1285  conec(105, 2) = 22
1286  conec(106, 2) = 22
1287  conec(107, 2) = 22
1288  conec(108, 2) = 22
1289  conec(109, 2) = 22
1290  conec(110, 2) = 22
1291  conec(111, 2) = 22
1292  conec(112, 2) = 22
1293  conec(113, 2) = 23
1294  conec(114, 2) = 23
1295  conec(115, 2) = 23
1296  conec(116, 2) = 23
1297  conec(117, 2) = 23
1298  conec(118, 2) = 23
1299  conec(119, 2) = 23
1300  conec(120, 2) = 23
1301  conec(121, 2) = 23
1302  conec(122, 2) = 23
1303  conec(123, 2) = 23
1304  conec(124, 2) = 23
1305  conec(125, 2) = 23
1306  conec(126, 2) = 23
1307  conec(127, 2) = 23
1308  conec(128, 2) = 23
1309  conec(129, 2) = 24
1310  conec(130, 2) = 24
1311  conec(131, 2) = 24
1312  conec(132, 2) = 24
1313  conec(133, 2) = 24
1314  conec(134, 2) = 24
1315  conec(135, 2) = 24
1316  conec(136, 2) = 24
1317  conec(137, 2) = 24
1318  conec(138, 2) = 24
1319  conec(139, 2) = 24
1320  conec(140, 2) = 24
1321  conec(141, 2) = 24
1322  conec(142, 2) = 24
1323  conec(143, 2) = 24
1324  conec(144, 2) = 24
1325  conec(145, 2) = 25
1326  conec(146, 2) = 25
1327  conec(147, 2) = 25
1328  conec(148, 2) = 25
1329  conec(149, 2) = 25
1330  conec(150, 2) = 25
1331  conec(151, 2) = 25
1332  conec(152, 2) = 25
1333  conec(153, 2) = 25
1334  conec(154, 2) = 25
1335  conec(155, 2) = 25
1336  conec(156, 2) = 25
1337  conec(157, 2) = 25
1338  conec(158, 2) = 25
1339  conec(159, 2) = 25
1340  conec(160, 2) = 25
1341  conec(161, 2) = 26
1342  conec(162, 2) = 26
1343  conec(163, 2) = 26
1344  conec(164, 2) = 26
1345  conec(165, 2) = 26
1346  conec(166, 2) = 26
1347  conec(167, 2) = 26
1348  conec(168, 2) = 26
1349  conec(169, 2) = 26
1350  conec(170, 2) = 26
1351  conec(171, 2) = 26
1352  conec(172, 2) = 26
1353  conec(173, 2) = 26
1354  conec(174, 2) = 26
1355  conec(175, 2) = 26
1356  conec(176, 2) = 26
1357  conec(177, 2) = 27
1358  conec(178, 2) = 27
1359  conec(179, 2) = 27
1360  conec(180, 2) = 27
1361  conec(181, 2) = 27
1362  conec(182, 2) = 27
1363  conec(183, 2) = 27
1364  conec(184, 2) = 27
1365  conec(185, 2) = 27
1366  conec(186, 2) = 27
1367  conec(187, 2) = 27
1368  conec(188, 2) = 27
1369  conec(189, 2) = 27
1370  conec(190, 2) = 27
1371  conec(191, 2) = 27
1372  conec(192, 2) = 27
1373  conec(193, 2) = 28
1374  conec(194, 2) = 28
1375  conec(195, 2) = 28
1376  conec(196, 2) = 28
1377  conec(197, 2) = 28
1378  conec(198, 2) = 28
1379  conec(199, 2) = 28
1380  conec(200, 2) = 28
1381  conec(201, 2) = 28
1382  conec(202, 2) = 28
1383  conec(203, 2) = 28
1384  conec(204, 2) = 28
1385  conec(205, 2) = 28
1386  conec(206, 2) = 28
1387  conec(207, 2) = 28
1388  conec(208, 2) = 28
1389  conec(209, 2) = 29
1390  conec(210, 2) = 29
1391  conec(211, 2) = 29
1392  conec(212, 2) = 29
1393  conec(213, 2) = 29
1394  conec(214, 2) = 29
1395  conec(215, 2) = 29
1396  conec(216, 2) = 29
1397  conec(217, 2) = 29
1398  conec(218, 2) = 29
1399  conec(219, 2) = 29
1400  conec(220, 2) = 29
1401  conec(221, 2) = 29
1402  conec(222, 2) = 29
1403  conec(223, 2) = 29
1404  conec(224, 2) = 29
1405  conec(225, 2) = 30
1406  conec(226, 2) = 30
1407  conec(227, 2) = 30
1408  conec(228, 2) = 30
1409  conec(229, 2) = 30
1410  conec(230, 2) = 30
1411  conec(231, 2) = 30
1412  conec(232, 2) = 30
1413  conec(233, 2) = 30
1414  conec(234, 2) = 30
1415  conec(235, 2) = 30
1416  conec(236, 2) = 30
1417  conec(237, 2) = 30
1418  conec(238, 2) = 30
1419  conec(239, 2) = 30
1420  conec(240, 2) = 30
1421  conec(241, 2) = 31
1422  conec(242, 2) = 31
1423  conec(243, 2) = 31
1424  conec(244, 2) = 31
1425  conec(245, 2) = 31
1426  conec(246, 2) = 31
1427  conec(247, 2) = 31
1428  conec(248, 2) = 31
1429  conec(249, 2) = 31
1430  conec(250, 2) = 31
1431  conec(251, 2) = 31
1432  conec(252, 2) = 31
1433  conec(253, 2) = 31
1434  conec(254, 2) = 31
1435  conec(255, 2) = 31
1436  conec(256, 2) = 31
1437 c
1438  dconecno(1) = 16
1439  dconecno(2) = 32
1440  dconecno(3) = 48
1441  dconecno(4) = 64
1442  dconecno(5) = 80
1443  dconecno(6) = 96
1444  dconecno(7) = 112
1445  dconecno(8) = 128
1446  dconecno(9) = 144
1447  dconecno(10) = 160
1448  dconecno(11) = 176
1449  dconecno(12) = 192
1450  dconecno(13) = 208
1451  dconecno(14) = 224
1452  dconecno(15) = 240
1453  dconecno(16) = 242
1454  dconecno(17) = 243
1455  dconecno(18) = 244
1456  dconecno(19) = 245
1457  dconecno(20) = 246
1458  dconecno(21) = 247
1459  dconecno(22) = 248
1460  dconecno(23) = 249
1461  dconecno(24) = 250
1462  dconecno(25) = 251
1463  dconecno(26) = 252
1464  dconecno(27) = 253
1465  dconecno(28) = 254
1466  dconecno(29) = 255
1467  dconecno(30) = 256
1468  dconecno(31) = 15
1469  dconecno(32) = 31
1470  dconecno(33) = 47
1471  dconecno(34) = 63
1472  dconecno(35) = 79
1473  dconecno(36) = 95
1474  dconecno(37) = 111
1475  dconecno(38) = 127
1476  dconecno(39) = 143
1477  dconecno(40) = 159
1478  dconecno(41) = 175
1479  dconecno(42) = 191
1480  dconecno(43) = 207
1481  dconecno(44) = 223
1482  dconecno(45) = 239
1483  dconecno(46) = 242
1484  dconecno(47) = 243
1485  dconecno(48) = 244
1486  dconecno(49) = 245
1487  dconecno(50) = 246
1488  dconecno(51) = 247
1489  dconecno(52) = 248
1490  dconecno(53) = 249
1491  dconecno(54) = 250
1492  dconecno(55) = 251
1493  dconecno(56) = 252
1494  dconecno(57) = 253
1495  dconecno(58) = 254
1496  dconecno(59) = 255
1497  dconecno(60) = 256
1498  dconecno(61) = 14
1499  dconecno(62) = 30
1500  dconecno(63) = 46
1501  dconecno(64) = 62
1502  dconecno(65) = 78
1503  dconecno(66) = 94
1504  dconecno(67) = 110
1505  dconecno(68) = 126
1506  dconecno(69) = 142
1507  dconecno(70) = 158
1508  dconecno(71) = 174
1509  dconecno(72) = 190
1510  dconecno(73) = 206
1511  dconecno(74) = 222
1512  dconecno(75) = 238
1513  dconecno(76) = 242
1514  dconecno(77) = 243
1515  dconecno(78) = 244
1516  dconecno(79) = 245
1517  dconecno(80) = 246
1518  dconecno(81) = 247
1519  dconecno(82) = 248
1520  dconecno(83) = 249
1521  dconecno(84) = 250
1522  dconecno(85) = 251
1523  dconecno(86) = 252
1524  dconecno(87) = 253
1525  dconecno(88) = 254
1526  dconecno(89) = 255
1527  dconecno(90) = 256
1528  dconecno(91) = 13
1529  dconecno(92) = 29
1530  dconecno(93) = 45
1531  dconecno(94) = 61
1532  dconecno(95) = 77
1533  dconecno(96) = 93
1534  dconecno(97) = 109
1535  dconecno(98) = 125
1536  dconecno(99) = 141
1537  dconecno(100) = 157
1538  dconecno(101) = 173
1539  dconecno(102) = 189
1540  dconecno(103) = 205
1541  dconecno(104) = 221
1542  dconecno(105) = 237
1543  dconecno(106) = 242
1544  dconecno(107) = 243
1545  dconecno(108) = 244
1546  dconecno(109) = 245
1547  dconecno(110) = 246
1548  dconecno(111) = 247
1549  dconecno(112) = 248
1550  dconecno(113) = 249
1551  dconecno(114) = 250
1552  dconecno(115) = 251
1553  dconecno(116) = 252
1554  dconecno(117) = 253
1555  dconecno(118) = 254
1556  dconecno(119) = 255
1557  dconecno(120) = 256
1558  dconecno(121) = 12
1559  dconecno(122) = 28
1560  dconecno(123) = 44
1561  dconecno(124) = 60
1562  dconecno(125) = 76
1563  dconecno(126) = 92
1564  dconecno(127) = 108
1565  dconecno(128) = 124
1566  dconecno(129) = 140
1567  dconecno(130) = 156
1568  dconecno(131) = 172
1569  dconecno(132) = 188
1570  dconecno(133) = 204
1571  dconecno(134) = 220
1572  dconecno(135) = 236
1573  dconecno(136) = 242
1574  dconecno(137) = 243
1575  dconecno(138) = 244
1576  dconecno(139) = 245
1577  dconecno(140) = 246
1578  dconecno(141) = 247
1579  dconecno(142) = 248
1580  dconecno(143) = 249
1581  dconecno(144) = 250
1582  dconecno(145) = 251
1583  dconecno(146) = 252
1584  dconecno(147) = 253
1585  dconecno(148) = 254
1586  dconecno(149) = 255
1587  dconecno(150) = 256
1588  dconecno(151) = 11
1589  dconecno(152) = 27
1590  dconecno(153) = 43
1591  dconecno(154) = 59
1592  dconecno(155) = 75
1593  dconecno(156) = 91
1594  dconecno(157) = 107
1595  dconecno(158) = 123
1596  dconecno(159) = 139
1597  dconecno(160) = 155
1598  dconecno(161) = 171
1599  dconecno(162) = 187
1600  dconecno(163) = 203
1601  dconecno(164) = 219
1602  dconecno(165) = 235
1603  dconecno(166) = 242
1604  dconecno(167) = 243
1605  dconecno(168) = 244
1606  dconecno(169) = 245
1607  dconecno(170) = 246
1608  dconecno(171) = 247
1609  dconecno(172) = 248
1610  dconecno(173) = 249
1611  dconecno(174) = 250
1612  dconecno(175) = 251
1613  dconecno(176) = 252
1614  dconecno(177) = 253
1615  dconecno(178) = 254
1616  dconecno(179) = 255
1617  dconecno(180) = 256
1618  dconecno(181) = 10
1619  dconecno(182) = 26
1620  dconecno(183) = 42
1621  dconecno(184) = 58
1622  dconecno(185) = 74
1623  dconecno(186) = 90
1624  dconecno(187) = 106
1625  dconecno(188) = 122
1626  dconecno(189) = 138
1627  dconecno(190) = 154
1628  dconecno(191) = 170
1629  dconecno(192) = 186
1630  dconecno(193) = 202
1631  dconecno(194) = 218
1632  dconecno(195) = 234
1633  dconecno(196) = 242
1634  dconecno(197) = 243
1635  dconecno(198) = 244
1636  dconecno(199) = 245
1637  dconecno(200) = 246
1638  dconecno(201) = 247
1639  dconecno(202) = 248
1640  dconecno(203) = 249
1641  dconecno(204) = 250
1642  dconecno(205) = 251
1643  dconecno(206) = 252
1644  dconecno(207) = 253
1645  dconecno(208) = 254
1646  dconecno(209) = 255
1647  dconecno(210) = 256
1648  dconecno(211) = 9
1649  dconecno(212) = 25
1650  dconecno(213) = 41
1651  dconecno(214) = 57
1652  dconecno(215) = 73
1653  dconecno(216) = 89
1654  dconecno(217) = 105
1655  dconecno(218) = 121
1656  dconecno(219) = 137
1657  dconecno(220) = 153
1658  dconecno(221) = 169
1659  dconecno(222) = 185
1660  dconecno(223) = 201
1661  dconecno(224) = 217
1662  dconecno(225) = 233
1663  dconecno(226) = 242
1664  dconecno(227) = 243
1665  dconecno(228) = 244
1666  dconecno(229) = 245
1667  dconecno(230) = 246
1668  dconecno(231) = 247
1669  dconecno(232) = 248
1670  dconecno(233) = 249
1671  dconecno(234) = 250
1672  dconecno(235) = 251
1673  dconecno(236) = 252
1674  dconecno(237) = 253
1675  dconecno(238) = 254
1676  dconecno(239) = 255
1677  dconecno(240) = 256
1678  dconecno(241) = 8
1679  dconecno(242) = 24
1680  dconecno(243) = 40
1681  dconecno(244) = 56
1682  dconecno(245) = 72
1683  dconecno(246) = 88
1684  dconecno(247) = 104
1685  dconecno(248) = 120
1686  dconecno(249) = 136
1687  dconecno(250) = 152
1688  dconecno(251) = 168
1689  dconecno(252) = 184
1690  dconecno(253) = 200
1691  dconecno(254) = 216
1692  dconecno(255) = 232
1693  dconecno(256) = 242
1694  dconecno(257) = 243
1695  dconecno(258) = 244
1696  dconecno(259) = 245
1697  dconecno(260) = 246
1698  dconecno(261) = 247
1699  dconecno(262) = 248
1700  dconecno(263) = 249
1701  dconecno(264) = 250
1702  dconecno(265) = 251
1703  dconecno(266) = 252
1704  dconecno(267) = 253
1705  dconecno(268) = 254
1706  dconecno(269) = 255
1707  dconecno(270) = 256
1708  dconecno(271) = 7
1709  dconecno(272) = 23
1710  dconecno(273) = 39
1711  dconecno(274) = 55
1712  dconecno(275) = 71
1713  dconecno(276) = 87
1714  dconecno(277) = 103
1715  dconecno(278) = 119
1716  dconecno(279) = 135
1717  dconecno(280) = 151
1718  dconecno(281) = 167
1719  dconecno(282) = 183
1720  dconecno(283) = 199
1721  dconecno(284) = 215
1722  dconecno(285) = 231
1723  dconecno(286) = 242
1724  dconecno(287) = 243
1725  dconecno(288) = 244
1726  dconecno(289) = 245
1727  dconecno(290) = 246
1728  dconecno(291) = 247
1729  dconecno(292) = 248
1730  dconecno(293) = 249
1731  dconecno(294) = 250
1732  dconecno(295) = 251
1733  dconecno(296) = 252
1734  dconecno(297) = 253
1735  dconecno(298) = 254
1736  dconecno(299) = 255
1737  dconecno(300) = 256
1738  dconecno(301) = 6
1739  dconecno(302) = 22
1740  dconecno(303) = 38
1741  dconecno(304) = 54
1742  dconecno(305) = 70
1743  dconecno(306) = 86
1744  dconecno(307) = 102
1745  dconecno(308) = 118
1746  dconecno(309) = 134
1747  dconecno(310) = 150
1748  dconecno(311) = 166
1749  dconecno(312) = 182
1750  dconecno(313) = 198
1751  dconecno(314) = 214
1752  dconecno(315) = 230
1753  dconecno(316) = 242
1754  dconecno(317) = 243
1755  dconecno(318) = 244
1756  dconecno(319) = 245
1757  dconecno(320) = 246
1758  dconecno(321) = 247
1759  dconecno(322) = 248
1760  dconecno(323) = 249
1761  dconecno(324) = 250
1762  dconecno(325) = 251
1763  dconecno(326) = 252
1764  dconecno(327) = 253
1765  dconecno(328) = 254
1766  dconecno(329) = 255
1767  dconecno(330) = 256
1768  dconecno(331) = 5
1769  dconecno(332) = 21
1770  dconecno(333) = 37
1771  dconecno(334) = 53
1772  dconecno(335) = 69
1773  dconecno(336) = 85
1774  dconecno(337) = 101
1775  dconecno(338) = 117
1776  dconecno(339) = 133
1777  dconecno(340) = 149
1778  dconecno(341) = 165
1779  dconecno(342) = 181
1780  dconecno(343) = 197
1781  dconecno(344) = 213
1782  dconecno(345) = 229
1783  dconecno(346) = 242
1784  dconecno(347) = 243
1785  dconecno(348) = 244
1786  dconecno(349) = 245
1787  dconecno(350) = 246
1788  dconecno(351) = 247
1789  dconecno(352) = 248
1790  dconecno(353) = 249
1791  dconecno(354) = 250
1792  dconecno(355) = 251
1793  dconecno(356) = 252
1794  dconecno(357) = 253
1795  dconecno(358) = 254
1796  dconecno(359) = 255
1797  dconecno(360) = 256
1798  dconecno(361) = 4
1799  dconecno(362) = 20
1800  dconecno(363) = 36
1801  dconecno(364) = 52
1802  dconecno(365) = 68
1803  dconecno(366) = 84
1804  dconecno(367) = 100
1805  dconecno(368) = 116
1806  dconecno(369) = 132
1807  dconecno(370) = 148
1808  dconecno(371) = 164
1809  dconecno(372) = 180
1810  dconecno(373) = 196
1811  dconecno(374) = 212
1812  dconecno(375) = 228
1813  dconecno(376) = 242
1814  dconecno(377) = 243
1815  dconecno(378) = 244
1816  dconecno(379) = 245
1817  dconecno(380) = 246
1818  dconecno(381) = 247
1819  dconecno(382) = 248
1820  dconecno(383) = 249
1821  dconecno(384) = 250
1822  dconecno(385) = 251
1823  dconecno(386) = 252
1824  dconecno(387) = 253
1825  dconecno(388) = 254
1826  dconecno(389) = 255
1827  dconecno(390) = 256
1828  dconecno(391) = 3
1829  dconecno(392) = 19
1830  dconecno(393) = 35
1831  dconecno(394) = 51
1832  dconecno(395) = 67
1833  dconecno(396) = 83
1834  dconecno(397) = 99
1835  dconecno(398) = 115
1836  dconecno(399) = 131
1837  dconecno(400) = 147
1838  dconecno(401) = 163
1839  dconecno(402) = 179
1840  dconecno(403) = 195
1841  dconecno(404) = 211
1842  dconecno(405) = 227
1843  dconecno(406) = 242
1844  dconecno(407) = 243
1845  dconecno(408) = 244
1846  dconecno(409) = 245
1847  dconecno(410) = 246
1848  dconecno(411) = 247
1849  dconecno(412) = 248
1850  dconecno(413) = 249
1851  dconecno(414) = 250
1852  dconecno(415) = 251
1853  dconecno(416) = 252
1854  dconecno(417) = 253
1855  dconecno(418) = 254
1856  dconecno(419) = 255
1857  dconecno(420) = 256
1858  dconecno(421) = 2
1859  dconecno(422) = 18
1860  dconecno(423) = 34
1861  dconecno(424) = 50
1862  dconecno(425) = 66
1863  dconecno(426) = 82
1864  dconecno(427) = 98
1865  dconecno(428) = 114
1866  dconecno(429) = 130
1867  dconecno(430) = 146
1868  dconecno(431) = 162
1869  dconecno(432) = 178
1870  dconecno(433) = 194
1871  dconecno(434) = 210
1872  dconecno(435) = 226
1873  dconecno(436) = 242
1874  dconecno(437) = 243
1875  dconecno(438) = 244
1876  dconecno(439) = 245
1877  dconecno(440) = 246
1878  dconecno(441) = 247
1879  dconecno(442) = 248
1880  dconecno(443) = 249
1881  dconecno(444) = 250
1882  dconecno(445) = 251
1883  dconecno(446) = 252
1884  dconecno(447) = 253
1885  dconecno(448) = 254
1886  dconecno(449) = 255
1887  dconecno(450) = 256
1888 c
1889  dconecmk(1) = 0
1890  dconecmk(2) = 30
1891  dconecmk(3) = 60
1892  dconecmk(4) = 90
1893  dconecmk(5) = 120
1894  dconecmk(6) = 150
1895  dconecmk(7) = 180
1896  dconecmk(8) = 210
1897  dconecmk(9) = 240
1898  dconecmk(10) = 270
1899  dconecmk(11) = 300
1900  dconecmk(12) = 330
1901  dconecmk(13) = 360
1902  dconecmk(14) = 390
1903  dconecmk(15) = 420
1904  dconecmk(16) = 450
1905 c
1906  inno(1) = 15
1907  inno(2) = 14
1908  inno(3) = 13
1909  inno(4) = 12
1910  inno(5) = 11
1911  inno(6) = 10
1912  inno(7) = 9
1913  inno(8) = 8
1914  inno(9) = 7
1915  inno(10) = 6
1916  inno(11) = 5
1917  inno(12) = 4
1918  inno(13) = 3
1919  inno(14) = 2
1920  inno(15) = 1
1921 c
1922  outno(1) = 31
1923 c
1924  weights(1) = 0.0586755525877
1925  weights(2) = 2.66260287155
1926  weights(3) = -0.205684950416
1927  weights(4) = 0.63186794161
1928  weights(5) = -6.99934143687
1929  weights(6) = -2.98806842755
1930  weights(7) = 0.624556281931
1931  weights(8) = 2.49772139325
1932  weights(9) = 4.55290874193
1933  weights(10) = -4.40320680068
1934  weights(11) = 10.5045321111
1935  weights(12) = 2.09606444889
1936  weights(13) = -25.4880175048
1937  weights(14) = 20.6233282314
1938  weights(15) = 0.462597916382
1939  weights(16) = -0.73528502631
1940  weights(17) = -4.61753072897
1941  weights(18) = 2.07120425216
1942  weights(19) = -0.526758105629
1943  weights(20) = 0.059727991516
1944  weights(21) = -1.6522747859
1945  weights(22) = -1.09414991239
1946  weights(23) = 0.172266242542
1947  weights(24) = 7.30336419333
1948  weights(25) = 0.390545057207
1949  weights(26) = 11.4132555147
1950  weights(27) = 5.41796634086
1951  weights(28) = -66.8077044402
1952  weights(29) = 25.6048944158
1953  weights(30) = 36.6215471708
1954  weights(31) = 5.52492637708
1955  weights(32) = 0.679496851907
1956  weights(33) = -0.614707063917
1957  weights(34) = -0.303725826543
1958  weights(35) = -0.395131396707
1959  weights(36) = -0.643482565241
1960  weights(37) = -0.86468419265
1961  weights(38) = -1.29848966045
1962  weights(39) = 0.522595775213
1963  weights(40) = 0.615259708359
1964  weights(41) = 2.20780057426
1965  weights(42) = 3.57767752805
1966  weights(43) = -2.57119009629
1967  weights(44) = -1.6473302987
1968  weights(45) = -1.69349893031
1969  weights(46) = -2.08150948686
1970  weights(47) = 0.766998291334
1971  weights(48) = 2.87558206561
1972  weights(49) = 2.17072346769
1973  weights(50) = -0.0421020374552
1974  weights(51) = 0.385296802595
1975  weights(52) = -1.55684503986
1976  weights(53) = -0.63599166382
1977  weights(54) = -2.55858823629
1978  weights(55) = -2.1128633918
1979  weights(56) = -1.5221868504
1980  weights(57) = -2.0268712129
1981  weights(58) = 3.19597341044
1982  weights(59) = -7.83126166576
1983  weights(60) = 15.463092176
1984  weights(61) = -13.254758932
1985  weights(62) = 2.34393527011
1986  weights(63) = -0.444815563938
1987  weights(64) = -2.24664836367
1988  weights(65) = 0.0477671073407
1989  weights(66) = -2.76469643537
1990  weights(67) = 0.63029443311
1991  weights(68) = -3.52932188768
1992  weights(69) = -3.51542750926
1993  weights(70) = -3.56465827499
1994  weights(71) = -1.36625908062
1995  weights(72) = -0.356325731004
1996  weights(73) = -1.24408098581
1997  weights(74) = 10.7882528506
1998  weights(75) = 9.36618696103
1999  weights(76) = -2.455757206
2000  weights(77) = 8.79927223599
2001  weights(78) = 7.60258276331
2002  weights(79) = 14.9046690239
2003  weights(80) = 4.02976798902
2004  weights(81) = 2.7304734218
2005  weights(82) = -2.52976473961
2006  weights(83) = -0.982209700612
2007  weights(84) = -2.12486841038
2008  weights(85) = 2.52294357677
2009  weights(86) = -2.33692163846
2010  weights(87) = 1.28139514172
2011  weights(88) = 0.859823516615
2012  weights(89) = -4.80392221437
2013  weights(90) = -4.33214125953
2014  weights(91) = -12.3227038746
2015  weights(92) = 24.5079176659
2016  weights(93) = -7.81794683044
2017  weights(94) = -8.73121761546
2018  weights(95) = -5.13840500061
2019  weights(96) = 5.39677249345
2020  weights(97) = -2.10643268626
2021  weights(98) = -1.81493630727
2022  weights(99) = -0.66111800259
2023  weights(100) = 4.00637523569
2024  weights(101) = 6.49901511646
2025  weights(102) = -3.81726622753
2026  weights(103) = 0.253177193821
2027  weights(104) = 0.125976886355
2028  weights(105) = -2.23501982173
2029  weights(106) = -1.14742937244
2030  weights(107) = 0.79071640224
2031  weights(108) = -0.262228348409
2032  weights(109) = -2.65828800908
2033  weights(110) = -4.61273893478
2034  weights(111) = -7.28442493591
2035  weights(112) = 4.89574060816
2036  weights(113) = -4.38650755077
2037  weights(114) = -0.593681542897
2038  weights(115) = -0.463175335857
2039  weights(116) = 0.397001346368
2040  weights(117) = -0.484981801368
2041  weights(118) = 1.96259431862
2042  weights(119) = 1.28608799941
2043  weights(120) = -0.438161039004
2044  weights(121) = 3.65811560424
2045  weights(122) = 4.60080766078
2046  weights(123) = 10.3811854671
2047  weights(124) = -6.08870590892
2048  weights(125) = 23.1300435319
2049  weights(126) = -7.34652989784
2050  weights(127) = -20.2168335091
2051  weights(128) = 23.4210305861
2052  weights(129) = 0.800399745093
2053  weights(130) = 2.16648182963
2054  weights(131) = -0.423620897432
2055  weights(132) = 0.0307432811503
2056  weights(133) = 1.22234688992
2057  weights(134) = 0.555717874965
2058  weights(135) = 1.01918567073
2059  weights(136) = 4.54096185361
2060  weights(137) = -1.74077061689
2061  weights(138) = 5.52975004698
2062  weights(139) = -1.39477598877
2063  weights(140) = -2.15320397661
2064  weights(141) = -1.78576061847
2065  weights(142) = -29.7260649174
2066  weights(143) = -6.04541177381
2067  weights(144) = -1.62004675309
2068  weights(145) = -0.166208495004
2069  weights(146) = -1.90906397486
2070  weights(147) = -0.595454229439
2071  weights(148) = 0.192089082158
2072  weights(149) = 0.964697494121
2073  weights(150) = -0.123858732412
2074  weights(151) = 0.241978602288
2075  weights(152) = -0.525475732945
2076  weights(153) = -0.376827020882
2077  weights(154) = -3.07477548105
2078  weights(155) = 0.674318407993
2079  weights(156) = -1.4754686585
2080  weights(157) = 3.23063591391
2081  weights(158) = 7.25855590511
2082  weights(159) = -1.12343326037
2083  weights(160) = 0.474100249593
2084  weights(161) = -1.58479603643
2085  weights(162) = 2.33275637801
2086  weights(163) = 1.19245411755
2087  weights(164) = -0.963596944951
2088  weights(165) = -0.393117700825
2089  weights(166) = -0.765694615113
2090  weights(167) = -2.02408679663
2091  weights(168) = 3.36306831556
2092  weights(169) = 4.17882413536
2093  weights(170) = -5.03137081937
2094  weights(171) = -8.73177336263
2095  weights(172) = 3.59230528223
2096  weights(173) = 3.17199780802
2097  weights(174) = 19.6705604709
2098  weights(175) = 1.84609124417
2099  weights(176) = -8.66395479804
2100  weights(177) = 4.35656158847
2101  weights(178) = 0.220563826989
2102  weights(179) = -0.0208381899523
2103  weights(180) = -0.601353368326
2104  weights(181) = 0.267425763933
2105  weights(182) = -0.54287897271
2106  weights(183) = 0.18580974935
2107  weights(184) = -2.03167259563
2108  weights(185) = 1.53793792374
2109  weights(186) = -2.77176985303
2110  weights(187) = -0.926592732803
2111  weights(188) = -8.18246826535
2112  weights(189) = -43.7649844166
2113  weights(190) = 13.0791764852
2114  weights(191) = -0.507716761424
2115  weights(192) = 0.394498144483
2116  weights(193) = -8.28860104493
2117  weights(194) = -1.83420129397
2118  weights(195) = -0.0826808309374
2119  weights(196) = -3.62835269452
2120  weights(197) = -4.79178171801
2121  weights(198) = 0.731536970641
2122  weights(199) = 0.303873579582
2123  weights(200) = 4.5942263196
2124  weights(201) = 1.73500133711
2125  weights(202) = 4.49361982385
2126  weights(203) = 7.41268094427
2127  weights(204) = 8.33141953307
2128  weights(205) = 36.0243992781
2129  weights(206) = 18.1717923588
2130  weights(207) = 0.879444048519
2131  weights(208) = -0.273390298626
2132  weights(209) = -0.729375003161
2133  weights(210) = -0.0120198775563
2134  weights(211) = -0.00489140362444
2135  weights(212) = -3.44820713951
2136  weights(213) = -2.77012802643
2137  weights(214) = -0.548377658694
2138  weights(215) = 1.09727392717
2139  weights(216) = 2.68554287899
2140  weights(217) = -0.319274619203
2141  weights(218) = 17.6731901294
2142  weights(219) = 10.0874812986
2143  weights(220) = 2.69167529495
2144  weights(221) = -0.858124991138
2145  weights(222) = 12.8762708112
2146  weights(223) = -4.39516778432
2147  weights(224) = -3.26021928215
2148  weights(225) = -27.7983898494
2149  weights(226) = 2.66358465215
2150  weights(227) = -0.902513181519
2151  weights(228) = 12.318391194
2152  weights(229) = 8.22864830504
2153  weights(230) = 7.25969583306
2154  weights(231) = 1.01098479496
2155  weights(232) = 7.52375537258
2156  weights(233) = -0.649168318822
2157  weights(234) = 83.9167355881
2158  weights(235) = 44.8367765132
2159  weights(236) = -33.5187606871
2160  weights(237) = -60.7871179987
2161  weights(238) = -41.355153731
2162  weights(239) = 78.3768515895
2163  weights(240) = 1.05411648006
2164  weights(241) = -1.6621215287
2165  weights(242) = 0.787553819379
2166  weights(243) = 1.97390700994
2167  weights(244) = -2.70613088663
2168  weights(245) = -5.16845028377
2169  weights(246) = -2.23895003275
2170  weights(247) = 2.92712023703
2171  weights(248) = -1.03390338989
2172  weights(249) = 2.48607789495
2173  weights(250) = -3.2329771763
2174  weights(251) = 1.53187679115
2175  weights(252) = 1.93161783885
2176  weights(253) = -10.8575127738
2177  weights(254) = 2.6803341526
2178  weights(255) = -4.14109066838
2179  weights(256) = -1.2933394669
2180 c
2181  eni(1, 1) = 2.31023094266
2182  eni(2, 1) = 2.43902441785
2183  eni(3, 1) = 2.4390243387
2184  eni(4, 1) = 2.47349826734
2185  eni(5, 1) = 2.76679847216
2186  eni(6, 1) = 2.95358645481
2187  eni(7, 1) = 3.39805824849
2188  eni(8, 1) = 0.592362543029
2189  eni(9, 1) = 0.556387488181
2190  eni(10, 1) = 0.350000023987
2191  eni(11, 1) = 1.02157831172
2192  eni(12, 1) = 0.389182288932
2193  eni(13, 1) = 1.20973264173
2194  eni(14, 1) = 0.8244994333
2195  eni(15, 1) = 0.0461388339922
2196  eni(1, 2) = -0.0625412471381
2197  eni(2, 2) = 0.0304878066509
2198  eni(3, 2) = 0.0890243906238
2199  eni(4, 2) = 0.127738516552
2200  eni(5, 2) = 0.144466402793
2201  eni(6, 2) = 0.15
2202  eni(7, 2) = 0.15
2203  eni(8, 2) = 0.742355469702
2204  eni(9, 2) = 0.330763486471
2205  eni(10, 2) = 0.499999976013
2206  eni(11, 2) = -0.167549784035
2207  eni(12, 2) = 0.460855646998
2208  eni(13, 2) = -0.359723723909
2209  eni(14, 2) = 0.15
2210  eni(15, 2) = 0.144898671197
2211 c
2212  ded(1, 1) = 17.4757015376
2213  ded(1, 2) = 18.4499575269
2214  ded(1, 3) = 18.4499569282
2215  ded(1, 4) = 18.710734358
2216  ded(1, 5) = 20.9293986247
2217  ded(1, 6) = 22.3423530508
2218  ded(1, 7) = 25.704552156
2219  ded(1, 8) = 4.48091609063
2220  ded(1, 9) = 4.20878341778
2221  ded(1, 10) = 2.64756905658
2222  ded(1, 11) = 7.72771126178
2223  ded(1, 12) = 2.94396261409
2224  ded(1, 13) = 9.15100139855
2225  ded(1, 14) = 6.23691153478
2226  ded(1, 15) = 0.349016402323
2227 c
2228  CALL normdiff( weights, conec, 256, dconecno, 450,
2229  & dconecmk, units, 31, inno, 15, outno, 1,
2230  & eni, ded, input, deriv)
2231 c
2232  END
dffnet_terra
subroutine dffnet_terra(input, deriv)
Definition: nnr_001.modo_Tau.f:896
ffnet_terra
subroutine ffnet_terra(input, output)
Definition: nnr_001.modo_Tau.f:46
normcall
subroutine normcall(x, conec, n, units, u, inno, i, outno, o, eni, deo, input, output)
Definition: ffnet.f:339
normdiff
subroutine normdiff(x, conec, n, dconecno, dn, dconecmk, units, u, inno, i, outno, o, eni, ded, input, deriv)
Definition: ffnet.f:367


ABOUT

Our Team

Contact Us

DATA

Get Started

Find Data

Use Data

TOOLS

SeaBASS

SeaDAS

Giovanni Data Visualizer

Worldview Mapping Interface

Level 3 Time Series Plotter

Request a SeaHawk Image

Mission Quality Monitor

HELP

Level 1 & 2 Browser Help

Level 3 & 4 Browser Help

File Search Help

Search & Download Help

Earthdata Forum

Join Mailing List

How to Cite Data

CONNECT WITH US
COMPLIANCE

Web Privacy Policy

Data & Information Policy

Communications Policy

Accessibility Policy

Freedom of Information Act

USA.gov

Responsible NASA Official: Sean Bailey
Curator: OceanColor Webmaster