attribute()

This function gets/sets the attributes of the graphical queue elements (GQEs).

#!/usr/bin/perl -w
use strict; 
use Spectra;

Spectra::delete(); 
Spectra::Gra_command( " create t1 0 10 100"); 
Spectra::cls(); 
print "\n";
print " x_max      = " . Spectra::attribute( name => "t1",
					     get => "x_max") . "\n";
Spectra::attribute( name => "t1",
                    x_max => 9.99);

print " x_max      = " . Spectra::attribute( name => "t1",
					     get => "x_max") . "\n";
print "---\n\n";