OB.DAAC Logo
NASA Logo
Ocean Color Science Software

ocssw V2022
nnr_001.modl_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.7.1, 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: 14
17 c hiddens: 14
18 c outputs: 1
19 c connections and biases: 225
20 c
21 c INPUT LIMITS
22 c 1 --> [ 0.053 0.29300001]
23 c 2 --> [ 0.072 0.36000001]
24 c 3 --> [ 0.03 0.259]
25 c 4 --> [ 0.108 0.55199999]
26 c 5 --> [ 0.12899999 0.51599997]
27 c 6 --> [ 0.061 0.36899999]
28 c 7 --> [ 0.02 0.23899999]
29 c 8 --> [-0.98474707 0.15608975]
30 c 9 --> [-0.99999986 1. ]
31 c 10 --> [ 0.3096809 0.99137638]
32 c 11 --> [-0.79978945 0.94229142]
33 c 12 --> [ 0.42182715 0.99999328]
34 c 13 --> [ 0. 0.84600002]
35 c 14 --> [ 0.02135042 0.24997899]
36 c
37 c OUTPUT LIMITS
38 c 1 --> [-4.43121688 1.35959096]
39 c
40 c NOTE: You need 'ffnet.f' file distributed with ffnet-0.7.1
41 c sources to get the below routines to work.
42 c
43 c ------------------------------------------------------------------
44  SUBROUTINE ffnet_terra_land(input, output)
45 c ------------------------------------------------------------------
46 c
47 c Calculates network answer to given input.
48 c
49 c :Parameters:
50 c inp : array
51 c 2D array of input patterns (or 1D for single pattern)
52 c
53 c :Returns:
54 c ans : array
55 c 1D or 2D array of calculated network outputs
56 c
57 c :Raises:
58 c TypeError
59 c If *inp* is invalid
60 c Arguments:
61 c input - 1-d array of length 14
62 c output - 1-d array of length 1
63 c ------------------------------------------------------------------
64  INTEGER conec(225, 2)
65  INTEGER inno(14)
66  INTEGER outno(1)
67  DOUBLE PRECISION weights(225)
68  DOUBLE PRECISION eni(14, 2)
69  DOUBLE PRECISION deo(1, 2)
70  DOUBLE PRECISION units(29)
71  DOUBLE PRECISION input(14)
72  DOUBLE PRECISION output(1)
73 c
74 cf2py intent(in) input
75 cf2py intent(out) output
76 c
77  conec(1, 1) = 0
78  conec(2, 1) = 1
79  conec(3, 1) = 2
80  conec(4, 1) = 3
81  conec(5, 1) = 4
82  conec(6, 1) = 5
83  conec(7, 1) = 6
84  conec(8, 1) = 7
85  conec(9, 1) = 8
86  conec(10, 1) = 9
87  conec(11, 1) = 10
88  conec(12, 1) = 11
89  conec(13, 1) = 12
90  conec(14, 1) = 13
91  conec(15, 1) = 14
92  conec(16, 1) = 0
93  conec(17, 1) = 1
94  conec(18, 1) = 2
95  conec(19, 1) = 3
96  conec(20, 1) = 4
97  conec(21, 1) = 5
98  conec(22, 1) = 6
99  conec(23, 1) = 7
100  conec(24, 1) = 8
101  conec(25, 1) = 9
102  conec(26, 1) = 10
103  conec(27, 1) = 11
104  conec(28, 1) = 12
105  conec(29, 1) = 13
106  conec(30, 1) = 14
107  conec(31, 1) = 0
108  conec(32, 1) = 1
109  conec(33, 1) = 2
110  conec(34, 1) = 3
111  conec(35, 1) = 4
112  conec(36, 1) = 5
113  conec(37, 1) = 6
114  conec(38, 1) = 7
115  conec(39, 1) = 8
116  conec(40, 1) = 9
117  conec(41, 1) = 10
118  conec(42, 1) = 11
119  conec(43, 1) = 12
120  conec(44, 1) = 13
121  conec(45, 1) = 14
122  conec(46, 1) = 0
123  conec(47, 1) = 1
124  conec(48, 1) = 2
125  conec(49, 1) = 3
126  conec(50, 1) = 4
127  conec(51, 1) = 5
128  conec(52, 1) = 6
129  conec(53, 1) = 7
130  conec(54, 1) = 8
131  conec(55, 1) = 9
132  conec(56, 1) = 10
133  conec(57, 1) = 11
134  conec(58, 1) = 12
135  conec(59, 1) = 13
136  conec(60, 1) = 14
137  conec(61, 1) = 0
138  conec(62, 1) = 1
139  conec(63, 1) = 2
140  conec(64, 1) = 3
141  conec(65, 1) = 4
142  conec(66, 1) = 5
143  conec(67, 1) = 6
144  conec(68, 1) = 7
145  conec(69, 1) = 8
146  conec(70, 1) = 9
147  conec(71, 1) = 10
148  conec(72, 1) = 11
149  conec(73, 1) = 12
150  conec(74, 1) = 13
151  conec(75, 1) = 14
152  conec(76, 1) = 0
153  conec(77, 1) = 1
154  conec(78, 1) = 2
155  conec(79, 1) = 3
156  conec(80, 1) = 4
157  conec(81, 1) = 5
158  conec(82, 1) = 6
159  conec(83, 1) = 7
160  conec(84, 1) = 8
161  conec(85, 1) = 9
162  conec(86, 1) = 10
163  conec(87, 1) = 11
164  conec(88, 1) = 12
165  conec(89, 1) = 13
166  conec(90, 1) = 14
167  conec(91, 1) = 0
168  conec(92, 1) = 1
169  conec(93, 1) = 2
170  conec(94, 1) = 3
171  conec(95, 1) = 4
172  conec(96, 1) = 5
173  conec(97, 1) = 6
174  conec(98, 1) = 7
175  conec(99, 1) = 8
176  conec(100, 1) = 9
177  conec(101, 1) = 10
178  conec(102, 1) = 11
179  conec(103, 1) = 12
180  conec(104, 1) = 13
181  conec(105, 1) = 14
182  conec(106, 1) = 0
183  conec(107, 1) = 1
184  conec(108, 1) = 2
185  conec(109, 1) = 3
186  conec(110, 1) = 4
187  conec(111, 1) = 5
188  conec(112, 1) = 6
189  conec(113, 1) = 7
190  conec(114, 1) = 8
191  conec(115, 1) = 9
192  conec(116, 1) = 10
193  conec(117, 1) = 11
194  conec(118, 1) = 12
195  conec(119, 1) = 13
196  conec(120, 1) = 14
197  conec(121, 1) = 0
198  conec(122, 1) = 1
199  conec(123, 1) = 2
200  conec(124, 1) = 3
201  conec(125, 1) = 4
202  conec(126, 1) = 5
203  conec(127, 1) = 6
204  conec(128, 1) = 7
205  conec(129, 1) = 8
206  conec(130, 1) = 9
207  conec(131, 1) = 10
208  conec(132, 1) = 11
209  conec(133, 1) = 12
210  conec(134, 1) = 13
211  conec(135, 1) = 14
212  conec(136, 1) = 0
213  conec(137, 1) = 1
214  conec(138, 1) = 2
215  conec(139, 1) = 3
216  conec(140, 1) = 4
217  conec(141, 1) = 5
218  conec(142, 1) = 6
219  conec(143, 1) = 7
220  conec(144, 1) = 8
221  conec(145, 1) = 9
222  conec(146, 1) = 10
223  conec(147, 1) = 11
224  conec(148, 1) = 12
225  conec(149, 1) = 13
226  conec(150, 1) = 14
227  conec(151, 1) = 0
228  conec(152, 1) = 1
229  conec(153, 1) = 2
230  conec(154, 1) = 3
231  conec(155, 1) = 4
232  conec(156, 1) = 5
233  conec(157, 1) = 6
234  conec(158, 1) = 7
235  conec(159, 1) = 8
236  conec(160, 1) = 9
237  conec(161, 1) = 10
238  conec(162, 1) = 11
239  conec(163, 1) = 12
240  conec(164, 1) = 13
241  conec(165, 1) = 14
242  conec(166, 1) = 0
243  conec(167, 1) = 1
244  conec(168, 1) = 2
245  conec(169, 1) = 3
246  conec(170, 1) = 4
247  conec(171, 1) = 5
248  conec(172, 1) = 6
249  conec(173, 1) = 7
250  conec(174, 1) = 8
251  conec(175, 1) = 9
252  conec(176, 1) = 10
253  conec(177, 1) = 11
254  conec(178, 1) = 12
255  conec(179, 1) = 13
256  conec(180, 1) = 14
257  conec(181, 1) = 0
258  conec(182, 1) = 1
259  conec(183, 1) = 2
260  conec(184, 1) = 3
261  conec(185, 1) = 4
262  conec(186, 1) = 5
263  conec(187, 1) = 6
264  conec(188, 1) = 7
265  conec(189, 1) = 8
266  conec(190, 1) = 9
267  conec(191, 1) = 10
268  conec(192, 1) = 11
269  conec(193, 1) = 12
270  conec(194, 1) = 13
271  conec(195, 1) = 14
272  conec(196, 1) = 0
273  conec(197, 1) = 1
274  conec(198, 1) = 2
275  conec(199, 1) = 3
276  conec(200, 1) = 4
277  conec(201, 1) = 5
278  conec(202, 1) = 6
279  conec(203, 1) = 7
280  conec(204, 1) = 8
281  conec(205, 1) = 9
282  conec(206, 1) = 10
283  conec(207, 1) = 11
284  conec(208, 1) = 12
285  conec(209, 1) = 13
286  conec(210, 1) = 14
287  conec(211, 1) = 0
288  conec(212, 1) = 15
289  conec(213, 1) = 16
290  conec(214, 1) = 17
291  conec(215, 1) = 18
292  conec(216, 1) = 19
293  conec(217, 1) = 20
294  conec(218, 1) = 21
295  conec(219, 1) = 22
296  conec(220, 1) = 23
297  conec(221, 1) = 24
298  conec(222, 1) = 25
299  conec(223, 1) = 26
300  conec(224, 1) = 27
301  conec(225, 1) = 28
302  conec(1, 2) = 15
303  conec(2, 2) = 15
304  conec(3, 2) = 15
305  conec(4, 2) = 15
306  conec(5, 2) = 15
307  conec(6, 2) = 15
308  conec(7, 2) = 15
309  conec(8, 2) = 15
310  conec(9, 2) = 15
311  conec(10, 2) = 15
312  conec(11, 2) = 15
313  conec(12, 2) = 15
314  conec(13, 2) = 15
315  conec(14, 2) = 15
316  conec(15, 2) = 15
317  conec(16, 2) = 16
318  conec(17, 2) = 16
319  conec(18, 2) = 16
320  conec(19, 2) = 16
321  conec(20, 2) = 16
322  conec(21, 2) = 16
323  conec(22, 2) = 16
324  conec(23, 2) = 16
325  conec(24, 2) = 16
326  conec(25, 2) = 16
327  conec(26, 2) = 16
328  conec(27, 2) = 16
329  conec(28, 2) = 16
330  conec(29, 2) = 16
331  conec(30, 2) = 16
332  conec(31, 2) = 17
333  conec(32, 2) = 17
334  conec(33, 2) = 17
335  conec(34, 2) = 17
336  conec(35, 2) = 17
337  conec(36, 2) = 17
338  conec(37, 2) = 17
339  conec(38, 2) = 17
340  conec(39, 2) = 17
341  conec(40, 2) = 17
342  conec(41, 2) = 17
343  conec(42, 2) = 17
344  conec(43, 2) = 17
345  conec(44, 2) = 17
346  conec(45, 2) = 17
347  conec(46, 2) = 18
348  conec(47, 2) = 18
349  conec(48, 2) = 18
350  conec(49, 2) = 18
351  conec(50, 2) = 18
352  conec(51, 2) = 18
353  conec(52, 2) = 18
354  conec(53, 2) = 18
355  conec(54, 2) = 18
356  conec(55, 2) = 18
357  conec(56, 2) = 18
358  conec(57, 2) = 18
359  conec(58, 2) = 18
360  conec(59, 2) = 18
361  conec(60, 2) = 18
362  conec(61, 2) = 19
363  conec(62, 2) = 19
364  conec(63, 2) = 19
365  conec(64, 2) = 19
366  conec(65, 2) = 19
367  conec(66, 2) = 19
368  conec(67, 2) = 19
369  conec(68, 2) = 19
370  conec(69, 2) = 19
371  conec(70, 2) = 19
372  conec(71, 2) = 19
373  conec(72, 2) = 19
374  conec(73, 2) = 19
375  conec(74, 2) = 19
376  conec(75, 2) = 19
377  conec(76, 2) = 20
378  conec(77, 2) = 20
379  conec(78, 2) = 20
380  conec(79, 2) = 20
381  conec(80, 2) = 20
382  conec(81, 2) = 20
383  conec(82, 2) = 20
384  conec(83, 2) = 20
385  conec(84, 2) = 20
386  conec(85, 2) = 20
387  conec(86, 2) = 20
388  conec(87, 2) = 20
389  conec(88, 2) = 20
390  conec(89, 2) = 20
391  conec(90, 2) = 20
392  conec(91, 2) = 21
393  conec(92, 2) = 21
394  conec(93, 2) = 21
395  conec(94, 2) = 21
396  conec(95, 2) = 21
397  conec(96, 2) = 21
398  conec(97, 2) = 21
399  conec(98, 2) = 21
400  conec(99, 2) = 21
401  conec(100, 2) = 21
402  conec(101, 2) = 21
403  conec(102, 2) = 21
404  conec(103, 2) = 21
405  conec(104, 2) = 21
406  conec(105, 2) = 21
407  conec(106, 2) = 22
408  conec(107, 2) = 22
409  conec(108, 2) = 22
410  conec(109, 2) = 22
411  conec(110, 2) = 22
412  conec(111, 2) = 22
413  conec(112, 2) = 22
414  conec(113, 2) = 22
415  conec(114, 2) = 22
416  conec(115, 2) = 22
417  conec(116, 2) = 22
418  conec(117, 2) = 22
419  conec(118, 2) = 22
420  conec(119, 2) = 22
421  conec(120, 2) = 22
422  conec(121, 2) = 23
423  conec(122, 2) = 23
424  conec(123, 2) = 23
425  conec(124, 2) = 23
426  conec(125, 2) = 23
427  conec(126, 2) = 23
428  conec(127, 2) = 23
429  conec(128, 2) = 23
430  conec(129, 2) = 23
431  conec(130, 2) = 23
432  conec(131, 2) = 23
433  conec(132, 2) = 23
434  conec(133, 2) = 23
435  conec(134, 2) = 23
436  conec(135, 2) = 23
437  conec(136, 2) = 24
438  conec(137, 2) = 24
439  conec(138, 2) = 24
440  conec(139, 2) = 24
441  conec(140, 2) = 24
442  conec(141, 2) = 24
443  conec(142, 2) = 24
444  conec(143, 2) = 24
445  conec(144, 2) = 24
446  conec(145, 2) = 24
447  conec(146, 2) = 24
448  conec(147, 2) = 24
449  conec(148, 2) = 24
450  conec(149, 2) = 24
451  conec(150, 2) = 24
452  conec(151, 2) = 25
453  conec(152, 2) = 25
454  conec(153, 2) = 25
455  conec(154, 2) = 25
456  conec(155, 2) = 25
457  conec(156, 2) = 25
458  conec(157, 2) = 25
459  conec(158, 2) = 25
460  conec(159, 2) = 25
461  conec(160, 2) = 25
462  conec(161, 2) = 25
463  conec(162, 2) = 25
464  conec(163, 2) = 25
465  conec(164, 2) = 25
466  conec(165, 2) = 25
467  conec(166, 2) = 26
468  conec(167, 2) = 26
469  conec(168, 2) = 26
470  conec(169, 2) = 26
471  conec(170, 2) = 26
472  conec(171, 2) = 26
473  conec(172, 2) = 26
474  conec(173, 2) = 26
475  conec(174, 2) = 26
476  conec(175, 2) = 26
477  conec(176, 2) = 26
478  conec(177, 2) = 26
479  conec(178, 2) = 26
480  conec(179, 2) = 26
481  conec(180, 2) = 26
482  conec(181, 2) = 27
483  conec(182, 2) = 27
484  conec(183, 2) = 27
485  conec(184, 2) = 27
486  conec(185, 2) = 27
487  conec(186, 2) = 27
488  conec(187, 2) = 27
489  conec(188, 2) = 27
490  conec(189, 2) = 27
491  conec(190, 2) = 27
492  conec(191, 2) = 27
493  conec(192, 2) = 27
494  conec(193, 2) = 27
495  conec(194, 2) = 27
496  conec(195, 2) = 27
497  conec(196, 2) = 28
498  conec(197, 2) = 28
499  conec(198, 2) = 28
500  conec(199, 2) = 28
501  conec(200, 2) = 28
502  conec(201, 2) = 28
503  conec(202, 2) = 28
504  conec(203, 2) = 28
505  conec(204, 2) = 28
506  conec(205, 2) = 28
507  conec(206, 2) = 28
508  conec(207, 2) = 28
509  conec(208, 2) = 28
510  conec(209, 2) = 28
511  conec(210, 2) = 28
512  conec(211, 2) = 29
513  conec(212, 2) = 29
514  conec(213, 2) = 29
515  conec(214, 2) = 29
516  conec(215, 2) = 29
517  conec(216, 2) = 29
518  conec(217, 2) = 29
519  conec(218, 2) = 29
520  conec(219, 2) = 29
521  conec(220, 2) = 29
522  conec(221, 2) = 29
523  conec(222, 2) = 29
524  conec(223, 2) = 29
525  conec(224, 2) = 29
526  conec(225, 2) = 29
527 c
528  inno(1) = 14
529  inno(2) = 13
530  inno(3) = 12
531  inno(4) = 11
532  inno(5) = 10
533  inno(6) = 9
534  inno(7) = 8
535  inno(8) = 7
536  inno(9) = 6
537  inno(10) = 5
538  inno(11) = 4
539  inno(12) = 3
540  inno(13) = 2
541  inno(14) = 1
542 c
543  outno(1) = 29
544 c
545  weights(1) = -4.672340501047164d+00
546  weights(2) = +7.891227998178276d+00
547  weights(3) = +6.828716728584217d-02
548  weights(4) = +1.189415979538880d+00
549  weights(5) = -1.935816351292460d+00
550  weights(6) = -1.782622523599635d+00
551  weights(7) = -1.170032866607869d+00
552  weights(8) = +5.195004250466444d-01
553  weights(9) = +5.540655859698830d+00
554  weights(10) = +1.761869925146665d+00
555  weights(11) = -2.154096775807649d+00
556  weights(12) = +2.536780525976746d+00
557  weights(13) = -8.412312975891505d+00
558  weights(14) = +4.903395333778126d-01
559  weights(15) = -4.221916211549833d+00
560  weights(16) = +1.941604455620145d+00
561  weights(17) = +3.521482544938932d+00
562  weights(18) = +3.192631792849587d-01
563  weights(19) = +1.862167129923263d+00
564  weights(20) = -1.216714601069177d+00
565  weights(21) = +1.056711173458381d+00
566  weights(22) = +1.600865955608238d-01
567  weights(23) = -2.978227904905953d+00
568  weights(24) = +2.054354545504522d+00
569  weights(25) = -4.944665262297513d+00
570  weights(26) = -1.119592749083573d+00
571  weights(27) = -8.442075679779549d-01
572  weights(28) = -5.509093206153558d+00
573  weights(29) = -1.608745990965013d+01
574  weights(30) = +2.568278638371489d+01
575  weights(31) = +1.748181231958932d+00
576  weights(32) = -3.055845549871521d+00
577  weights(33) = +8.462676335087013d-02
578  weights(34) = -1.967376316247190d+00
579  weights(35) = -3.253686684985101d+00
580  weights(36) = +2.254334041115881d+00
581  weights(37) = +3.713262600022085d+00
582  weights(38) = -1.290839219548142d+00
583  weights(39) = -7.762818714206452d+00
584  weights(40) = +6.057885299196427d+00
585  weights(41) = +6.970017593855654d+00
586  weights(42) = -1.928384455782371d+00
587  weights(43) = -2.623008862213284d+00
588  weights(44) = -3.423857357318270d+00
589  weights(45) = -2.715188248698767d+00
590  weights(46) = -7.895349972915973d-03
591  weights(47) = +1.712393243972534d-01
592  weights(48) = -2.826254526327470d-01
593  weights(49) = +1.142549668209398d+00
594  weights(50) = -2.935737798265939d+00
595  weights(51) = +5.121401878354813d-01
596  weights(52) = +2.168355845135229d+00
597  weights(53) = -3.609331729627605d-01
598  weights(54) = +2.998854756137813d-01
599  weights(55) = -2.383563614937339d+00
600  weights(56) = +1.462897512238986d-01
601  weights(57) = +2.089754855079622d-01
602  weights(58) = +3.450302690329455d+00
603  weights(59) = -1.097857048648125d+00
604  weights(60) = +1.611144295558367d+00
605  weights(61) = +5.807914076195990d+00
606  weights(62) = -1.021252913320867d+00
607  weights(63) = -4.078981406104047d-01
608  weights(64) = -4.876597395669587d+00
609  weights(65) = -1.524021164216649d+00
610  weights(66) = -6.072909815374120d+00
611  weights(67) = -3.206050811885087d-01
612  weights(68) = -4.331480631676114d+00
613  weights(69) = -6.133566192787063d-02
614  weights(70) = -3.166228794787204d-02
615  weights(71) = +5.012189798639211d-01
616  weights(72) = -1.898388587479276d-01
617  weights(73) = +4.368373616925594d-01
618  weights(74) = -8.415195050810306d+00
619  weights(75) = +3.195290558171127d+00
620  weights(76) = +2.023096501970321d+00
621  weights(77) = -1.629521236772971d+00
622  weights(78) = +1.728247071019928d-01
623  weights(79) = -4.864463555771259d-01
624  weights(80) = -5.706919026901940d-01
625  weights(81) = -3.373279448190667d+00
626  weights(82) = +2.703094375994016d-01
627  weights(83) = -8.904623685190084d-01
628  weights(84) = -1.326818041946425d+00
629  weights(85) = +9.758180066258852d-01
630  weights(86) = +6.361485374645539d+00
631  weights(87) = -4.050121070273209d+00
632  weights(88) = +2.997410066642586d+00
633  weights(89) = +2.480850103529698d+00
634  weights(90) = -1.469031989107684d+01
635  weights(91) = +3.917350402690835d+01
636  weights(92) = +8.905873849839104d+00
637  weights(93) = +2.521257539700122d+00
638  weights(94) = -1.524801280081118d+01
639  weights(95) = -2.027504147962211d+00
640  weights(96) = -1.798593597657272d+01
641  weights(97) = +3.247434081114802d-01
642  weights(98) = -2.041367821438264d+01
643  weights(99) = +4.462892053205666d-01
644  weights(100) = -2.025031251995319d+01
645  weights(101) = -7.449319371901797d+00
646  weights(102) = +1.276268374372202d+01
647  weights(103) = +4.627341983421574d+01
648  weights(104) = -4.561382263496962d+01
649  weights(105) = -3.859191611675780d+01
650  weights(106) = -9.426938554428451d-04
651  weights(107) = +7.340651752071747d+00
652  weights(108) = +3.543777119968973d-01
653  weights(109) = -8.323170871369029d-01
654  weights(110) = +1.648373218860842d+00
655  weights(111) = -3.792651295318257d-01
656  weights(112) = +2.144746410461043d+00
657  weights(113) = -2.964913497666160d+00
658  weights(114) = +2.005940429082662d+01
659  weights(115) = -2.454589627614395d+01
660  weights(116) = -1.121147422736664d+00
661  weights(117) = +1.911904431068947d+00
662  weights(118) = -4.647334911089095d+00
663  weights(119) = -1.239100305915864d+01
664  weights(120) = +2.281447787192716d+01
665  weights(121) = -4.272212676459301d+00
666  weights(122) = -5.436045077060062d+00
667  weights(123) = -5.664032844232896d-01
668  weights(124) = -2.141760008794948d+00
669  weights(125) = +3.596649638871817d+00
670  weights(126) = -3.305872574164838d-01
671  weights(127) = +1.163767956586362d+00
672  weights(128) = +3.217854907153653d+00
673  weights(129) = -8.318965312267746d+00
674  weights(130) = +1.792455596706294d+00
675  weights(131) = -3.454151199600601d+00
676  weights(132) = -1.128735167134332d+00
677  weights(133) = +7.286473326550855d+00
678  weights(134) = +1.473450955478852d+01
679  weights(135) = +7.424329015213161d+00
680  weights(136) = +1.673114929375708d+00
681  weights(137) = -5.163200607258472d+00
682  weights(138) = -1.171413307162666d-01
683  weights(139) = -2.074468445637502d+00
684  weights(140) = +1.189502026115086d+00
685  weights(141) = -2.262103104174714d+00
686  weights(142) = -2.343171190939198d+00
687  weights(143) = -4.292510316803460d+00
688  weights(144) = -6.218779724774190d+00
689  weights(145) = +1.991858437242585d+01
690  weights(146) = -2.416918372644096d+01
691  weights(147) = +1.268652081479570d+01
692  weights(148) = +9.316123224553079d+00
693  weights(149) = -2.285327090096606d+01
694  weights(150) = +4.302883357348859d+00
695  weights(151) = +1.273616145216998d+00
696  weights(152) = -7.220860403064899d-01
697  weights(153) = +9.220521378392244d+00
698  weights(154) = +1.511233649915168d+00
699  weights(155) = +2.300771239626091d+00
700  weights(156) = +1.991993174505360d+00
701  weights(157) = +7.691889051785397d+00
702  weights(158) = +1.786832594070927d-01
703  weights(159) = -3.408355378938070d+00
704  weights(160) = +3.130679773301201d-01
705  weights(161) = +4.026339929045448d-01
706  weights(162) = +1.739213521520609d+00
707  weights(163) = +3.159618192749209d+00
708  weights(164) = +6.484829449539340d+00
709  weights(165) = +3.314583846853564d+00
710  weights(166) = +1.172476757591995d+01
711  weights(167) = +3.155720869741297d+00
712  weights(168) = +3.861703970618145d-01
713  weights(169) = -2.897997211186439d+00
714  weights(170) = -2.658862109783064d+00
715  weights(171) = -3.565998890206014d+00
716  weights(172) = -6.726467974928511d-01
717  weights(173) = -6.300119829255861d+00
718  weights(174) = +3.367448179920993d+00
719  weights(175) = -1.656930331200921d+00
720  weights(176) = -3.062669552261635d+00
721  weights(177) = +2.684407245132188d+00
722  weights(178) = +1.625087717488581d+00
723  weights(179) = -2.350747357053270d+01
724  weights(180) = -6.162022756957549d-02
725  weights(181) = +4.949518017932586d+00
726  weights(182) = -1.230937915044244d+01
727  weights(183) = -3.119377247214172d-01
728  weights(184) = +1.696330066771451d+00
729  weights(185) = +3.797076933907853d+00
730  weights(186) = +9.723754355860857d+00
731  weights(187) = -1.482046079104288d+01
732  weights(188) = +1.717746230325528d+00
733  weights(189) = -5.323674658169240d+00
734  weights(190) = +9.558772420194964d+00
735  weights(191) = -1.754593655935021d+01
736  weights(192) = +9.636228624407483d+00
737  weights(193) = -9.725446091755160d+00
738  weights(194) = -1.073038410065271d+01
739  weights(195) = +3.307432651804589d+01
740  weights(196) = +4.034085904395413d+00
741  weights(197) = -9.810609390827613d+00
742  weights(198) = -2.766601290898564d-01
743  weights(199) = +3.510300203085754d-01
744  weights(200) = +1.014491046064515d+00
745  weights(201) = +5.200540204542851d+00
746  weights(202) = -3.134232057579029d+00
747  weights(203) = -6.517084037664848d-01
748  weights(204) = -6.206620154112724d+00
749  weights(205) = +7.411089020403470d-01
750  weights(206) = +8.152217520173741d+00
751  weights(207) = -8.169010486013088d+00
752  weights(208) = +3.973026872031141d+00
753  weights(209) = +1.744179064918828d+00
754  weights(210) = +2.132222676793543d+00
755  weights(211) = -5.275392956221820d-01
756  weights(212) = +3.690370896312323d+00
757  weights(213) = +1.699680817600023d+00
758  weights(214) = -6.167835914485500d-01
759  weights(215) = +1.445966407109925d+00
760  weights(216) = -1.253803734578848d+01
761  weights(217) = -9.486415329148892d+00
762  weights(218) = +6.549396813130102d-01
763  weights(219) = -1.101276533950899d+00
764  weights(220) = -3.812019444246272d-01
765  weights(221) = -1.061182413991577d+01
766  weights(222) = -1.759128498553025d+00
767  weights(223) = -1.826301395616294d+00
768  weights(224) = -9.621099395743977d-01
769  weights(225) = +2.979045409466201d+00
770 c
771  eni(1, 1) = +2.916666505496130d+00
772  eni(2, 1) = +2.430555408671047d+00
773  eni(3, 1) = +3.056768505446338d+00
774  eni(4, 1) = +1.576576635626104d+00
775  eni(5, 1) = +1.808785624991505d+00
776  eni(6, 1) = +2.272727367508866d+00
777  eni(7, 1) = +3.196347133311626d+00
778  eni(8, 1) = +6.135846893712152d-01
779  eni(9, 1) = +3.500000239866707d-01
780  eni(10, 1) = +1.026851454476083d+00
781  eni(11, 1) = +4.018183170908746d-01
782  eni(12, 1) = +1.210724668339963d+00
783  eni(13, 1) = +8.274231524586034d-01
784  eni(14, 1) = +3.061734591274901d+00
785  eni(1, 2) = -4.583322965902747d-03
786  eni(2, 2) = -2.499998189095104d-02
787  eni(3, 2) = +5.829694688633287d-02
788  eni(4, 2) = -2.027028106426984d-02
789  eni(5, 2) = -8.333333333333331d-02
790  eni(6, 2) = +1.136362902411045d-02
791  eni(7, 2) = +8.607305876264598d-02
792  eni(8, 2) = +7.542257222280060d-01
793  eni(9, 2) = +4.999999760133292d-01
794  eni(10, 2) = -1.679962794177234d-01
795  eni(11, 2) = +4.713700491382047d-01
796  eni(12, 2) = -3.607165361370436d-01
797  eni(13, 2) = +1.500000000000000d-01
798  eni(14, 2) = +8.463068067056631d-02
799 c
800  deo(1, 1) = +8.272582621380060d+00
801  deo(1, 2) = -5.672104269379436d+00
802 c
803  CALL normcall( weights, conec, 225, units, 29,
804  & inno, 14, outno, 1, eni, deo, input, output )
805 c
806  END
807 c
808 c ------------------------------------------------------------------
809  SUBROUTINE dffnet_terra_land(input, deriv)
810 c ------------------------------------------------------------------
811 c
812 c Returns partial derivatives of the network's output vs its input.
813 c
814 c For each input pattern an array of the form::
815 c
816 c | o1/i1, o1/i2, ..., o1/in |
817 c | o2/i1, o2/i2, ..., o2/in |
818 c | ... |
819 c | om/i1, om/i2, ..., om/in |
820 c
821 c is returned.
822 c
823 c :Parameters:
824 c inp : array
825 c 2D array of input patterns (or 1D for single pattern)
826 c
827 c :Returns:
828 c ans : array
829 c 1D or 2D array of calculated network outputs
830 c
831 c :Examples:
832 c >>> from ffnet import mlgraph, ffnet
833 c >>> conec = mlgraph((3,3,2))
834 c >>> net = ffnet(conec); net.weights[:] = 1.
835 c >>> net.derivative([0., 0., 0.])
836 c array([[ 0.02233658, 0.02233658, 0.02233658],
837 c [ 0.02233658, 0.02233658, 0.02233658]])
838 c Arguments:
839 c input - 1-d array of length 14
840 c deriv - 2-d array of the shape (1, 14)
841 c ------------------------------------------------------------------
842  INTEGER conec(225, 2)
843  INTEGER dconecno(392)
844  INTEGER dconecmk(15)
845  INTEGER inno(14)
846  INTEGER outno(1)
847  DOUBLE PRECISION weights(225)
848  DOUBLE PRECISION eni(14, 2)
849  DOUBLE PRECISION ded(1, 14)
850  DOUBLE PRECISION units(29)
851  DOUBLE PRECISION input(14)
852  DOUBLE PRECISION deriv(1, 14)
853 c
854 cf2py intent(in) input
855 cf2py intent(out) deriv
856 c
857  conec(1, 1) = 0
858  conec(2, 1) = 1
859  conec(3, 1) = 2
860  conec(4, 1) = 3
861  conec(5, 1) = 4
862  conec(6, 1) = 5
863  conec(7, 1) = 6
864  conec(8, 1) = 7
865  conec(9, 1) = 8
866  conec(10, 1) = 9
867  conec(11, 1) = 10
868  conec(12, 1) = 11
869  conec(13, 1) = 12
870  conec(14, 1) = 13
871  conec(15, 1) = 14
872  conec(16, 1) = 0
873  conec(17, 1) = 1
874  conec(18, 1) = 2
875  conec(19, 1) = 3
876  conec(20, 1) = 4
877  conec(21, 1) = 5
878  conec(22, 1) = 6
879  conec(23, 1) = 7
880  conec(24, 1) = 8
881  conec(25, 1) = 9
882  conec(26, 1) = 10
883  conec(27, 1) = 11
884  conec(28, 1) = 12
885  conec(29, 1) = 13
886  conec(30, 1) = 14
887  conec(31, 1) = 0
888  conec(32, 1) = 1
889  conec(33, 1) = 2
890  conec(34, 1) = 3
891  conec(35, 1) = 4
892  conec(36, 1) = 5
893  conec(37, 1) = 6
894  conec(38, 1) = 7
895  conec(39, 1) = 8
896  conec(40, 1) = 9
897  conec(41, 1) = 10
898  conec(42, 1) = 11
899  conec(43, 1) = 12
900  conec(44, 1) = 13
901  conec(45, 1) = 14
902  conec(46, 1) = 0
903  conec(47, 1) = 1
904  conec(48, 1) = 2
905  conec(49, 1) = 3
906  conec(50, 1) = 4
907  conec(51, 1) = 5
908  conec(52, 1) = 6
909  conec(53, 1) = 7
910  conec(54, 1) = 8
911  conec(55, 1) = 9
912  conec(56, 1) = 10
913  conec(57, 1) = 11
914  conec(58, 1) = 12
915  conec(59, 1) = 13
916  conec(60, 1) = 14
917  conec(61, 1) = 0
918  conec(62, 1) = 1
919  conec(63, 1) = 2
920  conec(64, 1) = 3
921  conec(65, 1) = 4
922  conec(66, 1) = 5
923  conec(67, 1) = 6
924  conec(68, 1) = 7
925  conec(69, 1) = 8
926  conec(70, 1) = 9
927  conec(71, 1) = 10
928  conec(72, 1) = 11
929  conec(73, 1) = 12
930  conec(74, 1) = 13
931  conec(75, 1) = 14
932  conec(76, 1) = 0
933  conec(77, 1) = 1
934  conec(78, 1) = 2
935  conec(79, 1) = 3
936  conec(80, 1) = 4
937  conec(81, 1) = 5
938  conec(82, 1) = 6
939  conec(83, 1) = 7
940  conec(84, 1) = 8
941  conec(85, 1) = 9
942  conec(86, 1) = 10
943  conec(87, 1) = 11
944  conec(88, 1) = 12
945  conec(89, 1) = 13
946  conec(90, 1) = 14
947  conec(91, 1) = 0
948  conec(92, 1) = 1
949  conec(93, 1) = 2
950  conec(94, 1) = 3
951  conec(95, 1) = 4
952  conec(96, 1) = 5
953  conec(97, 1) = 6
954  conec(98, 1) = 7
955  conec(99, 1) = 8
956  conec(100, 1) = 9
957  conec(101, 1) = 10
958  conec(102, 1) = 11
959  conec(103, 1) = 12
960  conec(104, 1) = 13
961  conec(105, 1) = 14
962  conec(106, 1) = 0
963  conec(107, 1) = 1
964  conec(108, 1) = 2
965  conec(109, 1) = 3
966  conec(110, 1) = 4
967  conec(111, 1) = 5
968  conec(112, 1) = 6
969  conec(113, 1) = 7
970  conec(114, 1) = 8
971  conec(115, 1) = 9
972  conec(116, 1) = 10
973  conec(117, 1) = 11
974  conec(118, 1) = 12
975  conec(119, 1) = 13
976  conec(120, 1) = 14
977  conec(121, 1) = 0
978  conec(122, 1) = 1
979  conec(123, 1) = 2
980  conec(124, 1) = 3
981  conec(125, 1) = 4
982  conec(126, 1) = 5
983  conec(127, 1) = 6
984  conec(128, 1) = 7
985  conec(129, 1) = 8
986  conec(130, 1) = 9
987  conec(131, 1) = 10
988  conec(132, 1) = 11
989  conec(133, 1) = 12
990  conec(134, 1) = 13
991  conec(135, 1) = 14
992  conec(136, 1) = 0
993  conec(137, 1) = 1
994  conec(138, 1) = 2
995  conec(139, 1) = 3
996  conec(140, 1) = 4
997  conec(141, 1) = 5
998  conec(142, 1) = 6
999  conec(143, 1) = 7
1000  conec(144, 1) = 8
1001  conec(145, 1) = 9
1002  conec(146, 1) = 10
1003  conec(147, 1) = 11
1004  conec(148, 1) = 12
1005  conec(149, 1) = 13
1006  conec(150, 1) = 14
1007  conec(151, 1) = 0
1008  conec(152, 1) = 1
1009  conec(153, 1) = 2
1010  conec(154, 1) = 3
1011  conec(155, 1) = 4
1012  conec(156, 1) = 5
1013  conec(157, 1) = 6
1014  conec(158, 1) = 7
1015  conec(159, 1) = 8
1016  conec(160, 1) = 9
1017  conec(161, 1) = 10
1018  conec(162, 1) = 11
1019  conec(163, 1) = 12
1020  conec(164, 1) = 13
1021  conec(165, 1) = 14
1022  conec(166, 1) = 0
1023  conec(167, 1) = 1
1024  conec(168, 1) = 2
1025  conec(169, 1) = 3
1026  conec(170, 1) = 4
1027  conec(171, 1) = 5
1028  conec(172, 1) = 6
1029  conec(173, 1) = 7
1030  conec(174, 1) = 8
1031  conec(175, 1) = 9
1032  conec(176, 1) = 10
1033  conec(177, 1) = 11
1034  conec(178, 1) = 12
1035  conec(179, 1) = 13
1036  conec(180, 1) = 14
1037  conec(181, 1) = 0
1038  conec(182, 1) = 1
1039  conec(183, 1) = 2
1040  conec(184, 1) = 3
1041  conec(185, 1) = 4
1042  conec(186, 1) = 5
1043  conec(187, 1) = 6
1044  conec(188, 1) = 7
1045  conec(189, 1) = 8
1046  conec(190, 1) = 9
1047  conec(191, 1) = 10
1048  conec(192, 1) = 11
1049  conec(193, 1) = 12
1050  conec(194, 1) = 13
1051  conec(195, 1) = 14
1052  conec(196, 1) = 0
1053  conec(197, 1) = 1
1054  conec(198, 1) = 2
1055  conec(199, 1) = 3
1056  conec(200, 1) = 4
1057  conec(201, 1) = 5
1058  conec(202, 1) = 6
1059  conec(203, 1) = 7
1060  conec(204, 1) = 8
1061  conec(205, 1) = 9
1062  conec(206, 1) = 10
1063  conec(207, 1) = 11
1064  conec(208, 1) = 12
1065  conec(209, 1) = 13
1066  conec(210, 1) = 14
1067  conec(211, 1) = 0
1068  conec(212, 1) = 15
1069  conec(213, 1) = 16
1070  conec(214, 1) = 17
1071  conec(215, 1) = 18
1072  conec(216, 1) = 19
1073  conec(217, 1) = 20
1074  conec(218, 1) = 21
1075  conec(219, 1) = 22
1076  conec(220, 1) = 23
1077  conec(221, 1) = 24
1078  conec(222, 1) = 25
1079  conec(223, 1) = 26
1080  conec(224, 1) = 27
1081  conec(225, 1) = 28
1082  conec(1, 2) = 15
1083  conec(2, 2) = 15
1084  conec(3, 2) = 15
1085  conec(4, 2) = 15
1086  conec(5, 2) = 15
1087  conec(6, 2) = 15
1088  conec(7, 2) = 15
1089  conec(8, 2) = 15
1090  conec(9, 2) = 15
1091  conec(10, 2) = 15
1092  conec(11, 2) = 15
1093  conec(12, 2) = 15
1094  conec(13, 2) = 15
1095  conec(14, 2) = 15
1096  conec(15, 2) = 15
1097  conec(16, 2) = 16
1098  conec(17, 2) = 16
1099  conec(18, 2) = 16
1100  conec(19, 2) = 16
1101  conec(20, 2) = 16
1102  conec(21, 2) = 16
1103  conec(22, 2) = 16
1104  conec(23, 2) = 16
1105  conec(24, 2) = 16
1106  conec(25, 2) = 16
1107  conec(26, 2) = 16
1108  conec(27, 2) = 16
1109  conec(28, 2) = 16
1110  conec(29, 2) = 16
1111  conec(30, 2) = 16
1112  conec(31, 2) = 17
1113  conec(32, 2) = 17
1114  conec(33, 2) = 17
1115  conec(34, 2) = 17
1116  conec(35, 2) = 17
1117  conec(36, 2) = 17
1118  conec(37, 2) = 17
1119  conec(38, 2) = 17
1120  conec(39, 2) = 17
1121  conec(40, 2) = 17
1122  conec(41, 2) = 17
1123  conec(42, 2) = 17
1124  conec(43, 2) = 17
1125  conec(44, 2) = 17
1126  conec(45, 2) = 17
1127  conec(46, 2) = 18
1128  conec(47, 2) = 18
1129  conec(48, 2) = 18
1130  conec(49, 2) = 18
1131  conec(50, 2) = 18
1132  conec(51, 2) = 18
1133  conec(52, 2) = 18
1134  conec(53, 2) = 18
1135  conec(54, 2) = 18
1136  conec(55, 2) = 18
1137  conec(56, 2) = 18
1138  conec(57, 2) = 18
1139  conec(58, 2) = 18
1140  conec(59, 2) = 18
1141  conec(60, 2) = 18
1142  conec(61, 2) = 19
1143  conec(62, 2) = 19
1144  conec(63, 2) = 19
1145  conec(64, 2) = 19
1146  conec(65, 2) = 19
1147  conec(66, 2) = 19
1148  conec(67, 2) = 19
1149  conec(68, 2) = 19
1150  conec(69, 2) = 19
1151  conec(70, 2) = 19
1152  conec(71, 2) = 19
1153  conec(72, 2) = 19
1154  conec(73, 2) = 19
1155  conec(74, 2) = 19
1156  conec(75, 2) = 19
1157  conec(76, 2) = 20
1158  conec(77, 2) = 20
1159  conec(78, 2) = 20
1160  conec(79, 2) = 20
1161  conec(80, 2) = 20
1162  conec(81, 2) = 20
1163  conec(82, 2) = 20
1164  conec(83, 2) = 20
1165  conec(84, 2) = 20
1166  conec(85, 2) = 20
1167  conec(86, 2) = 20
1168  conec(87, 2) = 20
1169  conec(88, 2) = 20
1170  conec(89, 2) = 20
1171  conec(90, 2) = 20
1172  conec(91, 2) = 21
1173  conec(92, 2) = 21
1174  conec(93, 2) = 21
1175  conec(94, 2) = 21
1176  conec(95, 2) = 21
1177  conec(96, 2) = 21
1178  conec(97, 2) = 21
1179  conec(98, 2) = 21
1180  conec(99, 2) = 21
1181  conec(100, 2) = 21
1182  conec(101, 2) = 21
1183  conec(102, 2) = 21
1184  conec(103, 2) = 21
1185  conec(104, 2) = 21
1186  conec(105, 2) = 21
1187  conec(106, 2) = 22
1188  conec(107, 2) = 22
1189  conec(108, 2) = 22
1190  conec(109, 2) = 22
1191  conec(110, 2) = 22
1192  conec(111, 2) = 22
1193  conec(112, 2) = 22
1194  conec(113, 2) = 22
1195  conec(114, 2) = 22
1196  conec(115, 2) = 22
1197  conec(116, 2) = 22
1198  conec(117, 2) = 22
1199  conec(118, 2) = 22
1200  conec(119, 2) = 22
1201  conec(120, 2) = 22
1202  conec(121, 2) = 23
1203  conec(122, 2) = 23
1204  conec(123, 2) = 23
1205  conec(124, 2) = 23
1206  conec(125, 2) = 23
1207  conec(126, 2) = 23
1208  conec(127, 2) = 23
1209  conec(128, 2) = 23
1210  conec(129, 2) = 23
1211  conec(130, 2) = 23
1212  conec(131, 2) = 23
1213  conec(132, 2) = 23
1214  conec(133, 2) = 23
1215  conec(134, 2) = 23
1216  conec(135, 2) = 23
1217  conec(136, 2) = 24
1218  conec(137, 2) = 24
1219  conec(138, 2) = 24
1220  conec(139, 2) = 24
1221  conec(140, 2) = 24
1222  conec(141, 2) = 24
1223  conec(142, 2) = 24
1224  conec(143, 2) = 24
1225  conec(144, 2) = 24
1226  conec(145, 2) = 24
1227  conec(146, 2) = 24
1228  conec(147, 2) = 24
1229  conec(148, 2) = 24
1230  conec(149, 2) = 24
1231  conec(150, 2) = 24
1232  conec(151, 2) = 25
1233  conec(152, 2) = 25
1234  conec(153, 2) = 25
1235  conec(154, 2) = 25
1236  conec(155, 2) = 25
1237  conec(156, 2) = 25
1238  conec(157, 2) = 25
1239  conec(158, 2) = 25
1240  conec(159, 2) = 25
1241  conec(160, 2) = 25
1242  conec(161, 2) = 25
1243  conec(162, 2) = 25
1244  conec(163, 2) = 25
1245  conec(164, 2) = 25
1246  conec(165, 2) = 25
1247  conec(166, 2) = 26
1248  conec(167, 2) = 26
1249  conec(168, 2) = 26
1250  conec(169, 2) = 26
1251  conec(170, 2) = 26
1252  conec(171, 2) = 26
1253  conec(172, 2) = 26
1254  conec(173, 2) = 26
1255  conec(174, 2) = 26
1256  conec(175, 2) = 26
1257  conec(176, 2) = 26
1258  conec(177, 2) = 26
1259  conec(178, 2) = 26
1260  conec(179, 2) = 26
1261  conec(180, 2) = 26
1262  conec(181, 2) = 27
1263  conec(182, 2) = 27
1264  conec(183, 2) = 27
1265  conec(184, 2) = 27
1266  conec(185, 2) = 27
1267  conec(186, 2) = 27
1268  conec(187, 2) = 27
1269  conec(188, 2) = 27
1270  conec(189, 2) = 27
1271  conec(190, 2) = 27
1272  conec(191, 2) = 27
1273  conec(192, 2) = 27
1274  conec(193, 2) = 27
1275  conec(194, 2) = 27
1276  conec(195, 2) = 27
1277  conec(196, 2) = 28
1278  conec(197, 2) = 28
1279  conec(198, 2) = 28
1280  conec(199, 2) = 28
1281  conec(200, 2) = 28
1282  conec(201, 2) = 28
1283  conec(202, 2) = 28
1284  conec(203, 2) = 28
1285  conec(204, 2) = 28
1286  conec(205, 2) = 28
1287  conec(206, 2) = 28
1288  conec(207, 2) = 28
1289  conec(208, 2) = 28
1290  conec(209, 2) = 28
1291  conec(210, 2) = 28
1292  conec(211, 2) = 29
1293  conec(212, 2) = 29
1294  conec(213, 2) = 29
1295  conec(214, 2) = 29
1296  conec(215, 2) = 29
1297  conec(216, 2) = 29
1298  conec(217, 2) = 29
1299  conec(218, 2) = 29
1300  conec(219, 2) = 29
1301  conec(220, 2) = 29
1302  conec(221, 2) = 29
1303  conec(222, 2) = 29
1304  conec(223, 2) = 29
1305  conec(224, 2) = 29
1306  conec(225, 2) = 29
1307 c
1308  dconecno(1) = 15
1309  dconecno(2) = 30
1310  dconecno(3) = 45
1311  dconecno(4) = 60
1312  dconecno(5) = 75
1313  dconecno(6) = 90
1314  dconecno(7) = 105
1315  dconecno(8) = 120
1316  dconecno(9) = 135
1317  dconecno(10) = 150
1318  dconecno(11) = 165
1319  dconecno(12) = 180
1320  dconecno(13) = 195
1321  dconecno(14) = 210
1322  dconecno(15) = 212
1323  dconecno(16) = 213
1324  dconecno(17) = 214
1325  dconecno(18) = 215
1326  dconecno(19) = 216
1327  dconecno(20) = 217
1328  dconecno(21) = 218
1329  dconecno(22) = 219
1330  dconecno(23) = 220
1331  dconecno(24) = 221
1332  dconecno(25) = 222
1333  dconecno(26) = 223
1334  dconecno(27) = 224
1335  dconecno(28) = 225
1336  dconecno(29) = 14
1337  dconecno(30) = 29
1338  dconecno(31) = 44
1339  dconecno(32) = 59
1340  dconecno(33) = 74
1341  dconecno(34) = 89
1342  dconecno(35) = 104
1343  dconecno(36) = 119
1344  dconecno(37) = 134
1345  dconecno(38) = 149
1346  dconecno(39) = 164
1347  dconecno(40) = 179
1348  dconecno(41) = 194
1349  dconecno(42) = 209
1350  dconecno(43) = 212
1351  dconecno(44) = 213
1352  dconecno(45) = 214
1353  dconecno(46) = 215
1354  dconecno(47) = 216
1355  dconecno(48) = 217
1356  dconecno(49) = 218
1357  dconecno(50) = 219
1358  dconecno(51) = 220
1359  dconecno(52) = 221
1360  dconecno(53) = 222
1361  dconecno(54) = 223
1362  dconecno(55) = 224
1363  dconecno(56) = 225
1364  dconecno(57) = 13
1365  dconecno(58) = 28
1366  dconecno(59) = 43
1367  dconecno(60) = 58
1368  dconecno(61) = 73
1369  dconecno(62) = 88
1370  dconecno(63) = 103
1371  dconecno(64) = 118
1372  dconecno(65) = 133
1373  dconecno(66) = 148
1374  dconecno(67) = 163
1375  dconecno(68) = 178
1376  dconecno(69) = 193
1377  dconecno(70) = 208
1378  dconecno(71) = 212
1379  dconecno(72) = 213
1380  dconecno(73) = 214
1381  dconecno(74) = 215
1382  dconecno(75) = 216
1383  dconecno(76) = 217
1384  dconecno(77) = 218
1385  dconecno(78) = 219
1386  dconecno(79) = 220
1387  dconecno(80) = 221
1388  dconecno(81) = 222
1389  dconecno(82) = 223
1390  dconecno(83) = 224
1391  dconecno(84) = 225
1392  dconecno(85) = 12
1393  dconecno(86) = 27
1394  dconecno(87) = 42
1395  dconecno(88) = 57
1396  dconecno(89) = 72
1397  dconecno(90) = 87
1398  dconecno(91) = 102
1399  dconecno(92) = 117
1400  dconecno(93) = 132
1401  dconecno(94) = 147
1402  dconecno(95) = 162
1403  dconecno(96) = 177
1404  dconecno(97) = 192
1405  dconecno(98) = 207
1406  dconecno(99) = 212
1407  dconecno(100) = 213
1408  dconecno(101) = 214
1409  dconecno(102) = 215
1410  dconecno(103) = 216
1411  dconecno(104) = 217
1412  dconecno(105) = 218
1413  dconecno(106) = 219
1414  dconecno(107) = 220
1415  dconecno(108) = 221
1416  dconecno(109) = 222
1417  dconecno(110) = 223
1418  dconecno(111) = 224
1419  dconecno(112) = 225
1420  dconecno(113) = 11
1421  dconecno(114) = 26
1422  dconecno(115) = 41
1423  dconecno(116) = 56
1424  dconecno(117) = 71
1425  dconecno(118) = 86
1426  dconecno(119) = 101
1427  dconecno(120) = 116
1428  dconecno(121) = 131
1429  dconecno(122) = 146
1430  dconecno(123) = 161
1431  dconecno(124) = 176
1432  dconecno(125) = 191
1433  dconecno(126) = 206
1434  dconecno(127) = 212
1435  dconecno(128) = 213
1436  dconecno(129) = 214
1437  dconecno(130) = 215
1438  dconecno(131) = 216
1439  dconecno(132) = 217
1440  dconecno(133) = 218
1441  dconecno(134) = 219
1442  dconecno(135) = 220
1443  dconecno(136) = 221
1444  dconecno(137) = 222
1445  dconecno(138) = 223
1446  dconecno(139) = 224
1447  dconecno(140) = 225
1448  dconecno(141) = 10
1449  dconecno(142) = 25
1450  dconecno(143) = 40
1451  dconecno(144) = 55
1452  dconecno(145) = 70
1453  dconecno(146) = 85
1454  dconecno(147) = 100
1455  dconecno(148) = 115
1456  dconecno(149) = 130
1457  dconecno(150) = 145
1458  dconecno(151) = 160
1459  dconecno(152) = 175
1460  dconecno(153) = 190
1461  dconecno(154) = 205
1462  dconecno(155) = 212
1463  dconecno(156) = 213
1464  dconecno(157) = 214
1465  dconecno(158) = 215
1466  dconecno(159) = 216
1467  dconecno(160) = 217
1468  dconecno(161) = 218
1469  dconecno(162) = 219
1470  dconecno(163) = 220
1471  dconecno(164) = 221
1472  dconecno(165) = 222
1473  dconecno(166) = 223
1474  dconecno(167) = 224
1475  dconecno(168) = 225
1476  dconecno(169) = 9
1477  dconecno(170) = 24
1478  dconecno(171) = 39
1479  dconecno(172) = 54
1480  dconecno(173) = 69
1481  dconecno(174) = 84
1482  dconecno(175) = 99
1483  dconecno(176) = 114
1484  dconecno(177) = 129
1485  dconecno(178) = 144
1486  dconecno(179) = 159
1487  dconecno(180) = 174
1488  dconecno(181) = 189
1489  dconecno(182) = 204
1490  dconecno(183) = 212
1491  dconecno(184) = 213
1492  dconecno(185) = 214
1493  dconecno(186) = 215
1494  dconecno(187) = 216
1495  dconecno(188) = 217
1496  dconecno(189) = 218
1497  dconecno(190) = 219
1498  dconecno(191) = 220
1499  dconecno(192) = 221
1500  dconecno(193) = 222
1501  dconecno(194) = 223
1502  dconecno(195) = 224
1503  dconecno(196) = 225
1504  dconecno(197) = 8
1505  dconecno(198) = 23
1506  dconecno(199) = 38
1507  dconecno(200) = 53
1508  dconecno(201) = 68
1509  dconecno(202) = 83
1510  dconecno(203) = 98
1511  dconecno(204) = 113
1512  dconecno(205) = 128
1513  dconecno(206) = 143
1514  dconecno(207) = 158
1515  dconecno(208) = 173
1516  dconecno(209) = 188
1517  dconecno(210) = 203
1518  dconecno(211) = 212
1519  dconecno(212) = 213
1520  dconecno(213) = 214
1521  dconecno(214) = 215
1522  dconecno(215) = 216
1523  dconecno(216) = 217
1524  dconecno(217) = 218
1525  dconecno(218) = 219
1526  dconecno(219) = 220
1527  dconecno(220) = 221
1528  dconecno(221) = 222
1529  dconecno(222) = 223
1530  dconecno(223) = 224
1531  dconecno(224) = 225
1532  dconecno(225) = 7
1533  dconecno(226) = 22
1534  dconecno(227) = 37
1535  dconecno(228) = 52
1536  dconecno(229) = 67
1537  dconecno(230) = 82
1538  dconecno(231) = 97
1539  dconecno(232) = 112
1540  dconecno(233) = 127
1541  dconecno(234) = 142
1542  dconecno(235) = 157
1543  dconecno(236) = 172
1544  dconecno(237) = 187
1545  dconecno(238) = 202
1546  dconecno(239) = 212
1547  dconecno(240) = 213
1548  dconecno(241) = 214
1549  dconecno(242) = 215
1550  dconecno(243) = 216
1551  dconecno(244) = 217
1552  dconecno(245) = 218
1553  dconecno(246) = 219
1554  dconecno(247) = 220
1555  dconecno(248) = 221
1556  dconecno(249) = 222
1557  dconecno(250) = 223
1558  dconecno(251) = 224
1559  dconecno(252) = 225
1560  dconecno(253) = 6
1561  dconecno(254) = 21
1562  dconecno(255) = 36
1563  dconecno(256) = 51
1564  dconecno(257) = 66
1565  dconecno(258) = 81
1566  dconecno(259) = 96
1567  dconecno(260) = 111
1568  dconecno(261) = 126
1569  dconecno(262) = 141
1570  dconecno(263) = 156
1571  dconecno(264) = 171
1572  dconecno(265) = 186
1573  dconecno(266) = 201
1574  dconecno(267) = 212
1575  dconecno(268) = 213
1576  dconecno(269) = 214
1577  dconecno(270) = 215
1578  dconecno(271) = 216
1579  dconecno(272) = 217
1580  dconecno(273) = 218
1581  dconecno(274) = 219
1582  dconecno(275) = 220
1583  dconecno(276) = 221
1584  dconecno(277) = 222
1585  dconecno(278) = 223
1586  dconecno(279) = 224
1587  dconecno(280) = 225
1588  dconecno(281) = 5
1589  dconecno(282) = 20
1590  dconecno(283) = 35
1591  dconecno(284) = 50
1592  dconecno(285) = 65
1593  dconecno(286) = 80
1594  dconecno(287) = 95
1595  dconecno(288) = 110
1596  dconecno(289) = 125
1597  dconecno(290) = 140
1598  dconecno(291) = 155
1599  dconecno(292) = 170
1600  dconecno(293) = 185
1601  dconecno(294) = 200
1602  dconecno(295) = 212
1603  dconecno(296) = 213
1604  dconecno(297) = 214
1605  dconecno(298) = 215
1606  dconecno(299) = 216
1607  dconecno(300) = 217
1608  dconecno(301) = 218
1609  dconecno(302) = 219
1610  dconecno(303) = 220
1611  dconecno(304) = 221
1612  dconecno(305) = 222
1613  dconecno(306) = 223
1614  dconecno(307) = 224
1615  dconecno(308) = 225
1616  dconecno(309) = 4
1617  dconecno(310) = 19
1618  dconecno(311) = 34
1619  dconecno(312) = 49
1620  dconecno(313) = 64
1621  dconecno(314) = 79
1622  dconecno(315) = 94
1623  dconecno(316) = 109
1624  dconecno(317) = 124
1625  dconecno(318) = 139
1626  dconecno(319) = 154
1627  dconecno(320) = 169
1628  dconecno(321) = 184
1629  dconecno(322) = 199
1630  dconecno(323) = 212
1631  dconecno(324) = 213
1632  dconecno(325) = 214
1633  dconecno(326) = 215
1634  dconecno(327) = 216
1635  dconecno(328) = 217
1636  dconecno(329) = 218
1637  dconecno(330) = 219
1638  dconecno(331) = 220
1639  dconecno(332) = 221
1640  dconecno(333) = 222
1641  dconecno(334) = 223
1642  dconecno(335) = 224
1643  dconecno(336) = 225
1644  dconecno(337) = 3
1645  dconecno(338) = 18
1646  dconecno(339) = 33
1647  dconecno(340) = 48
1648  dconecno(341) = 63
1649  dconecno(342) = 78
1650  dconecno(343) = 93
1651  dconecno(344) = 108
1652  dconecno(345) = 123
1653  dconecno(346) = 138
1654  dconecno(347) = 153
1655  dconecno(348) = 168
1656  dconecno(349) = 183
1657  dconecno(350) = 198
1658  dconecno(351) = 212
1659  dconecno(352) = 213
1660  dconecno(353) = 214
1661  dconecno(354) = 215
1662  dconecno(355) = 216
1663  dconecno(356) = 217
1664  dconecno(357) = 218
1665  dconecno(358) = 219
1666  dconecno(359) = 220
1667  dconecno(360) = 221
1668  dconecno(361) = 222
1669  dconecno(362) = 223
1670  dconecno(363) = 224
1671  dconecno(364) = 225
1672  dconecno(365) = 2
1673  dconecno(366) = 17
1674  dconecno(367) = 32
1675  dconecno(368) = 47
1676  dconecno(369) = 62
1677  dconecno(370) = 77
1678  dconecno(371) = 92
1679  dconecno(372) = 107
1680  dconecno(373) = 122
1681  dconecno(374) = 137
1682  dconecno(375) = 152
1683  dconecno(376) = 167
1684  dconecno(377) = 182
1685  dconecno(378) = 197
1686  dconecno(379) = 212
1687  dconecno(380) = 213
1688  dconecno(381) = 214
1689  dconecno(382) = 215
1690  dconecno(383) = 216
1691  dconecno(384) = 217
1692  dconecno(385) = 218
1693  dconecno(386) = 219
1694  dconecno(387) = 220
1695  dconecno(388) = 221
1696  dconecno(389) = 222
1697  dconecno(390) = 223
1698  dconecno(391) = 224
1699  dconecno(392) = 225
1700 c
1701  dconecmk(1) = 0
1702  dconecmk(2) = 28
1703  dconecmk(3) = 56
1704  dconecmk(4) = 84
1705  dconecmk(5) = 112
1706  dconecmk(6) = 140
1707  dconecmk(7) = 168
1708  dconecmk(8) = 196
1709  dconecmk(9) = 224
1710  dconecmk(10) = 252
1711  dconecmk(11) = 280
1712  dconecmk(12) = 308
1713  dconecmk(13) = 336
1714  dconecmk(14) = 364
1715  dconecmk(15) = 392
1716 c
1717  inno(1) = 14
1718  inno(2) = 13
1719  inno(3) = 12
1720  inno(4) = 11
1721  inno(5) = 10
1722  inno(6) = 9
1723  inno(7) = 8
1724  inno(8) = 7
1725  inno(9) = 6
1726  inno(10) = 5
1727  inno(11) = 4
1728  inno(12) = 3
1729  inno(13) = 2
1730  inno(14) = 1
1731 c
1732  outno(1) = 29
1733 c
1734  weights(1) = -4.672340501047164d+00
1735  weights(2) = +7.891227998178276d+00
1736  weights(3) = +6.828716728584217d-02
1737  weights(4) = +1.189415979538880d+00
1738  weights(5) = -1.935816351292460d+00
1739  weights(6) = -1.782622523599635d+00
1740  weights(7) = -1.170032866607869d+00
1741  weights(8) = +5.195004250466444d-01
1742  weights(9) = +5.540655859698830d+00
1743  weights(10) = +1.761869925146665d+00
1744  weights(11) = -2.154096775807649d+00
1745  weights(12) = +2.536780525976746d+00
1746  weights(13) = -8.412312975891505d+00
1747  weights(14) = +4.903395333778126d-01
1748  weights(15) = -4.221916211549833d+00
1749  weights(16) = +1.941604455620145d+00
1750  weights(17) = +3.521482544938932d+00
1751  weights(18) = +3.192631792849587d-01
1752  weights(19) = +1.862167129923263d+00
1753  weights(20) = -1.216714601069177d+00
1754  weights(21) = +1.056711173458381d+00
1755  weights(22) = +1.600865955608238d-01
1756  weights(23) = -2.978227904905953d+00
1757  weights(24) = +2.054354545504522d+00
1758  weights(25) = -4.944665262297513d+00
1759  weights(26) = -1.119592749083573d+00
1760  weights(27) = -8.442075679779549d-01
1761  weights(28) = -5.509093206153558d+00
1762  weights(29) = -1.608745990965013d+01
1763  weights(30) = +2.568278638371489d+01
1764  weights(31) = +1.748181231958932d+00
1765  weights(32) = -3.055845549871521d+00
1766  weights(33) = +8.462676335087013d-02
1767  weights(34) = -1.967376316247190d+00
1768  weights(35) = -3.253686684985101d+00
1769  weights(36) = +2.254334041115881d+00
1770  weights(37) = +3.713262600022085d+00
1771  weights(38) = -1.290839219548142d+00
1772  weights(39) = -7.762818714206452d+00
1773  weights(40) = +6.057885299196427d+00
1774  weights(41) = +6.970017593855654d+00
1775  weights(42) = -1.928384455782371d+00
1776  weights(43) = -2.623008862213284d+00
1777  weights(44) = -3.423857357318270d+00
1778  weights(45) = -2.715188248698767d+00
1779  weights(46) = -7.895349972915973d-03
1780  weights(47) = +1.712393243972534d-01
1781  weights(48) = -2.826254526327470d-01
1782  weights(49) = +1.142549668209398d+00
1783  weights(50) = -2.935737798265939d+00
1784  weights(51) = +5.121401878354813d-01
1785  weights(52) = +2.168355845135229d+00
1786  weights(53) = -3.609331729627605d-01
1787  weights(54) = +2.998854756137813d-01
1788  weights(55) = -2.383563614937339d+00
1789  weights(56) = +1.462897512238986d-01
1790  weights(57) = +2.089754855079622d-01
1791  weights(58) = +3.450302690329455d+00
1792  weights(59) = -1.097857048648125d+00
1793  weights(60) = +1.611144295558367d+00
1794  weights(61) = +5.807914076195990d+00
1795  weights(62) = -1.021252913320867d+00
1796  weights(63) = -4.078981406104047d-01
1797  weights(64) = -4.876597395669587d+00
1798  weights(65) = -1.524021164216649d+00
1799  weights(66) = -6.072909815374120d+00
1800  weights(67) = -3.206050811885087d-01
1801  weights(68) = -4.331480631676114d+00
1802  weights(69) = -6.133566192787063d-02
1803  weights(70) = -3.166228794787204d-02
1804  weights(71) = +5.012189798639211d-01
1805  weights(72) = -1.898388587479276d-01
1806  weights(73) = +4.368373616925594d-01
1807  weights(74) = -8.415195050810306d+00
1808  weights(75) = +3.195290558171127d+00
1809  weights(76) = +2.023096501970321d+00
1810  weights(77) = -1.629521236772971d+00
1811  weights(78) = +1.728247071019928d-01
1812  weights(79) = -4.864463555771259d-01
1813  weights(80) = -5.706919026901940d-01
1814  weights(81) = -3.373279448190667d+00
1815  weights(82) = +2.703094375994016d-01
1816  weights(83) = -8.904623685190084d-01
1817  weights(84) = -1.326818041946425d+00
1818  weights(85) = +9.758180066258852d-01
1819  weights(86) = +6.361485374645539d+00
1820  weights(87) = -4.050121070273209d+00
1821  weights(88) = +2.997410066642586d+00
1822  weights(89) = +2.480850103529698d+00
1823  weights(90) = -1.469031989107684d+01
1824  weights(91) = +3.917350402690835d+01
1825  weights(92) = +8.905873849839104d+00
1826  weights(93) = +2.521257539700122d+00
1827  weights(94) = -1.524801280081118d+01
1828  weights(95) = -2.027504147962211d+00
1829  weights(96) = -1.798593597657272d+01
1830  weights(97) = +3.247434081114802d-01
1831  weights(98) = -2.041367821438264d+01
1832  weights(99) = +4.462892053205666d-01
1833  weights(100) = -2.025031251995319d+01
1834  weights(101) = -7.449319371901797d+00
1835  weights(102) = +1.276268374372202d+01
1836  weights(103) = +4.627341983421574d+01
1837  weights(104) = -4.561382263496962d+01
1838  weights(105) = -3.859191611675780d+01
1839  weights(106) = -9.426938554428451d-04
1840  weights(107) = +7.340651752071747d+00
1841  weights(108) = +3.543777119968973d-01
1842  weights(109) = -8.323170871369029d-01
1843  weights(110) = +1.648373218860842d+00
1844  weights(111) = -3.792651295318257d-01
1845  weights(112) = +2.144746410461043d+00
1846  weights(113) = -2.964913497666160d+00
1847  weights(114) = +2.005940429082662d+01
1848  weights(115) = -2.454589627614395d+01
1849  weights(116) = -1.121147422736664d+00
1850  weights(117) = +1.911904431068947d+00
1851  weights(118) = -4.647334911089095d+00
1852  weights(119) = -1.239100305915864d+01
1853  weights(120) = +2.281447787192716d+01
1854  weights(121) = -4.272212676459301d+00
1855  weights(122) = -5.436045077060062d+00
1856  weights(123) = -5.664032844232896d-01
1857  weights(124) = -2.141760008794948d+00
1858  weights(125) = +3.596649638871817d+00
1859  weights(126) = -3.305872574164838d-01
1860  weights(127) = +1.163767956586362d+00
1861  weights(128) = +3.217854907153653d+00
1862  weights(129) = -8.318965312267746d+00
1863  weights(130) = +1.792455596706294d+00
1864  weights(131) = -3.454151199600601d+00
1865  weights(132) = -1.128735167134332d+00
1866  weights(133) = +7.286473326550855d+00
1867  weights(134) = +1.473450955478852d+01
1868  weights(135) = +7.424329015213161d+00
1869  weights(136) = +1.673114929375708d+00
1870  weights(137) = -5.163200607258472d+00
1871  weights(138) = -1.171413307162666d-01
1872  weights(139) = -2.074468445637502d+00
1873  weights(140) = +1.189502026115086d+00
1874  weights(141) = -2.262103104174714d+00
1875  weights(142) = -2.343171190939198d+00
1876  weights(143) = -4.292510316803460d+00
1877  weights(144) = -6.218779724774190d+00
1878  weights(145) = +1.991858437242585d+01
1879  weights(146) = -2.416918372644096d+01
1880  weights(147) = +1.268652081479570d+01
1881  weights(148) = +9.316123224553079d+00
1882  weights(149) = -2.285327090096606d+01
1883  weights(150) = +4.302883357348859d+00
1884  weights(151) = +1.273616145216998d+00
1885  weights(152) = -7.220860403064899d-01
1886  weights(153) = +9.220521378392244d+00
1887  weights(154) = +1.511233649915168d+00
1888  weights(155) = +2.300771239626091d+00
1889  weights(156) = +1.991993174505360d+00
1890  weights(157) = +7.691889051785397d+00
1891  weights(158) = +1.786832594070927d-01
1892  weights(159) = -3.408355378938070d+00
1893  weights(160) = +3.130679773301201d-01
1894  weights(161) = +4.026339929045448d-01
1895  weights(162) = +1.739213521520609d+00
1896  weights(163) = +3.159618192749209d+00
1897  weights(164) = +6.484829449539340d+00
1898  weights(165) = +3.314583846853564d+00
1899  weights(166) = +1.172476757591995d+01
1900  weights(167) = +3.155720869741297d+00
1901  weights(168) = +3.861703970618145d-01
1902  weights(169) = -2.897997211186439d+00
1903  weights(170) = -2.658862109783064d+00
1904  weights(171) = -3.565998890206014d+00
1905  weights(172) = -6.726467974928511d-01
1906  weights(173) = -6.300119829255861d+00
1907  weights(174) = +3.367448179920993d+00
1908  weights(175) = -1.656930331200921d+00
1909  weights(176) = -3.062669552261635d+00
1910  weights(177) = +2.684407245132188d+00
1911  weights(178) = +1.625087717488581d+00
1912  weights(179) = -2.350747357053270d+01
1913  weights(180) = -6.162022756957549d-02
1914  weights(181) = +4.949518017932586d+00
1915  weights(182) = -1.230937915044244d+01
1916  weights(183) = -3.119377247214172d-01
1917  weights(184) = +1.696330066771451d+00
1918  weights(185) = +3.797076933907853d+00
1919  weights(186) = +9.723754355860857d+00
1920  weights(187) = -1.482046079104288d+01
1921  weights(188) = +1.717746230325528d+00
1922  weights(189) = -5.323674658169240d+00
1923  weights(190) = +9.558772420194964d+00
1924  weights(191) = -1.754593655935021d+01
1925  weights(192) = +9.636228624407483d+00
1926  weights(193) = -9.725446091755160d+00
1927  weights(194) = -1.073038410065271d+01
1928  weights(195) = +3.307432651804589d+01
1929  weights(196) = +4.034085904395413d+00
1930  weights(197) = -9.810609390827613d+00
1931  weights(198) = -2.766601290898564d-01
1932  weights(199) = +3.510300203085754d-01
1933  weights(200) = +1.014491046064515d+00
1934  weights(201) = +5.200540204542851d+00
1935  weights(202) = -3.134232057579029d+00
1936  weights(203) = -6.517084037664848d-01
1937  weights(204) = -6.206620154112724d+00
1938  weights(205) = +7.411089020403470d-01
1939  weights(206) = +8.152217520173741d+00
1940  weights(207) = -8.169010486013088d+00
1941  weights(208) = +3.973026872031141d+00
1942  weights(209) = +1.744179064918828d+00
1943  weights(210) = +2.132222676793543d+00
1944  weights(211) = -5.275392956221820d-01
1945  weights(212) = +3.690370896312323d+00
1946  weights(213) = +1.699680817600023d+00
1947  weights(214) = -6.167835914485500d-01
1948  weights(215) = +1.445966407109925d+00
1949  weights(216) = -1.253803734578848d+01
1950  weights(217) = -9.486415329148892d+00
1951  weights(218) = +6.549396813130102d-01
1952  weights(219) = -1.101276533950899d+00
1953  weights(220) = -3.812019444246272d-01
1954  weights(221) = -1.061182413991577d+01
1955  weights(222) = -1.759128498553025d+00
1956  weights(223) = -1.826301395616294d+00
1957  weights(224) = -9.621099395743977d-01
1958  weights(225) = +2.979045409466201d+00
1959 c
1960  eni(1, 1) = +2.916666505496130d+00
1961  eni(2, 1) = +2.430555408671047d+00
1962  eni(3, 1) = +3.056768505446338d+00
1963  eni(4, 1) = +1.576576635626104d+00
1964  eni(5, 1) = +1.808785624991505d+00
1965  eni(6, 1) = +2.272727367508866d+00
1966  eni(7, 1) = +3.196347133311626d+00
1967  eni(8, 1) = +6.135846893712152d-01
1968  eni(9, 1) = +3.500000239866707d-01
1969  eni(10, 1) = +1.026851454476083d+00
1970  eni(11, 1) = +4.018183170908746d-01
1971  eni(12, 1) = +1.210724668339963d+00
1972  eni(13, 1) = +8.274231524586034d-01
1973  eni(14, 1) = +3.061734591274901d+00
1974  eni(1, 2) = -4.583322965902747d-03
1975  eni(2, 2) = -2.499998189095104d-02
1976  eni(3, 2) = +5.829694688633287d-02
1977  eni(4, 2) = -2.027028106426984d-02
1978  eni(5, 2) = -8.333333333333331d-02
1979  eni(6, 2) = +1.136362902411045d-02
1980  eni(7, 2) = +8.607305876264598d-02
1981  eni(8, 2) = +7.542257222280060d-01
1982  eni(9, 2) = +4.999999760133292d-01
1983  eni(10, 2) = -1.679962794177234d-01
1984  eni(11, 2) = +4.713700491382047d-01
1985  eni(12, 2) = -3.607165361370436d-01
1986  eni(13, 2) = +1.500000000000000d-01
1987  eni(14, 2) = +8.463068067056631d-02
1988 c
1989  ded(1, 1) = +2.412836464572860d+01
1990  ded(1, 2) = +2.010697043407341d+01
1991  ded(1, 3) = +2.528737001573727d+01
1992  ded(1, 4) = +1.304236047715435d+01
1993  ded(1, 5) = +1.496332852710679d+01
1994  ded(1, 6) = +1.880132492358869d+01
1995  ded(1, 7) = +2.644204574693174d+01
1996  ded(1, 8) = +5.075930038037198d+00
1997  ded(1, 9) = +2.895404115914737d+00
1998  ded(1, 10) = +8.494713497037681d+00
1999  ded(1, 11) = +3.324075226918151d+00
2000  ded(1, 12) = +1.001581985058532d+01
2001  ded(1, 13) = +6.844926391556546d+00
2002  ded(1, 14) = +2.532845237105892d+01
2003 c
2004  CALL normdiff( weights, conec, 225, dconecno, 392,
2005  & dconecmk, units, 29, inno, 14, outno, 1,
2006  & eni, ded, input, deriv)
2007 c
2008  END
dffnet_terra_land
subroutine dffnet_terra_land(input, deriv)
Definition: nnr_001.modl_Tau.f:810
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
ffnet_terra_land
subroutine ffnet_terra_land(input, output)
Definition: nnr_001.modl_Tau.f:45


ABOUT

Our Team

Contact Us

DATA

Get Started

Find Data

Use Data

TOOLS

SeaBASS

SeaDAS

Giovanni Data Visualizer

Worldview Mapping Interface

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