{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -Wall -Werror #-}
module Network.AWS.Redshift.Internal
( getAccountId
) where
import Network.AWS.Prelude
getAccountId :: Region -> Maybe Text
getAccountId = \case
NorthVirginia -> Just "193672423079"
Ohio -> Just "391106570357"
NorthCalifornia -> Just "262260360010"
Oregon -> Just "902366379725"
Tokyo -> Just "404641285394"
Seoul -> Just "760740231472"
Mumbai -> Just "865932855811"
Singapore -> Just "361669875840"
Sydney -> Just "762762565011"
SaoPaulo -> Just "075028567923"
Frankfurt -> Just "053454850223"
Ireland -> Just "210876761215"
GovCloud -> Nothing
GovCloudFIPS -> Nothing
Beijing -> Nothing