========================================================== COMPUTE BETA FUNCTIONS FOR CHROMATICITY ========================================================== subroutine betachr(deltap,betx,ax,qx,bety,ay,qy) COMMONS: common-initi.f common-mml-lattice.f SUBROUTINES USED: DYNMAP messages_n micromap-index Mon Jul 17 08:57:33 CEST 2017