Module ModSize integer, parameter :: ithmx = 45 integer, parameter :: lonmx = 24 integer, parameter :: mmx = 10 integer, parameter :: nq = 132 integer, parameter :: nqs = 66 integer, parameter :: mxnmx = 11 integer, parameter :: mcoef = 121 integer, parameter :: ncoef = mcoef * 2 + 2 integer, parameter :: mrow = 44 integer, parameter :: kmx = 88 integer, parameter :: ithtrns = 17 end Module ModSize