\n", $k);
printf("
Series %d\n Choose sourcegroup and source
\n ", $k);
// printf("\n", $k);
printf(" \n");
// printf(" \n");
// printf(" \n");
printf("Source group: \n");
$gr= sprintf("gruppe%d", $k);
$kildef = sprintf("kildefil%d", $k);
printf(" \n", $gr, $gr, $k, $k);
// if($k>1) genOptionh("blank", "Choose group", $gr);
genOptionh("surface", "Surface observations", $gr);
genOptionh("satellite", "Satellite obs.", $gr);
genOptionh("balloon", "Weather balloon", $gr);
genOptionh("sealevel", "Sea level", $gr);
genOptionh("energy", "Energy data", $gr);
genOptionh("pollution", "World Bank dev. ind.", $gr);
genOptionh("otherc", "Other climate stuff", $gr);
genOptionh("uscpollution","City pollution (stations)", $gr);
genOptionh("cerestoa", "Ceres TOA", $gr);
printf(" \n");
printf(" \n");
printf("Source: ");
$kilde= sprintf("source%d", $k);
$llenke = minLenkeF($sfile[$k]);
// printf("XXX %s YYY %s k=%s\n", $llenke, $sfile[$k], $k);
printf(" \n", $k, $k, $k);
for($m=0; $m<= constant('ANTKIL'); $m++){
genOptionh($sfile[$m], $flabel[$m], $kildef);
}
printf(" \n");
printf(" \n");
printf("Region: \n");
printf(" Choose geographical region \n
\n", $k, $k);
printf(" \n");
$op = sprintf("region%s", $k);
printf("\n", $op, $op);
// $mt = microtime(true);
$reg = sprintf("region%d", $k);
for($m=0; $m<= constant('ANTREG'); $m++){
// index2: genOptionh($sreg[$m], "Choose source group", $reg);
genOptionh($sreg[$m], "reg", $reg);
}
for($m=0; $m<= constant('ANTLAND'); $m++){
genOptionh($slandNr[$m], "wld", $reg);
}
// $mt2 = microtime(true);
// printf("microtime = %s mt2=%s diff=%s \n ", $mt, $mt2, $mt2-$mt);
printf(" \n");
printf(" Operation Value \n");
// printf(" %s \n", $label);
} // genOption
?>
%s\n", $label);
} // genOption
function genRadTF($ind1){ //to and from
printf("From: \n");
$from = sprintf("fromval%d", $ind1);
$to = sprintf("toval%d", $ind1);
printf(" \n");
printf("To:\n");
printf("
\n \n");
printf(" \n");
printf("Operation\n");
printf(" You may choose one or two operations to process the data, \n
\n");
printf(" \n");
printf("Value\n");
printf(" All operations except 'Decadal mean' require a value. Specify the number of months, or a multiplier for 'Scale', \n
\n");
printf(" \n");
//Tooltip on scrolldown commented out. Better to have a longer on the header?
//printf(" \n");
// printf(" \n", $ind1, $ind2, $ind1, $ind2, $ind1, $ind2);
printf(" \n", $ind1, $ind2, $ind1, $ind2, $ind1, $ind2, $ind1, $ind2);
genOption("-", "-", $ind1, $ind2);
genOption("mean", "Moving average", $ind1, $ind2);
genOption("blackman", "Low-pass filter", $ind1, $ind2);
genOption("stepwisemean", "Stepwise mean", $ind1, $ind2);
genOption("decadalmean", "Decadal mean", $ind1, $ind2);
genOption("scale", "Scale", $ind1, $ind2);
genOption("derivative", "Derivative", $ind1, $ind2);
printf(" \n");
// printf(" Choose operation \n
\n", $ind1, $ind2, $ind1, $ind2);
printf(" \n");
printf("\n");
$verdi = sprintf("value%d%d", $ind1, $ind2);
if (isset($_GET[$verdi])){
printf(" \n");
printf(" \n");
$nm = sprintf("%s%d", $navn, $ind);
printf(" \n");
$nm = sprintf("%s%d", $navn, $ind);
printf(" \n");
$nm = sprintf("%s%d", $navn, $ind);
printf(" \n");
$nm = sprintf("%s%d", $navn, $ind);
printf(" \n");
$nm = sprintf("%s%d", $navn, $ind);
printf(" \n");
$lc = sprintf("linecolor%d", $k);
//printf("Color:\n");
printf("Color \n");
printf(" Interactive controls: line color and linewidth, \n
\n");
printf("\n", $lc, $lc, $k);
/*
genOptionh("auto", "Auto", $k);
genOptionh("red", "Red", $k);
genOptionh("blue", "Blue", $k);
genOptionh("green", "Green", $k);
genOptionh("yellow", "Yellow",$k);
genOptionh("black", "Black", $k);
genOptionh("white", "White", $k);
printf(" \n");
//if(strcasecmp($_GET[$op], $verdi)==0) echo "selected='true'";
*/
$op = $lc;
printf(" Auto \n");
printf(" Blue \n");
printf(" Red \n");
printf(" Yellow \n");
printf(" Green \n");
printf(" Blueviolet \n");
printf(" Black \n");
printf(" Orange \n");
printf(" Brown \n");
printf(" Cyan \n");
printf(" Olive \n");
printf(" Grey \n");
printf(" Cornflowerblue \n");
printf(" \n");
$lw = sprintf("linewidth%d", $k);
if (isset($_GET[$lw])){
printf(" Width:
\n");
if ($k==1){
// plot graph
printf(" \n ");
printf("Delete \n ");
printf("Delete \n ");
}
printf(" \n");
} // sourceEnd
?>
To plot graph select\n");
printf(" Source group, Source and Region Then press 'Plot graph'
\n\n");
sourceEnd($k);
} // end for
?>
\n", $_GET['area']);
// printf("Top margin: