mswkt = '''VERT_CS["Flannan Isles height",VERT_DATUM["Flannan Isles",2005,AUTHORITY["EPSG","5146"]],UNIT["metre",1,AUTHORITY["EPSG","9001"]],AXIS["Gravity-related height",UP],AUTHORITY["EPSG","5748"]]'''
m = mapObj('')
m.setWKTProjection(mswkt)
lyr = layerObj(m)
lyr.setWKTProjection(mswkt)