Not sure if these are typos, but there are a few lines that do nothing: In OGOPTI, the first line does nothing since MAX is immediately set to 0: ```fortran MAX = -1D10 MAX = 0D0 ``` and in OGCORR, a number is multiplied by 1: ```fortran SCA = VARMAX * 1D-0 ``` same issue in OGEXEC: ```fortran VARMAX = VARMAX * 10D-1 ```