divixtotal cfd fortran