basin_builder character(len=40) character(len=40) basin_builder::mdl mdl = "basin_builder" This module's name. basin_builder_topography subroutine, public subroutine, public basin_builder::basin_builder_topography (D, G, param_file, max_depth) basin_builder_topography D D G G param_file param_file max_depth max_depth Constructs idealized topography from simple functions. g The dynamic horizontal grid type d Ocean bottom depth in the units of depth_max param_file Parameter file structure max_depth Maximum ocean depth in arbitrary units circ_conic_ridge circ_scurve_ridge ew_coast mom_string_functions::lowercase mdl mom_error_handler::mom_error mom_error_handler::mom_mesg ns_coast ns_conic_ridge ns_scurve_ridge mom_fixed_initialization::mom_initialize_topography real function real function basin_builder::cone (x, x0, L, clip) cone x x x0 x0 L L clip clip Returns the value of a triangular function centered at x=x0 with value 1 and linearly decreasing to 0 at x=x0+/-L, and 0 otherwise. If clip is present the top of the cone is cut off at "clip", which effectively defaults to 1. x non-dimensional coordinate [nondim] x0 position of peak [nondim] l half-width of base of cone [nondim] clip clipping height of cone [nondim] circ_conic_ridge ns_conic_ridge real function real function basin_builder::scurve (x, x0, L) scurve x x x0 x0 L L Returns an s-curve s(x) s.t. s(x0)<=0, s(x0+L)>=1 and cubic in between. x non-dimensional coordinate [nondim] x0 position of peak [nondim] l half-width of base of cone [nondim] circ_scurve_ridge cstprof ns_scurve_ridge real function real function basin_builder::cstprof (x, x0, L, lf, bf, sf, sh) cstprof x x x0 x0 L L lf lf bf bf sf sf sh sh Returns a "coastal" profile. x non-dimensional coordinate [nondim] x0 position of peak [nondim] l width of profile [nondim] lf fraction of width that is "land" [nondim] bf fraction of width that is "beach" [nondim] sf fraction of width that is "continental slope" [nondim] sh depth of shelf as fraction of full depth [nondim] scurve ew_coast ns_coast real function real function basin_builder::dist_line_fixed_x (x, y, x0, y0, y1) dist_line_fixed_x x x y y x0 x0 y0 y0 y1 y1 Distance between points x,y and a line segment (x0,y0) and (x0,y1). x non-dimensional x-coordinate [nondim] y non-dimensional y-coordinate [nondim] x0 x-position of line segment [nondim] y0 y-position of line segment end[nondim] y1 y-position of line segment end[nondim] dist_line_fixed_y ns_coast ns_conic_ridge ns_scurve_ridge real function real function basin_builder::dist_line_fixed_y (x, y, x0, x1, y0) dist_line_fixed_y x x y y x0 x0 x1 x1 y0 y0 Distance between points x,y and a line segment (x0,y0) and (x1,y0). x non-dimensional x-coordinate [nondim] y non-dimensional y-coordinate [nondim] x0 x-position of line segment end[nondim] x1 x-position of line segment end[nondim] y0 y-position of line segment [nondim] dist_line_fixed_x ew_coast real function real function basin_builder::ns_coast (lon, lat, lonC, lat0, lat1, dlon, sh) ns_coast lon lon lat lat lonC lonC lat0 lat0 lat1 lat1 dlon dlon sh sh A "coast profile" applied in an N-S line from lonC,lat0 to lonC,lat1. lon Longitude [degrees_E] lat Latitude [degrees_N] lonc Longitude of coast [degrees_E] lat0 Latitude of coast end [degrees_N] lat1 Latitude of coast end [degrees_N] dlon "Radius" of coast profile [degrees] sh depth of shelf as fraction of full depth [nondim] cstprof dist_line_fixed_x basin_builder_topography real function real function basin_builder::ew_coast (lon, lat, latC, lon0, lon1, dlat, sh) ew_coast lon lon lat lat latC latC lon0 lon0 lon1 lon1 dlat dlat sh sh A "coast profile" applied in an E-W line from lon0,latC to lon1,latC. lon Longitude [degrees_E] lat Latitude [degrees_N] latc Latitude of coast [degrees_N] lon0 Longitude of coast end [degrees_E] lon1 Longitude of coast end [degrees_E] dlat "Radius" of coast profile [degrees] sh depth of shelf as fraction of full depth [nondim] cstprof dist_line_fixed_y basin_builder_topography real function real function basin_builder::ns_conic_ridge (lon, lat, lonC, lat0, lat1, dlon, rh) ns_conic_ridge lon lon lat lat lonC lonC lat0 lat0 lat1 lat1 dlon dlon rh rh A NS ridge with a cone profile. lon Longitude [degrees_E] lat Latitude [degrees_N] lonc Longitude of ridge center [degrees_E] lat0 Latitude of ridge end [degrees_N] lat1 Latitude of ridge end [degrees_N] dlon "Radius" of ridge profile [degrees] rh depth of ridge as fraction of full depth [nondim] cone dist_line_fixed_x basin_builder_topography real function real function basin_builder::ns_scurve_ridge (lon, lat, lonC, lat0, lat1, dlon, rh) ns_scurve_ridge lon lon lat lat lonC lonC lat0 lat0 lat1 lat1 dlon dlon rh rh A NS ridge with an scurve profile. lon Longitude [degrees_E] lat Latitude [degrees_N] lonc Longitude of ridge center [degrees_E] lat0 Latitude of ridge end [degrees_N] lat1 Latitude of ridge end [degrees_N] dlon "Radius" of ridge profile [degrees] rh depth of ridge as fraction of full depth [nondim] dist_line_fixed_x scurve basin_builder_topography real function real function basin_builder::circ_conic_ridge (lon, lat, lon0, lat0, ring_radius, ring_thickness, ridge_height) circ_conic_ridge lon lon lat lat lon0 lon0 lat0 lat0 ring_radius ring_radius ring_thickness ring_thickness ridge_height ridge_height A circular ridge with cutoff conic profile. lon Longitude [degrees_E] lat Latitude [degrees_N] lon0 Longitude of center of ring [degrees_E] lat0 Latitude of center of ring [degrees_N] ring_radius Radius of ring [degrees] ring_thickness Radial thickness of ring [degrees] ridge_height Ridge height as fraction of full depth [nondim] cone basin_builder_topography real function real function basin_builder::circ_scurve_ridge (lon, lat, lon0, lat0, ring_radius, ring_thickness, ridge_height) circ_scurve_ridge lon lon lat lat lon0 lon0 lat0 lat0 ring_radius ring_radius ring_thickness ring_thickness ridge_height ridge_height A circular ridge with cutoff scurve profile. lon Longitude [degrees_E] lat Latitude [degrees_N] lon0 Longitude of center of ring [degrees_E] lat0 Latitude of center of ring [degrees_N] ring_radius Radius of ring [degrees] ring_thickness Radial thickness of ring [degrees] ridge_height Ridge height as fraction of full depth [nondim] scurve basin_builder_topography An idealized topography building system.