srecord Frequency(double frequency) {
  gettable double interval;
  
  double frequency() { ret frequency; }
  
  *(double *frequency) { interval = doubleRatio(1, frequency); }
  
  toString { ret frequency + " Hz"; }
}