void Multispectrum::setcurrentslicenoupdate(unsigned int index){
if (indexOK(index)) currspectrum=index;
//update(); //no update
}
void Tag::seta1(unsigned int index,char value){
if (indexOK(index)) charvector[index]=value;
else throw TagErr::bad_index();
}
Spectrum* Multispectrum::getspectrum(unsigned int index)const{
if (indexOK(index)) return dataset[index];
else return 0;
}
void Tag::setf8(unsigned int index,double value){
if (indexOK(index)) doublevector[index]=value;
else throw TagErr::bad_index();
}
void Tag::seti4(unsigned int index,long value){
if (indexOK(index)) intvector[index]=value;
else throw TagErr::bad_index();
}
double Tag::getreal(unsigned int index)const{
if (indexOK(index)) return doublevector[index];
else throw TagErr::bad_index();
}
char Tag::gettagchar(unsigned int index)const{
if (indexOK(index)) return charvector[index];
else throw TagErr::bad_index();
}
long Tag::getint(unsigned int index)const{
if (indexOK(index)) return intvector[index];
else throw TagErr::bad_index();
}