single tag model gamma and dmat converted to FORTRAN