Skip to content
Snippets Groups Projects
Commit e01a4e9a authored by Lionel GUEZ's avatar Lionel GUEZ
Browse files

Polish

parent f3b69082
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Inst_eddies/Tests/test_set_max_speed.f90
+ 1
− 2
View file @ e01a4e9a
...@@ -5,11 +5,10 @@ program test_set_max_speed ...@@ -5,11 +5,10 @@ program test_set_max_speed
! Libraries: ! Libraries:
use jumble, only: new_unit, count_lines, get_command_arg_dyn use jumble, only: new_unit, count_lines, get_command_arg_dyn, deg_to_rad
use netcdf, only: nf90_nowrite use netcdf, only: nf90_nowrite
use netcdf95, only: nf95_open, nf95_close, nf95_inq_varid, nf95_get_var, & use netcdf95, only: nf95_open, nf95_close, nf95_inq_varid, nf95_get_var, &
find_coord, nf95_inquire_dimension find_coord, nf95_inquire_dimension
use jumble, only: deg_to_rad
use derived_types, only: eddy, shpc use derived_types, only: eddy, shpc
use get_var_m, only: get_var use get_var_m, only: get_var
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment