Create euler.f90