%BEGIN
%RECORDFORMATSPEC F2
%RECORDFORMAT F1(%INTEGER I,%RECORD(F2)%NAME R)
%RECORDFORMAT F2(%INTEGER J,%RECORD(F1)%NAME R)
%RECORD(F2) RR
%ENDOFPROGRAM