ruby-marc-spec 0.1.0

data/rakelib/parser_specs/suite.rb

@@ -0,0 +1,91 @@
+require_relative 'formatter'
+require_relative 'test'
+
+module ParserSpecs
+  class Suite
+    include Formatter
+    include Comparable
+
+    attr_reader :description, :rule, :parse_method, :json_path
+
+    # rubocop:disable Metrics/ParameterLists
+    def initialize(description, rule, wild, parse_method, json_path, tests = {})
+      @description = normalize_description(description)
+      @rule = rule
+      @wild = wild
+      @parse_method = parse_method
+      @json_path = json_path
+      tests.each { |t| add_test(t) }
+    end
+    # rubocop:enable Metrics/ParameterLists
+
+    def wild?
+      @wild
+    end
+
+    def tests_by_group
+      @tests_by_group ||= {}
+    end
+
+    def each_test(&block)
+      return to_enum(:each_test) unless block_given?
+
+      tests_by_group.each_value { |tests| tests.each(&block) }
+    end
+
+    def add_test(t)
+      tests_for_group = (tests_by_group[t.group] ||= [])
+      return (tests_for_group << t) unless (existing = tests_for_group.find { |t1| t1.merge?(t) })
+
+      existing.merge(t)
+    end
+
+    def merge?(o)
+      return false unless o.class == self.class
+      raise ArgumentError, "Can't merge #{quote(description)} with self" if o.equal?(self)
+
+      o.description == description && o.parse_method == parse_method
+    end
+
+    def merge(o)
+      o.each_test { |t| add_test(t) }
+    end
+
+    # rubocop:disable Metrics/AbcSize, Metrics/CyclomaticComplexity
+    def <=>(other)
+      return unless other.class == self.class
+      return 0 if other.equal?(self)
+
+      order = description <=> other.description
+      return order if order != 0
+
+      order = parse_method <=> other.parse_method
+      return order if order != 0
+
+      order = tests.size <=> other.tests.size
+      return order if order != 0
+
+      tests.zip(other.tests).each do |t1, t2|
+        order = t1 <=> t2
+        return order if order != 0
+      end
+
+      0
+    end
+    # rubocop:enable Metrics/AbcSize, Metrics/CyclomaticComplexity
+
+    class << self
+      def from_ostruct(ostr, rule, wild, json_path)
+        parse_method = wild ? 'marc_spec' : rule
+        tests = ostr.tests.map { |t| Test.from_ostruct(t, parse_method, json_path) }
+        Suite.new(ostr.description, rule, wild, parse_method, json_path, tests)
+      end
+    end
+
+    private
+
+    def normalize_description(desc)
+      desc.sub(/^wild combination of /, 'marc_spec: ')
+    end
+  end
+end

data/rakelib/parser_specs/test.rb

@@ -0,0 +1,97 @@
+require_relative 'formatter'
+
+module ParserSpecs
+  class Test
+    include Formatter
+    include Comparable
+
+    GROUP_RE = /^(?<group>[^&]+) (?<detail>&& .*)$/.freeze
+
+    attr_reader :description
+    attr_reader :valid
+    attr_reader :parse_method
+    attr_reader :group
+    attr_reader :detail
+    attr_reader :json_path
+
+    def initialize(description, valid, parse_method, json_path, assertions = {})
+      @description = normalize_description(description)
+      @valid = valid
+      @parse_method = parse_method
+      @group, @detail = group_and_detail_from(@description)
+      @json_path = json_path
+      assertions.each { |d, v| add_assertion(d, v) }
+    end
+
+    def assertions
+      @assertions ||= {}
+    end
+
+    def rspec_assertions
+      assertions.map do |data, valid|
+        "expect(parser.#{parse_method}).#{valid ? 'to' : 'not_to'} parse(#{quote(data)}, trace: true, reporter: reporter)"
+      end
+    end
+
+    def add_assertion(data, valid)
+      raise ArgumentError, "#{quote(description)}: #{quote(data)}: #{valid} != #{self.valid}" if valid != self.valid
+
+      assertions[data] = valid
+    end
+
+    def merge?(o)
+      return false unless o.class == self.class
+      raise ArgumentError, "Can't merge #{quote(description)} with self" if o.equal?(self)
+
+      o.description == description && o.valid == valid && o.parse_method == parse_method
+    end
+
+    def merge(o)
+      o.assertions.each { |d, v| add_assertion(d, v) }
+    end
+
+    # rubocop:disable Metrics/AbcSize, Metrics/CyclomaticComplexity, Metrics/PerceivedComplexity
+    def <=>(other)
+      return unless other.class == self.class
+      return 0 if other.equal?(self)
+
+      order = description <=> other.description
+      return order if order != 0
+
+      order = valid <=> other.valid
+      return order if order != 0
+
+      order = parse_method <=> other.parse_method
+      return order if order != 0
+
+      order = assertions.size <=> other.assertions.size
+      return order if order != 0
+
+      assertions.keys.zip(other.assertions.keys).each do |d1, d2|
+        order = d1 <=> d2
+        return order if order != 0
+      end
+
+      0
+    end
+    # rubocop:enable Metrics/AbcSize, Metrics/CyclomaticComplexity, Metrics/PerceivedComplexity
+
+    class << self
+      def from_ostruct(ostr, parse_method, json_path)
+        Test.new(ostr.description, ostr.valid, parse_method, json_path, { ostr.data => ostr.valid })
+      end
+    end
+
+    private
+
+    def group_and_detail_from(desc)
+      return unless (match_data = GROUP_RE.match(desc))
+
+      [match_data[:group], match_data[:detail]]
+    end
+
+    def normalize_description(desc)
+      desc.sub(/^.* wild combination: /, '').to_s
+    end
+  end
+end

data/rakelib/parser_specs.rb

@@ -0,0 +1 @@
+Dir.glob(File.expand_path('parser_specs/*.rb', __dir__)).sort.each(&method(:require))

data/rakelib/rubocop.rake

@@ -0,0 +1,18 @@
+require 'rubocop'
+require 'rubocop/rake_task'
+
+desc 'Run rubocop with HTML output'
+RuboCop::RakeTask.new(:rubocop) do |cop|
+  output = ENV['RUBOCOP_OUTPUT'] || 'artifacts/rubocop/index.html'
+  puts "Writing RuboCop inspection report to #{output}"
+
+  cop.verbose = false
+  cop.formatters = ['html']
+  cop.options = ['--out', output]
+end
+
+desc 'Run RuboCop with auto-correct, and output results to console'
+task :ra do
+  # b/c we want console output, we can't just use `rubocop:auto_correct`
+  RuboCop::CLI.new.run(['--auto-correct'])
+end

data/rakelib/spec.rake

@@ -0,0 +1,27 @@
+require 'rspec/core/rake_task'
+require 'pathname'
+
+# TODO: generate comprehensive transform specs if possible
+namespace :spec do
+  specs_dir = File.expand_path('../spec', __dir__)
+  generated_specs_dir = 'generated'
+
+  desc "regenerates spec/#{generated_specs_dir} from MARCSpec-Test-Suite"
+  task :generate do
+    require_relative 'parser_specs'
+
+    in_dir = File.join(specs_dir, 'suite')
+    out_dir = File.join(specs_dir, generated_specs_dir)
+
+    ParserSpecs::Rule.all_from_json(in_dir).each do |rule|
+      rule.write_rspec_to(out_dir)
+    end
+
+    RuboCop::CLI.new.run([out_dir])
+  end
+end
+
+RSpec::Core::RakeTask.new do |task|
+  task.rspec_opts = %w[--color --format documentation --order default]
+  task.pattern = 'spec/**/*_spec.rb'
+end

data/ruby-marc-spec.gemspec

@@ -0,0 +1,42 @@
+File.expand_path('lib', __dir__).tap do |lib|
+  $LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+end
+
+ruby_version = begin
+  ruby_version_file = File.expand_path('.ruby-version', __dir__)
+  File.read(ruby_version_file).strip
+end
+
+require 'marc/spec/module_info'
+
+Gem::Specification.new do |spec|
+  spec.name = MARC::Spec::ModuleInfo::NAME
+  spec.author = MARC::Spec::ModuleInfo::AUTHOR
+  spec.email = MARC::Spec::ModuleInfo::AUTHOR_EMAIL
+  spec.summary = MARC::Spec::ModuleInfo::SUMMARY
+  spec.description = MARC::Spec::ModuleInfo::DESCRIPTION
+  spec.license = MARC::Spec::ModuleInfo::LICENSE
+  spec.version = MARC::Spec::ModuleInfo::VERSION
+  spec.homepage = MARC::Spec::ModuleInfo::HOMEPAGE
+
+  spec.files = `git ls-files -z`.split("\x0")
+  spec.require_paths = ['lib']
+
+  spec.required_ruby_version = ">= #{ruby_version}"
+
+  spec.add_dependency 'marc', '~> 1.1'
+  spec.add_dependency 'parslet', '~> 2.0'
+  spec.add_dependency 'typesafe_enum', '~> 0.3'
+
+  spec.add_development_dependency 'bundle-audit', '~> 0.1'
+  spec.add_development_dependency 'ci_reporter_rspec', '~> 1.0'
+  spec.add_development_dependency 'colorize', '~> 0.8'
+  spec.add_development_dependency 'dotenv', '~> 2.7'
+  spec.add_development_dependency 'irb', '~> 1.2' # workaroundfor https://github.com/bundler/bundler/issues/6929
+  spec.add_development_dependency 'listen', '>= 3.0.5', '< 3.2'
+  spec.add_development_dependency 'rake', '~> 13.0'
+  spec.add_development_dependency 'rspec', '~> 3.9'
+  spec.add_development_dependency 'rubocop', '~> 0.91.0'
+  spec.add_development_dependency 'simplecov', '~> 0.16.1'
+  spec.add_development_dependency 'simplecov-rcov', '~> 0.2'
+end

data/spec/.rubocop.yml

@@ -0,0 +1,46 @@
+inherit_from: ../.rubocop.yml
+
+AllCops:
+  # Exclude generated files
+  Exclude:
+    - 'suite/**/*'
+
+Style/ClassAndModuleChildren:
+  Enabled: false
+
+Style/ParallelAssignment:
+  Enabled: false
+
+Layout/LineLength:
+  Enabled: false
+
+Lint/UnderscorePrefixedVariableName:
+  Enabled: false
+
+Metrics/AbcSize:
+  Enabled: false
+
+Metrics/BlockLength:
+  Enabled: false
+
+Metrics/ClassLength:
+  Enabled: false
+
+Metrics/CyclomaticComplexity:
+  Enabled: false
+
+Metrics/ModuleLength:
+  Enabled: false
+
+Metrics/MethodLength:
+  Enabled: false
+
+Metrics/PerceivedComplexity:
+  Enabled: false
+
+############################################################
+# Added in Rubocop 0.89
+
+# Sometimes we're testing the operator
+Lint/BinaryOperatorWithIdenticalOperands:
+  Enabled: false

data/spec/README.md

@@ -0,0 +1,16 @@
+# suite
+
+The `suite` directory is a Git [submodule](https://git-scm.com/book/en/v2/Git-Tools-Submodules) cloned from
+[MARCspec/MARCspec-Test-Suite](https://github.com/MARCspec/MARCspec-Test-Suite). Specs in 
+[generated](generated) are generated based on the JSON in this suite via the
+[spec::generate](../rakelib/spec.rake) rake task.
+
+Note that after cloning this project for the first time you’ll need to initialize and pull
+the submodule:
+
+```sh
+git submodule init
+git submodule update
+```
+
+See the [Git submodule docs](https://git-scm.com/book/en/v2/Git-Tools-Submodules) for more information.

data/spec/data/b23161018-sru.xml

@@ -0,0 +1,182 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?><searchRetrieveResponse xmlns="http://www.loc.gov/zing/srw/">
+  <version>1.2</version>
+  <numberOfRecords>1</numberOfRecords>
+  <records>
+    <record>
+      <recordSchema>marcxml</recordSchema>
+      <recordPacking>xml</recordPacking>
+      <recordData>
+        <record xmlns="http://www.loc.gov/MARC21/slim">
+          <leader>01139njm a22002775a 4500</leader>
+          <controlfield tag="001">991033920629706532</controlfield>
+          <controlfield tag="005">20210907132140.0</controlfield>
+          <controlfield tag="007">cr |||||||||||</controlfield>
+          <controlfield tag="008">151210q19601969enk     o               d</controlfield>
+          <datafield ind1=" " ind2=" " tag="035">
+            <subfield code="a">(CUY)UCB-b23161018x-01ucs_ber</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="035">
+            <subfield code="a">(OCoLC)932121906</subfield>
+            <subfield code="9">ExL</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="035">
+            <subfield code="a">(EXLNZ-01UCS_NETWORK)9913574292606531</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="040">
+            <subfield code="a">CUY</subfield>
+            <subfield code="c">CUY</subfield>
+          </datafield>
+          <datafield ind1="1" ind2="0" tag="100">
+            <subfield code="a">MacLeod, Donald,</subfield>
+            <subfield code="d">1916-1982.</subfield>
+          </datafield>
+          <datafield ind1="1" ind2="0" tag="245">
+            <subfield code="a">Instructional tape</subfield>
+            <subfield code="h">[electronic resource] :</subfield>
+            <subfield code="b">piobareachd /</subfield>
+            <subfield code="c">Donald MacLeod.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="260">
+            <subfield code="a">[Britain :</subfield>
+            <subfield code="b">s.n.,</subfield>
+            <subfield code="c">196-?]</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="300">
+            <subfield code="a">20 streaming audio files.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="500">
+            <subfield code="a">Lessons and demonstrations in playing Scottish bagpipe music.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="500">
+            <subfield code="a">Reels 1 and 5, 7 in.; reel 1, 3 3/4 ips.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="500">
+            <subfield code="a">Includes table of contents (manuscript) in each container.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="533">
+            <subfield code="a">Electronic reproduction.</subfield>
+            <subfield code="b">San Francisco, Calif. :</subfield>
+            <subfield code="c">Digital Revolution,</subfield>
+            <subfield code="d">2014.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="534">
+            <subfield code="p">Original version:</subfield>
+            <subfield code="e">20 sound tape reels : analog, 7 1/2 ips ; 5-7 in.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="538">
+            <subfield code="a">System requirements: Streaming audio player and an internet connection.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="538">
+            <subfield code="a">Mode of access: World Wide Web.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="588">
+            <subfield code="a">Description based on sound recording record.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2="0" tag="650">
+            <subfield code="a">Pibrochs.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2="0" tag="650">
+            <subfield code="a">Music</subfield>
+            <subfield code="z">Scotland.</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="955">
+            <subfield code="a">20151210</subfield>
+            <subfield code="b">Music Audio Tapes MUSI_Project_Bib_Records.out.marc</subfield>
+            <subfield code="9">LOCAL</subfield>
+          </datafield>
+          <datafield ind1="4" ind2="0" tag="956">
+            <subfield code="z">Music Library Audio Tapes. Freely available for streaming.</subfield>
+            <subfield code="u">https://avplayer.lib.berkeley.edu/music/b23161018</subfield>
+            <subfield code="9">LOCAL</subfield>
+          </datafield>
+          <datafield ind1="0" ind2=" " tag="973">
+            <subfield code="a">Music Library audio tapes.</subfield>
+            <subfield code="5">CU</subfield>
+            <subfield code="9">LOCAL</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="996">
+            <subfield code="a">b23161018x</subfield>
+            <subfield code="b">Updated: 02-02-20</subfield>
+            <subfield code="c">Created: 12-10-15</subfield>
+            <subfield code="d">CatDate: 12-10-15</subfield>
+            <subfield code="9">LOCAL</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="998">
+            <subfield code="a">00:47:49</subfield>
+            <subfield code="t">reel 1, part 1</subfield>
+            <subfield code="g">C040790863_1.mp3</subfield>
+            <subfield code="a">00:23:29</subfield>
+            <subfield code="t">reel 2, part 1</subfield>
+            <subfield code="g">C040790960_1.mp3</subfield>
+            <subfield code="a">00:22:56</subfield>
+            <subfield code="t">reel 3, part 1</subfield>
+            <subfield code="g">C040791061_1.mp3</subfield>
+            <subfield code="a">00:21:46</subfield>
+            <subfield code="t">reel 4, part 1</subfield>
+            <subfield code="g">C040791168_1.mp3</subfield>
+            <subfield code="a">00:24:19</subfield>
+            <subfield code="t">reel 5, part 1</subfield>
+            <subfield code="g">C040790872_1.mp3</subfield>
+            <subfield code="a">00:24:18</subfield>
+            <subfield code="t">reel 6, part 1</subfield>
+            <subfield code="g">C040790979_1.mp3</subfield>
+            <subfield code="a">00:24:18</subfield>
+            <subfield code="t">reel 7, part 1</subfield>
+            <subfield code="g">C040791070_1.mp3</subfield>
+            <subfield code="a">00:23:23</subfield>
+            <subfield code="t">reel 8, part 1</subfield>
+            <subfield code="g">C040791177_1.mp3</subfield>
+            <subfield code="a">00:20:01</subfield>
+            <subfield code="t">reel 9, part 1</subfield>
+            <subfield code="g">C040790881_1.mp3</subfield>
+            <subfield code="a">00:22:38</subfield>
+            <subfield code="t">reel 10</subfield>
+            <subfield code="g">C040790988.mp3</subfield>
+            <subfield code="a">00:23:44</subfield>
+            <subfield code="t">reel 11</subfield>
+            <subfield code="g">C040791089.mp3</subfield>
+            <subfield code="a">00:22:27</subfield>
+            <subfield code="t">reel 12</subfield>
+            <subfield code="g">C040791186.mp3</subfield>
+            <subfield code="a">00:21:57</subfield>
+            <subfield code="t">reel 13, part 1</subfield>
+            <subfield code="g">C040790890_1.mp3</subfield>
+            <subfield code="a">00:44:28</subfield>
+            <subfield code="t">reel 14, part 1</subfield>
+            <subfield code="g">C040790997_1.mp3</subfield>
+            <subfield code="a">00:44:33</subfield>
+            <subfield code="t">reel 15, part 1</subfield>
+            <subfield code="g">C040791098_1.mp3</subfield>
+            <subfield code="a">00:44:01</subfield>
+            <subfield code="t">reel 16, part 1</subfield>
+            <subfield code="g">C040790906_1.mp3</subfield>
+            <subfield code="a">00:46:58</subfield>
+            <subfield code="t">reel 17, part 1</subfield>
+            <subfield code="g">C040791007_1.mp3</subfield>
+            <subfield code="a">00:42:49</subfield>
+            <subfield code="t">reel 18, part 1</subfield>
+            <subfield code="g">C040791104_1.mp3</subfield>
+            <subfield code="a">00:44:35</subfield>
+            <subfield code="t">reel 19, part 1</subfield>
+            <subfield code="g">C040791195_1.mp3</subfield>
+            <subfield code="a">00:40:12</subfield>
+            <subfield code="t">reel 20, part 1</subfield>
+            <subfield code="g">C040791201_1.mp3</subfield>
+            <subfield code="9">LOCAL</subfield>
+          </datafield>
+          <datafield ind1=" " ind2=" " tag="AVE">
+            <subfield code="8">531002912470006532</subfield>
+            <subfield code="e">Available</subfield>
+            <subfield code="n">Music Library Audio Tapes. Freely available for streaming.</subfield>
+          </datafield>
+        </record>
+      </recordData>
+      <recordIdentifier>991033920629706532</recordIdentifier>
+      <recordPosition>1</recordPosition>
+    </record>
+  </records>
+  <extraResponseData xmlns:xb="http://www.exlibris.com/repository/search/xmlbeans/">
+    <xb:exact>true</xb:exact>
+    <xb:responseDate>2021-09-23T13:14:41-0700</xb:responseDate>
+  </extraResponseData>
+</searchRetrieveResponse>

data/spec/data/sandburg.xml

@@ -0,0 +1,82 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!-- from https://www.loc.gov/standards/marcxml/Sandburg/sandburg.xml -->
+<collection xmlns="http://www.loc.gov/MARC21/slim">
+  <record>
+    <leader>01142cam  2200301 a 4500</leader>
+    <controlfield tag="001">   92005291 </controlfield>
+    <controlfield tag="003">DLC</controlfield>
+    <controlfield tag="005">19930521155141.9</controlfield>
+    <controlfield tag="008">920219s1993    caua   j      000 0 eng  </controlfield>
+    <datafield tag="010" ind1=" " ind2=" ">
+      <subfield code="a">   92005291 </subfield>
+    </datafield>
+    <datafield tag="020" ind1=" " ind2=" ">
+      <subfield code="a">0152038655 :</subfield>
+      <subfield code="c">$15.95</subfield>
+    </datafield>
+    <datafield tag="040" ind1=" " ind2=" ">
+      <subfield code="a">DLC</subfield>
+      <subfield code="c">DLC</subfield>
+      <subfield code="d">DLC</subfield>
+    </datafield>
+    <datafield tag="042" ind1=" " ind2=" ">
+      <subfield code="a">lcac</subfield>
+    </datafield>
+    <datafield tag="050" ind1="0" ind2="0">
+      <subfield code="a">PS3537.A618</subfield>
+      <subfield code="b">A88 1993</subfield>
+    </datafield>
+    <datafield tag="082" ind1="0" ind2="0">
+      <subfield code="a">811/.52</subfield>
+      <subfield code="2">20</subfield>
+    </datafield>
+    <datafield tag="100" ind1="1" ind2=" ">
+      <subfield code="a">Sandburg, Carl,</subfield>
+      <subfield code="d">1878-1967.</subfield>
+    </datafield>
+    <datafield tag="245" ind1="1" ind2="0">
+      <subfield code="a">Arithmetic /</subfield>
+      <subfield code="c">Carl Sandburg ; illustrated as an anamorphic adventure by Ted Rand.</subfield>
+    </datafield>
+    <datafield tag="250" ind1=" " ind2=" ">
+      <subfield code="a">1st ed.</subfield>
+    </datafield>
+    <datafield tag="260" ind1=" " ind2=" ">
+      <subfield code="a">San Diego :</subfield>
+      <subfield code="b">Harcourt Brace Jovanovich,</subfield>
+      <subfield code="c">c1993.</subfield>
+    </datafield>
+    <datafield tag="300" ind1=" " ind2=" ">
+      <subfield code="a">1 v. (unpaged) :</subfield>
+      <subfield code="b">ill. (some col.) ;</subfield>
+      <subfield code="c">26 cm.</subfield>
+    </datafield>
+    <datafield tag="500" ind1=" " ind2=" ">
+      <subfield code="a">One Mylar sheet included in pocket.</subfield>
+    </datafield>
+    <datafield tag="520" ind1=" " ind2=" ">
+      <subfield code="a">A poem about numbers and their characteristics. Features anamorphic, or distorted, drawings which can be restored to normal by viewing from a particular angle or by viewing the image's reflection in the provided Mylar cone.</subfield>
+    </datafield>
+    <datafield tag="650" ind1=" " ind2="0">
+      <subfield code="a">Arithmetic</subfield>
+      <subfield code="x">Juvenile poetry.</subfield>
+    </datafield>
+    <datafield tag="650" ind1=" " ind2="0">
+      <subfield code="a">Children's poetry, American.</subfield>
+    </datafield>
+    <datafield tag="650" ind1=" " ind2="1">
+      <subfield code="a">Arithmetic</subfield>
+      <subfield code="x">Poetry.</subfield>
+    </datafield>
+    <datafield tag="650" ind1=" " ind2="1">
+      <subfield code="a">American poetry.</subfield>
+    </datafield>
+    <datafield tag="650" ind1=" " ind2="1">
+      <subfield code="a">Visual perception.</subfield>
+    </datafield>
+    <datafield tag="700" ind1="1" ind2=" ">
+      <subfield code="a">Rand, Ted,</subfield>
+      <subfield code="e">ill.</subfield>
+    </datafield>
+  </record>
+</collection>