format
The individual stations are availabe as section$stations[[1]] through
to section$stations[[7]], each of which is an object of type
ctd.source
This section is based on measurements made during
October of 2003 in Halifax Harbour
by students in the Introduction to Physical Oceanography class
at Dalhousie University, taught by Dan Kelley; supervision at sea
was provided by teaching assistant Natacha Bernier, at the time
a PhD student at Dalhousie.
Note the
alteration of two
station locations, to correct typographical errors
that were made at sea, perhaps by someone who was distracted by the boat motion.
library(oce)
p <- seq(0, 30, 2)
stn08 <- ctd.decimate(ctd.trim(read.ctd("BED0308.CNV")),p=p)
stn09 <- ctd.decimate(ctd.trim(read.ctd("BED0309.CNV")),p=p)
stn10 <- ctd.decimate(ctd.trim(read.ctd("BED0310.CNV")),p=p)
stn01 <- ctd.decimate(ctd.trim(read.ctd("BED0301.CNV")),p=p)
stn11 <- ctd.decimate(ctd.trim(read.ctd("BED0311.CNV")),p=p)
stn12 <- ctd.decimate(ctd.trim(read.ctd("BED0312.CNV")),p=p)
stn12$latitude <- 44 + 39.894 / 60
stn12 <- processing.log.append(stn12, "DEK change lat minutes from 39.394 to 39.894 (possible typo)")
stn13 <- ctd.decimate(ctd.trim(read.ctd("BED0313.CNV")),p=p)
stn15 <- ctd.decimate(ctd.trim(read.ctd("BED0315.CNV")),p=p)
stn15$latitude <- stn15$latitude + 1
stn15 <- processing.log.append(stn15, "DEK add 1 to latitude, correcting a typo")
section <- make.section(stn08, stn09, stn10, stn01, stn11, stn12, stn13, stn15)
The stations cover a 14 km region running from
station 308, near the Sackville River,
seaward to station 315, at the entrance to the general Harbour,
offshore of the lovely Point Pleasant Park.