How to Create a Calendar List in Modern SharePoint Online Site?

#Parameters
$SiteURL = "https://crescent.sharepoint.com"
$CalendarName = "Firm Events" 

Try { 
    #Connect to PnP Online
    Connect-PnPOnline -Url $SiteURL -Interactive
 
    #Get the File
    $Calenar = New-PnPList -Title $CalendarName -Template Events -ErrorAction Stop
    Write-host "Calendar List Added to the Site!" -f Green
    }
Catch {
    write-host -f Red "`tError:" $_.Exception.Message
}

#Load SharePoint CSOM Assemblies
Add-Type -Path "C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\16\ISAPI\Microsoft.SharePoint.Client.dll"
Add-Type -Path "C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\16\ISAPI\Microsoft.SharePoint.Client.Runtime.dll"

#Parameters
$SiteURL = "https://Crescent.sharepoint.com/sites/Events"
$CalendarName = "Firm Events"

Try {
    #Get Credentials to connect
    $Cred = Get-Credential
 
    #Setup the context
    $Ctx = New-Object Microsoft.SharePoint.Client.ClientContext($SiteURL)
    $Ctx.Credentials = New-Object Microsoft.SharePoint.Client.SharePointOnlineCredentials($Cred.UserName,$Cred.Password)

    #Create a Calendar
    $ListInfo = New-Object Microsoft.SharePoint.Client.ListCreationInformation
    $ListInfo.Title = $CalendarName
    $ListInfo.TemplateType = 106
    $List = $Ctx.web.Lists.Add($ListInfo)
    $List.Description = $ListTitle
    $List.Update()
    $Ctx.ExecuteQuery()

    Write-host "Calendar List Added to the Site!" -f Green
}
Catch {
    write-host -f Red "`tError:" $_.Exception.Message
}