====== Sinfonia (in F) ======
===== Specification =====
import WikiScore
import Stave
import Abc
----------------------------------------------------------------------------------------------
--------------------- Sinfonia (in F) ---------------------------------------------------------
----------------------------------------------------------------------------------------------
-- Prj attributes
namespace = A "namespace" "almeida"
musicby = "Almeida, Francisco A. de (c.1702-?1755)"
title = A "title" "Sinfonia (in F)"
facsimile = A "facsimile" "http://digital.slub-dresden.de/werkansicht/dlf/15570/1/cache.off"
--libreto = A ""
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" "Francisco António de Almeida (c. 1702–1755?) was a Portuguese composer and organist. From 1722 to 1726 he was a royal scholar in Rome. He may have died in the Lisbon earthquake of 1755.\n\nTo obtain the current version of the whole score press button \8220Build\8221 at the bottom-right corner of the matrix below.\n"
-- Prj Parts
pt1 = Prt 1 "treble" "Oboe Primo" "Ob.I" (Mid "1" "68") []
pt2 = Prt 2 "treble" "Oboe Secondo" "Ob.II" (Mid "1" "68") []
pt3 = Prt 3 "treble" "Cornu di Caccia Primo [in F.]" "Cor.I" (Mid "1" "69") []
pt4 = Prt 4 "treble" "Cornu di Caccia Secondo [in F.]" "Cor.II" (Mid "1" "69") []
pt5 = Prt 5 "treble" "Violino Primo" "Vl.I" (Mid "1" "40") []
pt6 = Prt 6 "treble" "Violino Secondo" "Vl. II" (Mid "1" "40") []
pt7 = Prt 7 "alto" "Violetta" "Va" (Mid "1" "41") []
pt8 = Prt 8 "bass" "Basso" "B." (Mid "1" "42") []
-- Prj Stave
met = Sq [ pa [1,2] ]
mad = Sq [ pa [3,4] ]
str = Sq [ br [5,6], the 5, the 8 ]
base = [ Sq [ pa [1,2], pa [3,4], br [5,6], the 7, the 8 ] ]
-- Prj Sections
-- gurl n t = url (facfol n) t where facfol x = "http://purl.pt/16734/1/P"++x++".html"
status = A "status" "just started"
shiftedBy n k = gurl (show (n+k)) (show n)
gurl s t = url (facfol s) t
where facfol s = "http://digital.slub-dresden.de/fileadmin/data/319279286/319279286_tif/jpegs/319279286.pdf"++"#page="++s
-- Sections
s1= Sct "I. Allegro assai" 1
(Sel [1..8])
(MLK "2/4" "1/4" "F") [ A "fol." $ 1 `shiftedBy` 5, status ]
s2= Sct "II. Andante e piano sempre" 2
(Sel [5..9])
(MLK "12/8" "1/8" "Bb") [ A "fol." $ 1 `shiftedBy` 7, status ]
s3= Sct "III. Allegro" 3
(Sel [1..8])
(MLK "3/8" "1/8" "F") [ A "fol." $ 1 `shiftedBy` 7, status ]
-- the END
-- abbreviations
bss = 8
corn = [1,2]
obo = [3,4]
strings = [5..8]
prj = initWSPproject
"almeida"
musicby
[ title, facsimile, namespace, introd, latex ]
[ pt1 , pt2, pt3, pt4 , pt5 , pt6 , pt7 , pt8 ]
[ s1, s2, s3 ]
base
main = prj2jsonFile prj
-- checking invariants
ok = (matrixOk prj) && (riSP prj) && (riSS prj) && (matts prj)
|
[[almeida:index|Back to project index]]