diff --git a/tests/orog/ftst_find_poles.F90 b/tests/orog/ftst_find_poles.F90 index 3d98cb972..b0b9e953f 100644 --- a/tests/orog/ftst_find_poles.F90 +++ b/tests/orog/ftst_find_poles.F90 @@ -2,6 +2,9 @@ program ftst_find_poles ! Unit test for routine find_poles. ! +! Checks if a model tile contains a 'pole' +! point based on the latitude of each point. +! ! Author George Gayno NCEP/EMC use orog_utils, only : find_poles