# 28-parabrinidae

Postscript("28-parabrinidae.ps",2,9)
latox=c(-6,6); latoy=c(0,54)
par(cex=0.4,bg="yellow")
Grafica(latox,latoy,cornice=T)
t=seq(-6,6,by=0.01)
for (k in 1:8) abline(h=6*k)
# Rettangoli(-7-1i,14,0.2,coloreri="red")
lines(52i+2.5*ParabrinaRotans(t))
text(-6+48.5i,"Parabrina rotans",pos=4)
lines(45i+1.5*ParabrinaTrichoptera(t))
text(-6+42.5i,"Parabrina trichoptera",pos=4)
lines(39i+1.5*ParabrinaMuscellaria(t))
text(-6+36.5i,"Parabrina muscellaria",pos=4)
lines(32.4i+1.5*ParabrinaComposita(t))
text(-6+30.5i,"Parabrina composita",pos=4)
lines(27i+1.2*ParabrinaNuclearis(t))
text(-6+24.5i,"Parabrina nuclearis",pos=4)
lines(21.2i+1.3*ParabrinaRediens(t))
text(-6+18.5i,"Parabrina rediens",pos=4)
lines(15i+1.3*ParabrinaFaceta(t))
text(-6+12.5i,"Parabrina faceta",pos=4)
lines(9i+1.2*ParabrinaOctonaria(t))
text(-6+6.5i,"Parabrina octonaria",pos=4)
lines(1i+2*ParabrinaFungina(t))
text(-6-1.5i,"Parabrina fungina",pos=4)
dev.off()