mswkt = '''VERT_CS["EVRF2007 height",VERT_DATUM["European Vertical Reference Frame 2007",2005,AUTHORITY["EPSG","5215"]],UNIT["metre",1,AUTHORITY["EPSG","9001"]],AXIS["Gravity-related height",UP],AUTHORITY["EPSG","5621"]]'''
m = mapObj('')
m.setWKTProjection(mswkt)
lyr = layerObj(m)
lyr.setWKTProjection(mswkt)