Adding F90 grid creation routine which takes in the grid height as an argument