====== Demetrio a Rodi ====== ===== Specification ===== import WikiScore import Stave import Abc ---------------------------------------------------------------------------------------------- --------------------- DEMETRIO A RODI --------------------------------------------------------- ---------------------------------------------------------------------------------------------- -- Prj attributes namespace = A "namespace" "demetrio" musicby = "Pugnani, Gaetano (1731-1798)" title = A "title" "Demetrio a Rodi" --facsimile = A "facsimile" "http://purl.pt/16734/1/P5.html" facsimile = A "facsimile" "http://www3.di.uminho.pt/~jno/WS/fcr-171_0000_capa-capa_t24-C-R0150.pdf" libreto = A "libreto" "http://books.google.pt/books?id=oQVEAAAAcAAJ&pg=PR8&lpg=PR8&dq=Demetrio+a+Rodi+Pugnani&source=bl&ots=PrQNLetc-s&sig=Rb3dK07KEIedQxcPpDV5mq18YcE&hl=en&ei=b9ciTvOwFI-7hAe7tICnAw&sa=X&oi=book_result&ct=result&redir_esc=y#v=onepage&q&f=false" latex = A "latex" "\n%%pageheight\t29.7cm\n%%pagewidth\t21cm\n%%topmargin\t3cm\n%%botmargin\t2cm\n%%leftmargin\t1cm\n%%rightmargin\t1cm\n%%gchordfont Times-Roman 14\n%%titlefont Times-Roman 30\n%%subtitlefont Times-Roman 20\n%%composerfont Times-Italics 16\n%%measurebox true\n%%measurenb\t0\n%%scale\t\t0.7\n%%begintext justify\nDEMETRIO // A RODI // FESTA PER MUSICA // DA RAPPRESENTARSI NEL REGIO TEATRO // DI TORINO // PER LE NOZZE DELLE LL. AA. RR. VITTORIO EMANUELE // DUCA D' AOSTA // E // MARIA TERESA // ARCIDUCHESSA D'AUSTRIA // L'ANNO MDCCLXXXIX. // IN TORINO // Presso Onorato Derossi Librajo della Societa // de' Signori Cavalieri.\n%%endtext\n\n" introd = A "Introduction" "Welcome to //Demetrio a Rodi//, a project of the **WikiScore** platform for cooperative edition of large scale scores using [[http://abcnotation.com/wiki/abc:standard:v2.1|ABC]] notation. This case study is the modern edition of an opera by Caetano Pugnani (1731-1798) [[http://en.wikipedia.org/wiki/Gaetano_Pugnani|(Wikipedia)]] [[http://en.wikisource.org/wiki/Page:A_Dictionary_of_Music_and_Musicians_vol_3.djvu/57|(Grove)]] whose manuscript can be found in the National Library ([[http://purl.pt/index/geral/PT/index.html|Biblioteca Nacional Digital]]) in Lisbon. This opera was performed in the marriage of [[http://en.wikipedia.org/wiki/Maria_Theresa_of_Austria-Este_%281773%E2%80%931832%29|Maria Theresa of Austria-Este]] with [[http://en.wikipedia.org/wiki/Victor_Emmanuel_I_of_Sardinia|Victor Emmanuel]] (future king Victor Emmanuel I) which took place on the 25th April 1789. The libretto (48p., entitled [[http://books.google.pt/books?id=H6OcHAAACAAJ&dq=inauthor:%22Giuseppe+Banti%22&hl=pt-pt&ei=brSbTdmIIIiEhQeT3qXTBg&sa=X&oi=book_result&ct=result&resnum=2&ved=0CCwQ6AEwAQ|Demetrio a Rodi: festa per musica da rappresentarsi nel Regio teatro di Torino per le nozze delle LL. AA. RR. Vittorio Emanuele]]) is by Giandomenico Boggio and Giuseppe Banti. It was published by //Presso O. Derossi//, 1789. A digital copy of this libretto can be found in the [[https://opacplus.bsb-muenchen.de/InfoGuideClient/singleHit.do?methodToCall=showHit&curPos=31&identifier=-1_FT_1521600090&tab=showWeblinksActive|Public Bayerische Staatsbibliothek]]. **About the manuscript score:** The manuscript score is part of the music collection of the House of Marqueses de Borba, known as [[http://pt.wikipedia.org/wiki/Conde_de_Redondo|Conde de Redondo]] fund. This collection includes around 2600 specimen, essentially manuscript (often autograph) scores by more than 200 composers, mostly Portuguese.\n" -- Prj Parts pt1 = Prt 1 "alto" "Corno in D (Re) I" "Cor.I" (Mid "1" "69") [] pt2 = Prt 2 "alto" "Corno in D (Re) II" "Cor. II" (Mid "1" "69") [] pt3 = Prt 3 "treble" "Tromba I" "Trb. I" (Mid "1" "56") [] pt4 = Prt 4 "treble" "Tromba II" "Trb.II" (Mid "1" "56") [] pt5 = Prt 5 "treble" "Flauta I" "Fl.I" (Mid "1" "73") [] pt6 = Prt 6 "treble" "Flauta II" "Fl.II" (Mid "1" "73") [] pt7 = Prt 7 "treble" "Clarinete I (in A)" "Cl. I" (Mid "1" "71") [] pt8 = Prt 8 "treble" "Clarinete II (in A)" "Cl.II" (Mid "1" "71") [] pt9 = Prt 9 "treble" "Oboe I" "Ob.I" (Mid "1" "68") [] pt10 = Prt 10 "treble" "Oboe II" "Ob.II" (Mid "1" "68") [] pt11 = Prt 11 "treble" "Violini I" "Vl.I" (Mid "1" "40") [] pt12 = Prt 12 "treble" "Violini II" "Vl. II" (Mid "1" "40") [] pt13 = Prt 13 "alto" "Viole" "Ve" (Mid "1" "41") [] pt14 = Prt 14 "bass" "[Basso]" "B." (Mid "1" "42") [] pt15 = Prt 15 "alto1" "Canto" "C." Unspec [] pt16 = Prt 16 "alto" "Alto" "A." Unspec [] pt17 = Prt 17 "tenor" "Tenore" "T." Unspec [] pt18 = Prt 18 "bass" "Basso" "B." Unspec [] pt19 = Prt 19 "tenor" "Demetrio" "Dem." Unspec [] pt20 = Prt 20 "alto1" "Euridice" "Eur." Unspec [] pt21 = Prt 21 "alto1" "Eumene" "Eum." Unspec [] pt22 = Prt 22 "alto1" "Emirena" "Emi." Unspec [] pt23 = Prt 23 "tenor" "Detti" "De." Unspec [] pt24 = Prt 24 "alto1" "Antandro" "Ant." Unspec [] pt25 = Prt 25 "alto1" "Apolline" "Apo." Unspec [] pt26 = Prt 26 "treble" "Arpa" "Ar." (Mid "1" "46") [] pt27 = Prt 27 "bass" "" "" (Mid "1" "46") [A "obs" "bass of 26"] pt28 = Prt 28 "bass" "Timpani" "Ti." (Mid "1" "47") [] -- Prj Stave met = Sq [ pa [1,2], pa [3,4] ] mad = Sq [ pa [5,6], pa [7,8], pa [9,10] ] str = Sq [ br [11,12], the 13 ] coro = sq [15,16,17,18] pers = sq [20,21,22,24,25,19,23] bass = Sq [ br [26,27], the 14 ] -- old base = [ met, mad, the 28, str, pers, coro, bass ] base = [ Sq [ pa [1,2], pa [3,4], pa [5,6], pa [7,8], pa [9,10], the 28, br [11,12], the 13, coro, pers, br [26,27], the 14 ] ] -- dparts = mflatten base -- Prj Sections -- gurl n t = url (facfol n) t where facfol x = "http://purl.pt/16734/1/P"++x++".html" status = A "status" "under edition" shiftedBy n k = gurl (show (n+k)) (show n) gurl s t = url (facfol s) t where facfol s = "http://www3.di.uminho.pt/~jno/WS/fcr-171_0000_capa-capa_t24-C-R0150.pdf"++"#page="++s -- Sections s1= Sct "Overtura" 1 (Sel [1..18]) (MLK "C" "1/4" "D") [ A "fol." $ 1 `shiftedBy` 5, status ] s2= Sct "Demetrio ed Euridice" 2 (Sel [19,20,bss]) (MLK "C" "1/4" "C") [ A "scene" "Scena I", A "fol." $ 41 `shiftedBy` 7, status ] s3= Sct "Marcia" 3 (Sel $ trom++corn++obo++strings) (MLK "2/4" "1/4" "D") [ A "marcia" "[Marcia]", A "fol." $ 44 `shiftedBy` 7, status ] s4= Sct "Demetrio ed Euridice" 4 (Sel [19,20,bss]) Free [ A "scene" "Scena I (cont.)", A "fol." $ 48 `shiftedBy` 7, status ] s5= Sct "Eumene, e Detti, poi Emirena" 5 (Sel $ [eum,det,emi,bss]) Free [ A "scene" "Scena II", A "fol." $ 49 `shiftedBy` 7, status ] s6= Sct "Aria Euridice" 6 (Sel $ [1,2,7,8,9,10]++strings++[eur]) (MLK "4/4" "1/4" "Bb") [ A "aria" "Aria Euridice", A "fol." $ 53 `shiftedBy` 8, status ] s7= Sct "Scena 3.a [Demetrio, Emirena, Eumene]" 7 (Sel $ [dem,eum,emi,bss]) Free [ A "scene" "Scena 3.a Demetrio, Emirena, Eumene", A "fol." $ 77 `shiftedBy` 8, status ] s8= Sct "Emirena, Eumene" 8 (Sel $ [eum,emi,bss]) Free [ A "scene" "Scena 4.a Emirena, Eumene", A "fol." $ 80 `shiftedBy` 9, status ] s9= Sct "Aria Emirena" 9 (Sel $ corn++obo++strings++[emi]) (MLK "4/4" "1/4" "C") [ A "aria" "Aria Emirena", A "fol." $ 82 `shiftedBy` 9, status ] s10= Sct "Antandro e Demetrio" 10 (Sel $ [ant,dem,bss]) Free [ A "scene" "Scena 5.a Antandro e Demetrio", A "fol." $ 101 `shiftedBy` 10, status ] s11= Sct "Aria Demetrio" 11 (Sel $ corn++obo++strings++[dem]) -- verificar (MLK "C" "1/4" "Bb") [ A "aria" "Aria Demetrio", A "fol." $ 107 `shiftedBy` 10, status ] s12= Sct "Scena Sesta" 12 (Sel $ corn++obo++strings++[ant]) (MLK "4/4" "1/4" "D") [ A "scene" "Scena Sesta", A "fol." $ 130 `shiftedBy` 11, status ] s13= Sct "Scena 7.a" 13 (Sel $ corn++obo++cla++strings++[eur,ant,dem,bss]) Free [ A "scene" "Scena Sesta", A "fol." $ 151 `shiftedBy` 12, status ] -- -- end of Act 1 -- s14= Sct "Scena prima [Eumene poi Emirena]" 14 (Sel $ [eum,emi,bss]) Free [ A "scene" "Scena prima", A "fol." "191", status ] s15= Sct "Eumene" 15 (Sel $ trom++obo++strings++[eum]) (MLK "C" "1/4" "D") [ A "aria" "Eumene", A "fol." "194", status ] s16= Sct "Scena 2.a [Emirena poi Demetrio]" 16 (Sel $ [emi,dem,bss]) Free [ A "scene" "Scena 2.a - Emirena poi Demetrio", A "fol." "214", status ] s17= Sct "Scena 3.a [Emirena poi Euridice]" 17 (Sel $ [emi,eur,bss]) Free [ A "scene" "Scena 3.a - Emirena poi Euridice", A "fol." "215", status ] s18= Sct "Scena 4.a" 18 -- includes the Rondo (Sel $ corn++obo++strings++[eur,ant,bss]) Free [ A "scene" "Scena 4.a - Euridice poi Antandro", A "fol." "216", status ] --------- FALTA CENA 5a fol.237 -------------------------- s19= Sct "Scena 5.a [Euridice]" 19 (Sel $ corn++obo++strings++[eur]) (MLK "C" "1/4" "Eb") [ A "scene" "Scena 5.a", A "fol." "237", status ] ---------------------------------------------------------- s20= Sct "Cavatina" 20 (Sel $ 7:14:eur:hrp) (MLK "2/4" "1/4" "Bb") [ A "section" "Cavatina - Euridice", A "fol." "243", status ] s21= Sct "Coro" 21 (Sel $ corn++fla++strings++cho) (MLK "2/4" "1/4" "C") [ A "section" "Coro", A "fol." "248", status ] s22= Sct "Andante [Euridice]" 22 (Sel $ 11:12:eur:bss:hrp) (MLK "3/4" "1/4" "Eb") [ A "section" "Euridice", A "fol." "255", status ] s23= Sct "Coro" 23 (Sel $ corn++strings++cho) (MLK "3/8" "1/8" "Cm") [ A "coro" "Coro", A "fol." "257", status ] s24= Sct "[Euridice]" 24 (Sel $ eur:corn++obo++strings) (MLK "4/4" "1/4" "Eb") [ A "recit" "Euridice", A "fol." "259", status ] s25= Sct "Aria Euridice" 25 (Sel $ eur:corn++obo++strings) (MLK "4/4" "1/4" "A") [ A "aria" "Aria Euridice", A "fol." "263", status ] s26= Sct "Scena 6.a [Aria Emirena]" 26 (Sel $ emi:corn++obo++strings) (MLK "4/4" "1/4" "Eb") [ A "aria" "Emirena", A "fol." "287", status ] s27= Sct "Scena 7.a Antandro poi Demetrio" 27 (Sel $ ant:dem:bss:[]) Free [ A "scene" "Scena 7.a Antandro poi Demetrio", A "fol." "304", status ] s28= Sct "Scena 8.a" 28 (Sel $ eur:ant:bss:[]) Free [ A "scene" "Scena 8.a", A "fol." "306", status ] s29= Sct "[Demetrio]" 29 (Sel $ dem:strings++obo++corn) Free [ A "aria" "[Demetrio]", A "fol." "307", status ] s30= Sct "Scena 9.a - Euridice ed Antandro" 30 (Sel $ eur:ant:[bss]) Free [ A "scene" "Scena 9.a - Euridice ed Antandro", A "fol." "323", status ] s31= Sct "Scena 10.a - Antandro ed Emirena" 31 (Sel $ emi:ant:corn++obo++strings) (MLK "2/4" "1/4" "Bb") [ A "scene" "Scena 10.a - Antandro ed Emirena", A "fol." "324", status ] s32= Sct "Scena Undecima - Emirena poi Eumene" 32 (Sel $ emi:eum:[bss]) Free [ A "scene" "Scena Undecima - Emirena poi Eumene", A "fol." "333", status ] s33= Sct "Marcia" 33 (Sel $ trom++corn++obo++[tim]++strings) (MLK "2/4" "1/4" "D") [ A "march" "Marcia", A "fol." "334", status ] s34= Sct "Coro" 34 (Sel $ corn++obo++cla++strings++cho) (MLK "C" "1/4" "E") [ A "coro" "Coro", A "fol." "337", status ] s35= Sct "[Demetrio, Antandro]" 35 (Sel $ 5:dem:ant:corn++obo++strings) -- 5 = Flauta solo Free [ A "section" "[Demetrio, Antandro]", A "fol." "348", status ] s36= Sct "Scena ultima [Aria Apolline]" 36 (Sel $ apo:tim:fla++corn++trom++obo++strings) (MLK "C" "1/4" "C") [ A "scene" "Scena ultima [Aria Apolline]", A "fol." "352", status ] s37= Sct "Scena ultima [Aria Demetrio]" 37 (Sel $ dem:corn++obo++strings) (MLK "4/4" "1/4" "C") [ A "scene" "Scena ultima [Aria Demetrio]", A "fol." "371", status ] s38= Sct "Rondo [Euridice]" 38 (Sel $ eur:corn++obo++strings) (MLK "4/4" "1/4" "D") [ A "scene" "Rondo [Euridice]", A "fol." "375", status ] s39= Sct "[Demetrio]" 39 (Sel $ dem:bss:[]) Free [ A "scene" "[Demetrio]", A "fol." "395", status ] s40= Sct "Coro [Antandro, Demetrio, Euridice, Emirena, Eumene]" 40 (Sel $ ant:dem:eur:emi:eum:corn++trom++cla++obo++strings++cho) (MLK "4/4" "1/4" "D") [ A "coro" "Coro [Antandro, Demetrio, Euridice, Emirena, Eumene]", A "fol." "396", status ] --- NB: esta 41 juntou à 40 --------------------- s41= Sct "[To be removed]" 41 (Sel $ ant:dem:eur:emi:eum:corn++obo++strings) (MLK "C" "1/4" "D") [ A "scene" "[to be removed]", A "fol." "402", status ] --- 41 vai desaparecer -------------------------- -- the END -- abbreviations ant = 24 apo = 25 bss = 14 cho = [15..18] corn = [1,2] cla = [7,8] dem = 19 det = 23 emi = 22 eum = 21 eur = 20 hrp = [26..27] fla = [5..6] obo = [9,10] strings = [11..14] trom=[3,4] tim=28 prj = initWSPproject "demetrio" musicby [ title, facsimile, libreto, namespace, introd, latex ] [ pt1 , pt10 , pt11 , pt12 , pt13 , pt14 , pt15 , pt16 , pt2 , pt3 , pt4 , pt5 , pt6 , pt7 , pt8 , pt9, pt17, pt18, pt19, pt20, pt21, pt22, pt23 , pt24 , pt25, pt26, pt27, pt28 ] (act1++act2) base where act1 = [ s1, s5, s3, s4 , s2, s6, s7, s8, s9 , s10, s11, s12, s13 ] act2 = [ s14, s15, s16, s17, s18, s19, s20, s21, s22, s23, s24, s25, s26, s27, s28, s29, s30, s31, s32, s33, s34, s35, s36, s37, s38, s39, s40, s41 ] main = prj2jsonFile prj -- checking invariants ok = (matrixOk prj) && (riSP prj) && (riSS prj) && (matts prj) --introd = A "Introduction" "Welcome to //Demetrio a Rodi//, a project of the **WikiScore** platform for cooperative edition of large scale scores using [[http://abcnotation.com/wiki/abc:standard:v2.1|ABC]] notation. This case study is the modern edition of an opera by Caetano Pugnani (1731-1798) [[http://en.wikipedia.org/wiki/Gaetano_Pugnani|(Wikipedia)]] [[http://en.wikisource.org/wiki/Page:A_Dictionary_of_Music_and_Musicians_vol_3.djvu/57|(Grove)]] whose manuscript can be found in the National Library ([[http://purl.pt/index/geral/PT/index.html|Biblioteca Nacional Digital]]) in Lisbon. The libretto (48p., entitled [[http://books.google.pt/books?id=H6OcHAAACAAJ&dq=inauthor:%22Giuseppe+Banti%22&hl=pt-pt&ei=brSbTdmIIIiEhQeT3qXTBg&sa=X&oi=book_result&ct=result&resnum=2&ved=0CCwQ6AEwAQ|Demetrio a Rodi: festa per musica da rappresentarsi nel Regio teatro di Torino per le nozze delle LL. AA. RR. Vittorio Emanuele]]) is by Giandomenico Boggio and Giuseppe Banti. It was published by //Presso O. Derossi//, 1789. A digital copy of this libretto can be found in the [[https://opacplus.bsb-muenchen.de/InfoGuideClient/singleHit.do?methodToCall=showHit&curPos=31&identifier=-1_FT_1521600090&tab=showWeblinksActive|Public Bayerische Staatsbibliothek]]. **About the manuscript score:** The manuscript score is part of the music collection of the House of Marqueses de Borba, known as [[http://pt.wikipedia.org/wiki/Conde_de_Redondo|Conde de Redondo]] fund. This collection includes around 2600 specimen, essentially manuscript (often autograph) scores by more than 200 composers, mostly Portuguese.\n" | [[demetrio:index|Back to project index]]