* -*-fortran-*- integer nfMaxAlpha character*4 InMFA * common / MaxFlAlphaAPFEL / nfMaxAlpha,InMFA