Update circle-simple.f90