Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Tree: b4648b73e6
Fetching contributors…

Cannot retrieve contributors at this time

17 lines (14 sloc) 0.486 kB
use v6;
class ABC::Chord {
has $.main-note;
has $.main-accidental;
has $.main-type;
has $.bass-note;
has $.bass-accidental;
method new($main-note, $main-accidental, $main-type, $bass-note, $bass-accidental) {
self.bless(*, :$main-note, :$main-accidental, :$main-type, :$bass-note, :$bass-accidental);
}
method Str() {
$.main-type ~ $.main-accidental ~ $.main-type ~ ($.bass-note ?? '/' ~ $.bass-note ~ $.bass-accidental !! "");
}
}
Jump to Line
Something went wrong with that request. Please try again.