char *
locate(char **itab, char *s)
{
for (;*itab;itab++) {
if (compvar(*itab, s, 1) == 0)
break;
}
return *itab;
}
int AMRreader::
GetBlockVariable( int bid, int vid, float* dat )
{
if( datbuf_==NULL ) {
if( readAMRdata()!=0 ) {
debug1 << "Failed to read in AMR data.\n";
return -1;
}
if( eos_->EOStype()==SesameEOS_type ) {
if( readAMRadditionData()!=0 ) {
debug1 << "Failed to read in AMR additional data.\n";
return -1;
}}
}
int ierr = compvar( vid, datbuf_+(5*blksz_*bid), dat, blksz_ );
if( ierr!=0 ) {
debug1 << "Failed to compute requested variable: " << vid << " .\n";
return ierr;
}
return 0;
}
int
compenv(const void *a, const void *b)
{
return compvar(*(char * const *)a, *(char * const *)b, 0);
}
