# 28-iperboliche

Postscript("28-iperboliche.ps",2,2)
latox=c(-4,4); latoy=c(-4,4)
par(cex=0.4,bg="yellow")
Grafica(latox,latoy,cornice=T)
x=seq(-4,4,by=0.01)
par(lwd=1)
lines(x,cosh(x))
text(-1.5+3i,"cosh",pos=4)
lines(x,tanh(x))
text(1.3+0.4i,"tanh",pos=4)
par(col="red", lwd=0.5)
lines(x,sinh(x))
par(col=1)
text(-1.7-3i,"sinh",pos=4)
dev.off()