%
' container
targetContainer = true
targetContainerHeadline = "Heriot-Watt welcomes new Bicentennial Research Leader, Professor Paul Fernandes"
targetContainerUrl = "/news-archive/2022/heriot-watt-welcomes-new-bicentennial.htm"
%>
<% splitKeywords = Split("Alumni and Development;Lyell Centre;Research;UK;External;Article;2022", ";")
splitCategoryKeywords = Split("Audience:Alumni and Development;Audience:Lyell Centre;Audience:Research;Campus:UK;News/events audience:External;PageType:Article;System:2022", ";")
bannedList = "Noticeboard*News*Article*External*2023*2022*2021*2020*2019"
whitelistKeywords = Array("Alumni and Development", "Athena Swan", "Business and Industry", "Conferences", "Graduate Apprenticeships", "Graduation", "Open Days", "Public Engagement", "Research")
whitelistTheme = Array("Brewing and Distilling", "Design thinking", "Earth and Marine", "Health and care", "Lyell Centre", "Mathematical and Computer Sciences", "National Robotarium", "Panmure House", "Social Inclusion", "Sustainability and Net Zero")
metaKeywords = ""
for each x in splitCategoryKeywords
tempCatKey = Split(x, ":")
tempCategory = tempCatKey(0)
tempKeyword = tempCatKey(1)
tempSchool = ""
tempResearch = ""
tempSubject = ""
' campus
if tempCategory = "Campus" then
funnelbackGscope = funnelbackGscope & "|" & "campus-" & LCase(Replace(tempKeyword, " ", ""))
' brand
elseif tempCategory = "School" then
if tempKeyword = "Edinburgh Business School" then
tempSchool = "ebs"
elseif tempKeyword = "Textiles and Design" then
tempSchool = "tex"
end if
if tempSchool <> "" then
funnelbackGscope = funnelbackGscope & "|" & "brand-" & tempSchool
end if
' research
elseif tempCategory = "Research Institute" then
funnelbackResearch = funnelbackResearch & "|" & tempKeyword
' subject
elseif tempCategory = "Subject" or tempCategory = "Subject area" then
funnelbackSubject = funnelbackSubject & "|" & tempKeyword
' generic
'elseif instr(bannedList, tempKeyword) = 0 then
else
for each z in whitelistKeywords
if tempKeyword = z or instr(tempKeyword, z) > 0 or instr(z, tempKeyword) > 0 then
dataKeywords = dataKeywords & "|" & z
%><%
exit for
end if
next
for each z in whitelistTheme
if tempKeyword = z or instr(tempKeyword, z) > 0 or instr(z, tempKeyword) > 0 then
dataKeywords = dataKeywords & "|" & z
%><%
exit for
end if
next
end if
next
if funnelbackGscope = "" then
funnelbackGscope = "campus-uk"
else
funnelbackGscope = Replace(funnelbackGscope, "Edinburgh Business School", "ebs")
funnelbackGscope = Replace(funnelbackGscope, "Textiles and Design", "tex")
end if
funnelbackGscope = funnelbackGscope & "|featured-article"
funnelbackKeywords = dataKeywords
useCreated = "2022-06-01"
useCreatedPretty = "1 Jun 2022"
if "" <> "" then
useCreated = ""
useCreatedPretty = Right("", 2) & " " & MonthName(CInt(Mid("", 6, 2)), true) & " " & Left("", 4)
end if %>
<%
newsWidth = 900
newsRatio = CInt("1200") / CInt("675")
newsHeight = CInt(newsWidth / newsRatio)
' /news-archive/2022/img/PaulFernandes.jpg
%>
Professor Paul Fernandes
Newly appointed Bicentennial Research Leader, Professor Paul Fernandes, has begun his new role at Heriot-Watt University today (1 June).
Based within the Lyell Centre for Earth & Marine Sciences and Technology, a strategic partnership between Heriot-Watt and the British Geological Survey, and one of University's flagship GRIs (Global Research Institutes), Paul has over 25 years' experience in marine biology, fisheries and marine technology, spanning the globe from Antarctica to the Arctic, the Mediterranean and northern Europe.
Previously at the University of Aberdeen, he set-up the FEAST (Fisheries Ecosystems and Advanced Survey Technologies) research group, which focuses on the sustainable management of marine resources and development of advanced underwater survey technologies, notably advanced underwater acoustics, visual surveys and geostatistics to study marine fauna.
Paul is a pioneer in the use of uncrewed vehicles to study fish distributions, and is the inventor of the Smartrawl (patent pending), a technological device to reduce the wasteful practice of discarding fish at sea.
He will bring these and several other exciting projects to Heriot-Watt, including those which straddle marine technology, engineering and autonomous systems, providing a link between the Lyell Centre and fellow GRI, the National Robotarium.
Paul said: “I am delighted to be joining Heriot-Watt University at this most exciting of times, particularly with the opening of the National Robotarium.
“The corresponding ambitions of the Lyell Centre, to develop marine technology and provide fantastic opportunities to develop new methods, instruments and facilities, with those of the National Robotarium – who are revolutionising the development of autonomous underwater systems and AI - can make a real difference in how we manage our activity in the oceans under environmental change.”
Biography
Paul Fernandes has a BSc and PhD in Marine Biology from the University of Liverpool's Port Erin Marine Laboratory.
Before joining Heriot-Watt, he was at the University of Aberdeen for 11 years and, prior to that, he worked at the Marine Laboratory Aberdeen (now Marine Scotland Science) for over 16 years. There he focused on fisheries surveys initially and, latterly, fish stock assessment, where he led the Sea Fisheries Group.
His early career consisted of stints in Ireland, setting up their fisheries acoustics programme, and in Bolivia working on the artisanal fisheries of Lake Titicaca.
Heriot-Watt Bicentennial Research Leaders
The Bicentennial Research Leaders (BRL) were created to celebrate the University's 200th anniversary and mark the institution's achievements in the creation and exchange of knowledge for the benefit of society.
100 outstanding research academics were to be recruited to strengthen and complement Heriot-Watt's existing world-leading research, raising capacity to advance science and work in collaboration with international business and industry. The BRLs will establish the future strategic direction of the University, and access a truly global research community that believes in inclusivity and opportunities for all.
<% if "Key info - Contact" = "Key info" then %>
<% ADname = ""
if ADname <> "" then %>
<%
if ADname <> "" then
Set oCon = Server.CreateObject("ADODB.Connection")
sUser = "cn=opentextuser,cn=Users,dc=hw,dc=ac,dc=uk"
sPassword = "Fr56+Mx"
oCon.Provider = "ADsDSOObject"
oCon.Open "ADProvider", sUser, sPassword
Set oCmd = Server.CreateObject("ADODB.Command")
Set oCmd.ActiveConnection = oCon
'sDomainADsPath = "LDAP://dc06.hw.ac.uk:389/DC=hw,DC=ac,DC=uk"
sDomainADsPath = "LDAP://LDAP-ED.hw.ac.uk:389/DC=hw,DC=ac,DC=uk"
sProperties = "givenName,SN,displayName,title,mail,telephoneNumber,facsimileTelephoneNumber,department,physicalDeliveryOfficeName,hwCampus"
oCmd.CommandText = "<" & sDomainADsPath & ">;(&(objectCategory=person)(objectClass=user)(sAMAccountName=" & ADname & "));" & sProperties & ";subtree"
oCmd.Properties("Page Size") = 100
Set rs = oCmd.Execute
While Not rs.EOF
fullName = rs("givenName") & " " & rs("SN")
displayName = rs("displayName")
email = rs("mail")
phone = rs("telephoneNumber")
jobTitle = rs("title")
department = rs("department")
roomNumber = rs("physicalDeliveryOfficeName")
campusName = rs("hwCampus")
rs.MoveNext
Wend
rs.Close
oCon.Close
Set rs = Nothing
Set oCon = Nothing
end if
%>
<% else
fullName = "Louise Jack"
email = "louise.jack@hw.ac.uk"
phone = ""
jobTitle = ""
end if
' international phone format
if phone <> "" then
if Left(phone,2) = "01" then
phone = Replace(phone,"01","+44 1")
end if
end if
' lower-case email
if email <> "" then
email = LCase(email)
end if
%>
<% if fullName <> "" then
if template = "course" then %>
<% end if
end if %>
<% else %>
<% end if %>
<%
' Force aside tag on main page
customFeatured = "yes"
%>
<%
function getRobots()
getRobots = "index"
end function
function getCanonical()
getCanonical = "https://www.hw.ac.uk/news-archive/2022/heriot-watt-welcomes-new-bicentennial.htm"
end function
function getPreload()
getPreload = ""
getPreload = ""
getPreload = ""
end function
function getMeta()
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
tempMeta = tempMeta & ""
if "" = "" then
tempMeta = tempMeta & ""
if "2022-06-01" <> "2022-09-02" then
tempMeta = tempMeta & ""
end if
else
tempMeta = tempMeta & ""
end if
tempMeta = tempMeta & tempKeywords
getMeta = tempMeta
end function
%>