Skip to content

Commit

Permalink
Units for docs added
Browse files Browse the repository at this point in the history
  • Loading branch information
cspencerjones committed Jul 20, 2023
1 parent 67f4c91 commit 3425395
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions config_src/external/drifters/MOM_particles.F90
Original file line number Diff line number Diff line change
Expand Up @@ -21,10 +21,10 @@ subroutine particles_init(parts, Grid, Time, dt, u, v,h)
type(particles), pointer, intent(out) :: parts !< Container for all types and memory
type(ocean_grid_type), target, intent(in) :: Grid !< Grid type from parent model
type(time_type), intent(in) :: Time !< Time type from parent model
real, intent(in) :: dt !< particle timestep in seconds
real, dimension(:,:,:),intent(in) :: u !< Zonal velocity field
real, dimension(:,:,:),intent(in) :: v !< Meridional velocity field
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer
real, intent(in) :: dt !< particle timestep in seconds [s]
real, dimension(:,:,:),intent(in) :: u !< Zonal velocity field [m s-1]
real, dimension(:,:,:),intent(in) :: v !< Meridional velocity field [m s-1]
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer [m]
end subroutine particles_init

!> The main driver the steps updates particles
Expand All @@ -45,7 +45,7 @@ end subroutine particles_run
subroutine particles_save_restart(parts, h, temp, salt)
! Arguments
type(particles), pointer :: parts !< Container for all types and memory
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer [m]
real, dimension(:,:,:), optional, intent(in) :: temp !< Optional container for temperature
real, dimension(:,:,:), optional, intent(in) :: salt !< Optional container for salinity

Expand All @@ -55,7 +55,7 @@ end subroutine particles_save_restart
subroutine particles_end(parts,h, temp, salt)
! Arguments
type(particles), pointer :: parts !< Container for all types and memory
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer
real, dimension(:,:,:),intent(in) :: h !< Thickness of each layer [m]
real, dimension(:,:,:), optional, intent(in) :: temp !< Optional container for temperature
real, dimension(:,:,:), optional, intent(in) :: salt !< Optional container for salinity

Expand All @@ -64,15 +64,15 @@ end subroutine particles_end
subroutine particles_to_k_space(parts,h)
! Arguments
type(particles), pointer :: parts !< Container for all types and memory
real, dimension(:,:,:),intent(in) :: h !< Thickness of layers
real, dimension(:,:,:),intent(in) :: h !< Thickness of layers [m]

end subroutine particles_to_k_space


subroutine particles_to_z_space(parts,h)
! Arguments
type(particles), pointer :: parts !< Container for all types and memory
real, dimension(:,:,:),intent(in) :: h !< Thickness of layers
real, dimension(:,:,:),intent(in) :: h !< Thickness of layers [m]

end subroutine particles_to_z_space

Expand Down

0 comments on commit 3425395

Please sign in to comment.