function laske_ika(laji_in){
// funktio laske_ika laskee poikasen iän siiven pituuden perusteella
//
//   INPUTS:
//      laji_in    = linnun tieteellinen nimi esim 'Accipiter gentilis'
//                   laji voidaan antaa joko input-parametrina tai 
//                   html-sivun ikalaskuri nimisen lomakkeen laji-nimiseen 
//                   select-kentän avulla
//
//   OUTPUTS:
//	lopputulos = poikasen ikä vuorokausina
//                   fuktio palauttaa lopputuloksen html-sivun ikalaskuri nimisen 
//                   lomakkeen tulos-nimiseen input-kenttään
//laske_ika
//   © Pekka Suopajärvi & Matti Suopajärvi
//   Version 1.03, 27.07.2006, Pekka Suopajärvi 

//History:
//   Version  Date         Author             Description
//   1.03,    27.07.2006   Pekka Suopajärvi   Datan päivitys: Accgen, Faltin, Fichyp, Glapas, Parmaj, Perapi, Colpal
//   1.02,    26.07.2006   Pekka Suopajärvi   Datan päivitys: Falper, Surulu
//   1.01,    14.03.2006   Pekka Suopajärvi   Datan päivitys: Phopho, Parcae, Glapas, Fichyp
//   1.00,    23.03.2005   Pekka Suopajärvi   Ensimmäinen versio


try	{
	var valittu = document.ikalaskuri.laji.selectedIndex
	var laji = document.ikalaskuri.laji.options[valittu].text
	}

catch (e)
	{
	laji = laji_in;
	} 

switch(laji)
	{
	case 'Accipiter gentilis':
	var P4 = -0.0000000376217
	var P3 = 0.000023983
	var P2 = -0.00524302
	var P1 = 0.566169
	var P0 = -7.75742
	var Maxsiipi = 265
	var Minika = 0
	break

	case 'Aegolius funereus':
	var P4 = -0.000000364552
	var P3 = 0.000130567
	var P2 = -0.0154157
	var P1 = 0.87412
	var P0 = -5.55172
	var Maxsiipi = 130
	var Minika = 0
	break

	case 'Bubo bubo':
	var P4 = -0.00000000591487
	var P3 = 0.00000365639
	var P2 = -0.00099859
	var P1 = 0.283432
	var P0 = -4.34601
	var Maxsiipi = 260
	var Minika = 0
	break

	case 'Buteo buteo':
	var P4 = -0.0000000135542
	var P3 = 0.0000117913
	var P2 = -0.00334783
	var P1 = 0.477454
	var P0 = -8.06202
	var Maxsiipi = 260
	var Minika = 0
	break

	case 'Circus aeruginosus':
	var P4 = 0
	var P3 = 0
	var P2 = 0
	var P1 = 0.103069
	var P0 = 1.72108
	var Maxsiipi = 300
	var Minika = 13
	break

	case 'Circus cyaneus':
	var P4 = 0
	var P3 = 0
	var P2 = 0
	var P1 = 0.119066
	var P0 = 1.21829
	var Maxsiipi = 210
	var Minika = 14
	break

	case 'Columba palumbus':
	var P4 = 0
	var P3 = 0.00000702919
	var P2 = -0.00201154
	var P1 = 0.279564
	var P0 = -1.86079
	var Maxsiipi = 155
	var Minika = 0
	break

	case 'Falco tinnunculus':
	var P4 = -0.0000000504819
	var P3 = 0.0000294779
	var P2 = -0.00556232
	var P1 = 0.523472
	var P0 = -6.69208
	var Maxsiipi = 210
	var Minika = 0
	break

	case 'Falco peregrinus male':
	var P4 = -0.00000000569546
	var P3 = 0.0000058897
	var P2 = -0.00159037
	var P1 = 0.254918
	var P0 = -3.08348
	var Maxsiipi = 260
	var Minika = 3
	break

	case 'Falco peregrinus female':
	var P4 = 0.0000000096303
	var P3 = -0.00000397756
	var P2 = 0.000383417
	var P1 = 0.103282
	var P0 = -0.0795563
	var Maxsiipi = 300
	var Minika = 3
	break

	case 'Ficedula hypoleuca':
	var P4 = -0.000000302111
	var P3 = 0.000196932
	var P2 = -0.0179954
	var P1 = 0.764768
	var P0 = -3.5889
	var Maxsiipi = 60
	var Minika = 0
	break

	case 'Glaucidium passerinum':
	var P4 = -0.00000207003
	var P3 = 0.000504266
	var P2 = -0.0413002
	var P1 = 1.58442
	var P0 = -12.7526
	var Maxsiipi = 90
	var Minika = 0
	break

	case 'Parus caeruleus':
	var P4 = -0.0000082874444
	var P3 = 0.001262771668
	var P2 = -0.0643975888
	var P1 = 1.53325576
	var P0 = -5.99750222
	var Maxsiipi = 60
	var Minika = 0
	break

	case 'Parus major':
	var P4 = -0.00000439629
	var P3 = 0.000850547
	var P2 = -0.0518542
	var P1 = 1.4198
	var P0 = -5.97227
	var Maxsiipi = 60
	var Minika = 0
	break

	case 'Pernis apivorus':
	var P4 = 0.00000000184174
	var P3 = 0.0000012419
	var P2 = -0.000876956
	var P1 = 0.229093
	var P0 = 0
	var Maxsiipi = 300
	var Minika = 0
	break

	case 'Phoenicurus phoenicurus':
	var P4 = -0.00000515718425
	var P3 = 0.00076924796
	var P2 = -0.03922528868
	var P1 = 1.026700154
	var P0 = -4.826127
	var Maxsiipi = 60
	var Minika = 0
	break

	case 'Turdus philomelos':
	var P4 = 0
	var P3 = 0
	var P2 = 0
	var P1 = 0.1506
	var P0 = 1.32374
	var Maxsiipi = 70
	var Minika = 8
	break

	case 'Surnia ulula':
	var P4 = -0.0000000940989
	var P3 = 0.0000459771
	var P2 = -0.00746771
	var P1 = 0.605904
	var P0 = -5.75728
	var Maxsiipi = 190
	var Minika = 0
	break

	case 'Strix nebulosa':
	var P4 = -0.0000000588809
	var P3 = 0.0000365847
	var P2 = -0.0074878
	var P1 = 0.68951
	var P0 = -10.1965
	var Maxsiipi = 250
	var Minika = 0
	break
	}

var siipi = document.ikalaskuri.siipi.value
var ika = (P4 * Math.pow(siipi,4)) + (P3 * Math.pow(siipi,3)) + (P2 * Math.pow(siipi,2)) + (P1 * siipi) + P0
var Maxika = (P4 * Math.pow(Maxsiipi,4)) + (P3 * Math.pow(Maxsiipi,3)) + (P2 * Math.pow(Maxsiipi,2)) + (P1 * Maxsiipi) + P0

if (siipi > Maxsiipi) 
	{
	var lopputulos = '>' + Math.round(Maxika) + ' (' + Math.round(ika) + ')'
	}
else 
	{   
	if ( ika < Minika ) 
		{
		var lopputulos = '<' + Math.round(Minika) + ' (' + Math.round(ika) + ')'
      		}
	else 	{
		var lopputulos = Math.round(ika)
		}
	}

document.ikalaskuri.tulos.value = lopputulos;
}
// -----------------------------------------------------------