Create radet.f90

Main progrma