R/route53_interfaces.R

Defines functions update_traffic_policy_instance_output update_traffic_policy_instance_input update_traffic_policy_comment_output update_traffic_policy_comment_input update_hosted_zone_comment_output update_hosted_zone_comment_input update_health_check_output update_health_check_input test_dns_answer_output test_dns_answer_input list_vpc_association_authorizations_output list_vpc_association_authorizations_input list_traffic_policy_versions_output list_traffic_policy_versions_input list_traffic_policy_instances_by_policy_output list_traffic_policy_instances_by_policy_input list_traffic_policy_instances_by_hosted_zone_output list_traffic_policy_instances_by_hosted_zone_input list_traffic_policy_instances_output list_traffic_policy_instances_input list_traffic_policies_output list_traffic_policies_input list_tags_for_resources_output list_tags_for_resources_input list_tags_for_resource_output list_tags_for_resource_input list_reusable_delegation_sets_output list_reusable_delegation_sets_input list_resource_record_sets_output list_resource_record_sets_input list_query_logging_configs_output list_query_logging_configs_input list_hosted_zones_by_vpc_output list_hosted_zones_by_vpc_input list_hosted_zones_by_name_output list_hosted_zones_by_name_input list_hosted_zones_output list_hosted_zones_input list_health_checks_output list_health_checks_input list_geo_locations_output list_geo_locations_input list_cidr_locations_output list_cidr_locations_input list_cidr_collections_output list_cidr_collections_input list_cidr_blocks_output list_cidr_blocks_input get_traffic_policy_instance_count_output get_traffic_policy_instance_count_input get_traffic_policy_instance_output get_traffic_policy_instance_input get_traffic_policy_output get_traffic_policy_input get_reusable_delegation_set_limit_output get_reusable_delegation_set_limit_input get_reusable_delegation_set_output get_reusable_delegation_set_input get_query_logging_config_output get_query_logging_config_input get_hosted_zone_limit_output get_hosted_zone_limit_input get_hosted_zone_count_output get_hosted_zone_count_input get_hosted_zone_output get_hosted_zone_input get_health_check_status_output get_health_check_status_input get_health_check_last_failure_reason_output get_health_check_last_failure_reason_input get_health_check_count_output get_health_check_count_input get_health_check_output get_health_check_input get_geo_location_output get_geo_location_input get_dnssec_output get_dnssec_input get_checker_ip_ranges_output get_checker_ip_ranges_input get_change_output get_change_input get_account_limit_output get_account_limit_input enable_hosted_zone_dnssec_output enable_hosted_zone_dnssec_input disassociate_vpc_from_hosted_zone_output disassociate_vpc_from_hosted_zone_input disable_hosted_zone_dnssec_output disable_hosted_zone_dnssec_input delete_vpc_association_authorization_output delete_vpc_association_authorization_input delete_traffic_policy_instance_output delete_traffic_policy_instance_input delete_traffic_policy_output delete_traffic_policy_input delete_reusable_delegation_set_output delete_reusable_delegation_set_input delete_query_logging_config_output delete_query_logging_config_input delete_key_signing_key_output delete_key_signing_key_input delete_hosted_zone_output delete_hosted_zone_input delete_health_check_output delete_health_check_input delete_cidr_collection_output delete_cidr_collection_input deactivate_key_signing_key_output deactivate_key_signing_key_input create_vpc_association_authorization_output create_vpc_association_authorization_input create_traffic_policy_version_output create_traffic_policy_version_input create_traffic_policy_instance_output create_traffic_policy_instance_input create_traffic_policy_output create_traffic_policy_input create_reusable_delegation_set_output create_reusable_delegation_set_input create_query_logging_config_output create_query_logging_config_input create_key_signing_key_output create_key_signing_key_input create_hosted_zone_output create_hosted_zone_input create_health_check_output create_health_check_input create_cidr_collection_output create_cidr_collection_input change_tags_for_resource_output change_tags_for_resource_input change_resource_record_sets_output change_resource_record_sets_input change_cidr_collection_output change_cidr_collection_input associate_vpc_with_hosted_zone_output associate_vpc_with_hosted_zone_input activate_key_signing_key_output activate_key_signing_key_input

# This file is generated by make.paws. Please do not edit here.
#' @importFrom paws.common populate
#' @include route53_service.R
NULL

.route53$activate_key_signing_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "HostedZoneId", type = "string")), Name = structure(logical(0), tags = list(location = "uri", locationName = "Name", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$activate_key_signing_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$associate_vpc_with_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "AssociateVPCWithHostedZoneRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$associate_vpc_with_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$change_cidr_collection_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "CidrCollectionId", type = "string")), CollectionVersion = structure(logical(0), tags = list(type = "long")), Changes = structure(list(structure(list(LocationName = structure(logical(0), tags = list(type = "string")), Action = structure(logical(0), tags = list(type = "string")), CidrList = structure(list(structure(logical(0), tags = list(locationName = "Cidr", type = "string"))), tags = list(locationNameList = "Cidr", type = "list"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure", locationName = "ChangeCidrCollectionRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$change_cidr_collection_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$change_resource_record_sets_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), ChangeBatch = structure(list(Comment = structure(logical(0), tags = list(type = "string")), Changes = structure(list(structure(list(Action = structure(logical(0), tags = list(type = "string")), ResourceRecordSet = structure(list(Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), SetIdentifier = structure(logical(0), tags = list(type = "string")), Weight = structure(logical(0), tags = list(type = "long")), Region = structure(logical(0), tags = list(type = "string")), GeoLocation = structure(list(ContinentCode = structure(logical(0), tags = list(type = "string")), CountryCode = structure(logical(0), tags = list(type = "string")), SubdivisionCode = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Failover = structure(logical(0), tags = list(type = "string")), MultiValueAnswer = structure(logical(0), tags = list(type = "boolean")), TTL = structure(logical(0), tags = list(type = "long")), ResourceRecords = structure(list(structure(list(Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "ResourceRecord", type = "structure"))), tags = list(locationNameList = "ResourceRecord", type = "list")), AliasTarget = structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), DNSName = structure(logical(0), tags = list(type = "string")), EvaluateTargetHealth = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), HealthCheckId = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceId = structure(logical(0), tags = list(type = "string")), CidrRoutingConfig = structure(list(CollectionId = structure(logical(0), tags = list(type = "string")), LocationName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), GeoProximityLocation = structure(list(AWSRegion = structure(logical(0), tags = list(type = "string")), LocalZoneGroup = structure(logical(0), tags = list(type = "string")), Coordinates = structure(list(Latitude = structure(logical(0), tags = list(type = "string")), Longitude = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Bias = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(locationName = "Change", type = "structure"))), tags = list(locationNameList = "Change", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure", locationName = "ChangeResourceRecordSetsRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$change_resource_record_sets_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$change_tags_for_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceType = structure(logical(0), tags = list(location = "uri", locationName = "ResourceType", type = "string")), ResourceId = structure(logical(0), tags = list(location = "uri", locationName = "ResourceId", type = "string")), AddTags = structure(list(structure(list(Key = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Tag", type = "structure"))), tags = list(locationNameList = "Tag", type = "list")), RemoveTagKeys = structure(list(structure(logical(0), tags = list(locationName = "Key", type = "string"))), tags = list(locationNameList = "Key", type = "list"))), tags = list(type = "structure", locationName = "ChangeTagsForResourceRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$change_tags_for_resource_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_cidr_collection_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateCidrCollectionRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_cidr_collection_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Collection = structure(list(Arn = structure(logical(0), tags = list(type = "string")), Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_health_check_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CallerReference = structure(logical(0), tags = list(type = "string")), HealthCheckConfig = structure(list(IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), Type = structure(logical(0), tags = list(type = "string")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), RequestInterval = structure(logical(0), tags = list(type = "integer")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), MeasureLatency = structure(logical(0), tags = list(type = "boolean")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), RoutingControlArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure", locationName = "CreateHealthCheckRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_health_check_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheck = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckConfig = structure(list(IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), Type = structure(logical(0), tags = list(type = "string")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), RequestInterval = structure(logical(0), tags = list(type = "integer")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), MeasureLatency = structure(logical(0), tags = list(type = "boolean")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), RoutingControlArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckVersion = structure(logical(0), tags = list(type = "long")), CloudWatchAlarmConfiguration = structure(list(EvaluationPeriods = structure(logical(0), tags = list(type = "integer")), Threshold = structure(logical(0), tags = list(type = "double")), ComparisonOperator = structure(logical(0), tags = list(type = "string")), Period = structure(logical(0), tags = list(type = "integer")), MetricName = structure(logical(0), tags = list(type = "string")), Namespace = structure(logical(0), tags = list(type = "string")), Statistic = structure(logical(0), tags = list(type = "string")), Dimensions = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Dimension", type = "structure"))), tags = list(locationNameList = "Dimension", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), CallerReference = structure(logical(0), tags = list(type = "string")), HostedZoneConfig = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), DelegationSetId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateHostedZoneRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZone = structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), Config = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), ResourceRecordSetCount = structure(logical(0), tags = list(type = "long")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure")), ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), DelegationSet = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), NameServers = structure(list(structure(logical(0), tags = list(locationName = "NameServer", type = "string"))), tags = list(locationNameList = "NameServer", type = "list"))), tags = list(type = "structure")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_key_signing_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CallerReference = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), KeyManagementServiceArn = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateKeySigningKeyRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_key_signing_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), KeySigningKey = structure(list(Name = structure(logical(0), tags = list(type = "string")), KmsArn = structure(logical(0), tags = list(type = "string")), Flag = structure(logical(0), tags = list(type = "integer")), SigningAlgorithmMnemonic = structure(logical(0), tags = list(type = "string")), SigningAlgorithmType = structure(logical(0), tags = list(type = "integer")), DigestAlgorithmMnemonic = structure(logical(0), tags = list(type = "string")), DigestAlgorithmType = structure(logical(0), tags = list(type = "integer")), KeyTag = structure(logical(0), tags = list(type = "integer")), DigestValue = structure(logical(0), tags = list(type = "string")), PublicKey = structure(logical(0), tags = list(type = "string")), DSRecord = structure(logical(0), tags = list(type = "string")), DNSKEYRecord = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), StatusMessage = structure(logical(0), tags = list(type = "string")), CreatedDate = structure(logical(0), tags = list(type = "timestamp")), LastModifiedDate = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_query_logging_config_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), CloudWatchLogsLogGroupArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateQueryLoggingConfigRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_query_logging_config_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(QueryLoggingConfig = structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), CloudWatchLogsLogGroupArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_reusable_delegation_set_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CallerReference = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateReusableDelegationSetRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_reusable_delegation_set_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DelegationSet = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), NameServers = structure(list(structure(logical(0), tags = list(locationName = "NameServer", type = "string"))), tags = list(locationNameList = "NameServer", type = "list"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Name = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateTrafficPolicyRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicy = structure(list(Id = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "integer")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_instance_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure", locationName = "CreateTrafficPolicyInstanceRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_instance_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstance = structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_version_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "CreateTrafficPolicyVersionRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_traffic_policy_version_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicy = structure(list(Id = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "integer")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Location = structure(logical(0), tags = list(location = "header", locationName = "Location", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$create_vpc_association_authorization_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure", locationName = "CreateVPCAssociationAuthorizationRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$create_vpc_association_authorization_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$deactivate_key_signing_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "HostedZoneId", type = "string")), Name = structure(logical(0), tags = list(location = "uri", locationName = "Name", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$deactivate_key_signing_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_cidr_collection_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "CidrCollectionId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_cidr_collection_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_health_check_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckId = structure(logical(0), tags = list(location = "uri", locationName = "HealthCheckId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_health_check_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_key_signing_key_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "HostedZoneId", type = "string")), Name = structure(logical(0), tags = list(location = "uri", locationName = "Name", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_key_signing_key_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_query_logging_config_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_query_logging_config_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_reusable_delegation_set_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_reusable_delegation_set_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_traffic_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), Version = structure(logical(0), tags = list(location = "uri", locationName = "Version", type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_traffic_policy_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_traffic_policy_instance_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_traffic_policy_instance_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$delete_vpc_association_authorization_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure", locationName = "DeleteVPCAssociationAuthorizationRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$delete_vpc_association_authorization_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$disable_hosted_zone_dnssec_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$disable_hosted_zone_dnssec_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$disassociate_vpc_from_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), VPC = structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "DisassociateVPCFromHostedZoneRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$disassociate_vpc_from_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$enable_hosted_zone_dnssec_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$enable_hosted_zone_dnssec_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_account_limit_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Type = structure(logical(0), tags = list(location = "uri", locationName = "Type", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_account_limit_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(list(Type = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure")), Count = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_change_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_change_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ChangeInfo = structure(list(Id = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), SubmittedAt = structure(logical(0), tags = list(type = "timestamp")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_checker_ip_ranges_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_checker_ip_ranges_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CheckerIpRanges = structure(list(structure(logical(0), tags = list(type = "string"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_dnssec_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_dnssec_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Status = structure(list(ServeSignature = structure(logical(0), tags = list(type = "string")), StatusMessage = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), KeySigningKeys = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), KmsArn = structure(logical(0), tags = list(type = "string")), Flag = structure(logical(0), tags = list(type = "integer")), SigningAlgorithmMnemonic = structure(logical(0), tags = list(type = "string")), SigningAlgorithmType = structure(logical(0), tags = list(type = "integer")), DigestAlgorithmMnemonic = structure(logical(0), tags = list(type = "string")), DigestAlgorithmType = structure(logical(0), tags = list(type = "integer")), KeyTag = structure(logical(0), tags = list(type = "integer")), DigestValue = structure(logical(0), tags = list(type = "string")), PublicKey = structure(logical(0), tags = list(type = "string")), DSRecord = structure(logical(0), tags = list(type = "string")), DNSKEYRecord = structure(logical(0), tags = list(type = "string")), Status = structure(logical(0), tags = list(type = "string")), StatusMessage = structure(logical(0), tags = list(type = "string")), CreatedDate = structure(logical(0), tags = list(type = "timestamp")), LastModifiedDate = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_geo_location_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ContinentCode = structure(logical(0), tags = list(location = "querystring", locationName = "continentcode", type = "string")), CountryCode = structure(logical(0), tags = list(location = "querystring", locationName = "countrycode", type = "string")), SubdivisionCode = structure(logical(0), tags = list(location = "querystring", locationName = "subdivisioncode", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_geo_location_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(GeoLocationDetails = structure(list(ContinentCode = structure(logical(0), tags = list(type = "string")), ContinentName = structure(logical(0), tags = list(type = "string")), CountryCode = structure(logical(0), tags = list(type = "string")), CountryName = structure(logical(0), tags = list(type = "string")), SubdivisionCode = structure(logical(0), tags = list(type = "string")), SubdivisionName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckId = structure(logical(0), tags = list(location = "uri", locationName = "HealthCheckId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheck = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckConfig = structure(list(IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), Type = structure(logical(0), tags = list(type = "string")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), RequestInterval = structure(logical(0), tags = list(type = "integer")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), MeasureLatency = structure(logical(0), tags = list(type = "boolean")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), RoutingControlArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckVersion = structure(logical(0), tags = list(type = "long")), CloudWatchAlarmConfiguration = structure(list(EvaluationPeriods = structure(logical(0), tags = list(type = "integer")), Threshold = structure(logical(0), tags = list(type = "double")), ComparisonOperator = structure(logical(0), tags = list(type = "string")), Period = structure(logical(0), tags = list(type = "integer")), MetricName = structure(logical(0), tags = list(type = "string")), Namespace = structure(logical(0), tags = list(type = "string")), Statistic = structure(logical(0), tags = list(type = "string")), Dimensions = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Dimension", type = "structure"))), tags = list(locationNameList = "Dimension", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_count_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_count_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckCount = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_last_failure_reason_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckId = structure(logical(0), tags = list(location = "uri", locationName = "HealthCheckId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_last_failure_reason_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckObservations = structure(list(structure(list(Region = structure(logical(0), tags = list(type = "string")), IPAddress = structure(logical(0), tags = list(type = "string")), StatusReport = structure(list(Status = structure(logical(0), tags = list(type = "string")), CheckedTime = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))), tags = list(locationName = "HealthCheckObservation", type = "structure"))), tags = list(locationNameList = "HealthCheckObservation", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_status_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckId = structure(logical(0), tags = list(location = "uri", locationName = "HealthCheckId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_health_check_status_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckObservations = structure(list(structure(list(Region = structure(logical(0), tags = list(type = "string")), IPAddress = structure(logical(0), tags = list(type = "string")), StatusReport = structure(list(Status = structure(logical(0), tags = list(type = "string")), CheckedTime = structure(logical(0), tags = list(type = "timestamp"))), tags = list(type = "structure"))), tags = list(locationName = "HealthCheckObservation", type = "structure"))), tags = list(locationNameList = "HealthCheckObservation", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZone = structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), Config = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), ResourceRecordSetCount = structure(logical(0), tags = list(type = "long")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure")), DelegationSet = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), NameServers = structure(list(structure(logical(0), tags = list(locationName = "NameServer", type = "string"))), tags = list(locationNameList = "NameServer", type = "list"))), tags = list(type = "structure")), VPCs = structure(list(structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "VPC", type = "structure"))), tags = list(locationNameList = "VPC", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_count_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_count_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneCount = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_limit_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Type = structure(logical(0), tags = list(location = "uri", locationName = "Type", type = "string")), HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_hosted_zone_limit_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(list(Type = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure")), Count = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_query_logging_config_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_query_logging_config_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(QueryLoggingConfig = structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), CloudWatchLogsLogGroupArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_reusable_delegation_set_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_reusable_delegation_set_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DelegationSet = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), NameServers = structure(list(structure(logical(0), tags = list(locationName = "NameServer", type = "string"))), tags = list(locationNameList = "NameServer", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_reusable_delegation_set_limit_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Type = structure(logical(0), tags = list(location = "uri", locationName = "Type", type = "string")), DelegationSetId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_reusable_delegation_set_limit_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Limit = structure(list(Type = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure")), Count = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), Version = structure(logical(0), tags = list(location = "uri", locationName = "Version", type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicy = structure(list(Id = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "integer")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_instance_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_instance_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstance = structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_instance_count_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$get_traffic_policy_instance_count_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstanceCount = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_blocks_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CollectionId = structure(logical(0), tags = list(location = "uri", locationName = "CidrCollectionId", type = "string")), LocationName = structure(logical(0), tags = list(location = "querystring", locationName = "location", type = "string")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string")), MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "maxresults", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_blocks_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(type = "string")), CidrBlocks = structure(list(structure(list(CidrBlock = structure(logical(0), tags = list(type = "string")), LocationName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_collections_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string")), MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "maxresults", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_collections_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(type = "string")), CidrCollections = structure(list(structure(list(Arn = structure(logical(0), tags = list(type = "string")), Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "long"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_locations_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(CollectionId = structure(logical(0), tags = list(location = "uri", locationName = "CidrCollectionId", type = "string")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string")), MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "maxresults", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_cidr_locations_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(NextToken = structure(logical(0), tags = list(type = "string")), CidrLocations = structure(list(structure(list(LocationName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_geo_locations_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(StartContinentCode = structure(logical(0), tags = list(location = "querystring", locationName = "startcontinentcode", type = "string")), StartCountryCode = structure(logical(0), tags = list(location = "querystring", locationName = "startcountrycode", type = "string")), StartSubdivisionCode = structure(logical(0), tags = list(location = "querystring", locationName = "startsubdivisioncode", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_geo_locations_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(GeoLocationDetailsList = structure(list(structure(list(ContinentCode = structure(logical(0), tags = list(type = "string")), ContinentName = structure(logical(0), tags = list(type = "string")), CountryCode = structure(logical(0), tags = list(type = "string")), CountryName = structure(logical(0), tags = list(type = "string")), SubdivisionCode = structure(logical(0), tags = list(type = "string")), SubdivisionName = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "GeoLocationDetails", type = "structure"))), tags = list(locationNameList = "GeoLocationDetails", type = "list")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextContinentCode = structure(logical(0), tags = list(type = "string")), NextCountryCode = structure(logical(0), tags = list(type = "string")), NextSubdivisionCode = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_health_checks_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Marker = structure(logical(0), tags = list(location = "querystring", locationName = "marker", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_health_checks_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthChecks = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckConfig = structure(list(IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), Type = structure(logical(0), tags = list(type = "string")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), RequestInterval = structure(logical(0), tags = list(type = "integer")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), MeasureLatency = structure(logical(0), tags = list(type = "boolean")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), RoutingControlArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckVersion = structure(logical(0), tags = list(type = "long")), CloudWatchAlarmConfiguration = structure(list(EvaluationPeriods = structure(logical(0), tags = list(type = "integer")), Threshold = structure(logical(0), tags = list(type = "double")), ComparisonOperator = structure(logical(0), tags = list(type = "string")), Period = structure(logical(0), tags = list(type = "integer")), MetricName = structure(logical(0), tags = list(type = "string")), Namespace = structure(logical(0), tags = list(type = "string")), Statistic = structure(logical(0), tags = list(type = "string")), Dimensions = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Dimension", type = "structure"))), tags = list(locationNameList = "Dimension", type = "list"))), tags = list(type = "structure"))), tags = list(locationName = "HealthCheck", type = "structure"))), tags = list(locationNameList = "HealthCheck", type = "list")), Marker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextMarker = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Marker = structure(logical(0), tags = list(location = "querystring", locationName = "marker", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string")), DelegationSetId = structure(logical(0), tags = list(location = "querystring", locationName = "delegationsetid", type = "string")), HostedZoneType = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzonetype", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZones = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), Config = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), ResourceRecordSetCount = structure(logical(0), tags = list(type = "long")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(locationName = "HostedZone", type = "structure"))), tags = list(locationNameList = "HostedZone", type = "list")), Marker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextMarker = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_by_name_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DNSName = structure(logical(0), tags = list(location = "querystring", locationName = "dnsname", type = "string")), HostedZoneId = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzoneid", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_by_name_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZones = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), Config = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), ResourceRecordSetCount = structure(logical(0), tags = list(type = "long")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(locationName = "HostedZone", type = "structure"))), tags = list(locationNameList = "HostedZone", type = "list")), DNSName = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextDNSName = structure(logical(0), tags = list(type = "string")), NextHostedZoneId = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_by_vpc_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(VPCId = structure(logical(0), tags = list(location = "querystring", locationName = "vpcid", type = "string")), VPCRegion = structure(logical(0), tags = list(location = "querystring", locationName = "vpcregion", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_hosted_zones_by_vpc_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneSummaries = structure(list(structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), Owner = structure(list(OwningAccount = structure(logical(0), tags = list(type = "string")), OwningService = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(locationName = "HostedZoneSummary", type = "structure"))), tags = list(locationNameList = "HostedZoneSummary", type = "list")), MaxItems = structure(logical(0), tags = list(type = "string")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_query_logging_configs_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzoneid", type = "string")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string")), MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "maxresults", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_query_logging_configs_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(QueryLoggingConfigs = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), CloudWatchLogsLogGroupArn = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "QueryLoggingConfig", type = "structure"))), tags = list(locationNameList = "QueryLoggingConfig", type = "list")), NextToken = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_resource_record_sets_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), StartRecordName = structure(logical(0), tags = list(location = "querystring", locationName = "name", type = "string")), StartRecordType = structure(logical(0), tags = list(location = "querystring", locationName = "type", type = "string")), StartRecordIdentifier = structure(logical(0), tags = list(location = "querystring", locationName = "identifier", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_resource_record_sets_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceRecordSets = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), SetIdentifier = structure(logical(0), tags = list(type = "string")), Weight = structure(logical(0), tags = list(type = "long")), Region = structure(logical(0), tags = list(type = "string")), GeoLocation = structure(list(ContinentCode = structure(logical(0), tags = list(type = "string")), CountryCode = structure(logical(0), tags = list(type = "string")), SubdivisionCode = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Failover = structure(logical(0), tags = list(type = "string")), MultiValueAnswer = structure(logical(0), tags = list(type = "boolean")), TTL = structure(logical(0), tags = list(type = "long")), ResourceRecords = structure(list(structure(list(Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "ResourceRecord", type = "structure"))), tags = list(locationNameList = "ResourceRecord", type = "list")), AliasTarget = structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), DNSName = structure(logical(0), tags = list(type = "string")), EvaluateTargetHealth = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), HealthCheckId = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceId = structure(logical(0), tags = list(type = "string")), CidrRoutingConfig = structure(list(CollectionId = structure(logical(0), tags = list(type = "string")), LocationName = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), GeoProximityLocation = structure(list(AWSRegion = structure(logical(0), tags = list(type = "string")), LocalZoneGroup = structure(logical(0), tags = list(type = "string")), Coordinates = structure(list(Latitude = structure(logical(0), tags = list(type = "string")), Longitude = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), Bias = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure"))), tags = list(locationName = "ResourceRecordSet", type = "structure"))), tags = list(locationNameList = "ResourceRecordSet", type = "list")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextRecordName = structure(logical(0), tags = list(type = "string")), NextRecordType = structure(logical(0), tags = list(type = "string")), NextRecordIdentifier = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_reusable_delegation_sets_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Marker = structure(logical(0), tags = list(location = "querystring", locationName = "marker", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_reusable_delegation_sets_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(DelegationSets = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), NameServers = structure(list(structure(logical(0), tags = list(locationName = "NameServer", type = "string"))), tags = list(locationNameList = "NameServer", type = "list"))), tags = list(locationName = "DelegationSet", type = "structure"))), tags = list(locationNameList = "DelegationSet", type = "list")), Marker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), NextMarker = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_tags_for_resource_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceType = structure(logical(0), tags = list(location = "uri", locationName = "ResourceType", type = "string")), ResourceId = structure(logical(0), tags = list(location = "uri", locationName = "ResourceId", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_tags_for_resource_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceTagSet = structure(list(ResourceType = structure(logical(0), tags = list(type = "string")), ResourceId = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(list(Key = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Tag", type = "structure"))), tags = list(locationNameList = "Tag", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_tags_for_resources_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceType = structure(logical(0), tags = list(location = "uri", locationName = "ResourceType", type = "string")), ResourceIds = structure(list(structure(logical(0), tags = list(locationName = "ResourceId", type = "string"))), tags = list(locationNameList = "ResourceId", type = "list"))), tags = list(type = "structure", locationName = "ListTagsForResourcesRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$list_tags_for_resources_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(ResourceTagSets = structure(list(structure(list(ResourceType = structure(logical(0), tags = list(type = "string")), ResourceId = structure(logical(0), tags = list(type = "string")), Tags = structure(list(structure(list(Key = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Tag", type = "structure"))), tags = list(locationNameList = "Tag", type = "list"))), tags = list(locationName = "ResourceTagSet", type = "structure"))), tags = list(locationNameList = "ResourceTagSet", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policies_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyIdMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyid", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policies_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicySummaries = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), LatestVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyCount = structure(logical(0), tags = list(type = "integer"))), tags = list(locationName = "TrafficPolicySummary", type = "structure"))), tags = list(locationNameList = "TrafficPolicySummary", type = "list")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), TrafficPolicyIdMarker = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneIdMarker = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzoneid", type = "string")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancename", type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancetype", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstances = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "TrafficPolicyInstance", type = "structure"))), tags = list(locationNameList = "TrafficPolicyInstance", type = "list")), HostedZoneIdMarker = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_by_hosted_zone_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "querystring", locationName = "id", type = "string")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancename", type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancetype", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_by_hosted_zone_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstances = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "TrafficPolicyInstance", type = "structure"))), tags = list(locationNameList = "TrafficPolicyInstance", type = "list")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_by_policy_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyId = structure(logical(0), tags = list(location = "querystring", locationName = "id", type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(location = "querystring", locationName = "version", type = "integer")), HostedZoneIdMarker = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzoneid", type = "string")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancename", type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyinstancetype", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_instances_by_policy_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstances = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "TrafficPolicyInstance", type = "structure"))), tags = list(locationNameList = "TrafficPolicyInstance", type = "list")), HostedZoneIdMarker = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceNameMarker = structure(logical(0), tags = list(type = "string")), TrafficPolicyInstanceTypeMarker = structure(logical(0), tags = list(type = "string")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_versions_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), TrafficPolicyVersionMarker = structure(logical(0), tags = list(location = "querystring", locationName = "trafficpolicyversion", type = "string")), MaxItems = structure(logical(0), tags = list(location = "querystring", locationName = "maxitems", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_traffic_policy_versions_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicies = structure(list(structure(list(Id = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "integer")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "TrafficPolicy", type = "structure"))), tags = list(locationNameList = "TrafficPolicy", type = "list")), IsTruncated = structure(logical(0), tags = list(type = "boolean")), TrafficPolicyVersionMarker = structure(logical(0), tags = list(type = "string")), MaxItems = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_vpc_association_authorizations_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), NextToken = structure(logical(0), tags = list(location = "querystring", locationName = "nexttoken", type = "string")), MaxResults = structure(logical(0), tags = list(location = "querystring", locationName = "maxresults", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$list_vpc_association_authorizations_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(type = "string")), NextToken = structure(logical(0), tags = list(type = "string")), VPCs = structure(list(structure(list(VPCRegion = structure(logical(0), tags = list(type = "string")), VPCId = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "VPC", type = "structure"))), tags = list(locationNameList = "VPC", type = "list"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$test_dns_answer_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZoneId = structure(logical(0), tags = list(location = "querystring", locationName = "hostedzoneid", type = "string")), RecordName = structure(logical(0), tags = list(location = "querystring", locationName = "recordname", type = "string")), RecordType = structure(logical(0), tags = list(location = "querystring", locationName = "recordtype", type = "string")), ResolverIP = structure(logical(0), tags = list(location = "querystring", locationName = "resolverip", type = "string")), EDNS0ClientSubnetIP = structure(logical(0), tags = list(location = "querystring", locationName = "edns0clientsubnetip", type = "string")), EDNS0ClientSubnetMask = structure(logical(0), tags = list(location = "querystring", locationName = "edns0clientsubnetmask", type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$test_dns_answer_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Nameserver = structure(logical(0), tags = list(type = "string")), RecordName = structure(logical(0), tags = list(type = "string")), RecordType = structure(logical(0), tags = list(type = "string")), RecordData = structure(list(structure(logical(0), tags = list(locationName = "RecordDataEntry", type = "string"))), tags = list(locationNameList = "RecordDataEntry", type = "list")), ResponseCode = structure(logical(0), tags = list(type = "string")), Protocol = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$update_health_check_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheckId = structure(logical(0), tags = list(location = "uri", locationName = "HealthCheckId", type = "string")), HealthCheckVersion = structure(logical(0), tags = list(type = "long")), IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), ResetElements = structure(list(structure(logical(0), tags = list(locationName = "ResettableElementName", type = "string"))), tags = list(locationNameList = "ResettableElementName", type = "list"))), tags = list(type = "structure", locationName = "UpdateHealthCheckRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$update_health_check_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HealthCheck = structure(list(Id = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckConfig = structure(list(IPAddress = structure(logical(0), tags = list(type = "string")), Port = structure(logical(0), tags = list(type = "integer")), Type = structure(logical(0), tags = list(type = "string")), ResourcePath = structure(logical(0), tags = list(type = "string")), FullyQualifiedDomainName = structure(logical(0), tags = list(type = "string")), SearchString = structure(logical(0), tags = list(type = "string")), RequestInterval = structure(logical(0), tags = list(type = "integer")), FailureThreshold = structure(logical(0), tags = list(type = "integer")), MeasureLatency = structure(logical(0), tags = list(type = "boolean")), Inverted = structure(logical(0), tags = list(type = "boolean")), Disabled = structure(logical(0), tags = list(type = "boolean")), HealthThreshold = structure(logical(0), tags = list(type = "integer")), ChildHealthChecks = structure(list(structure(logical(0), tags = list(locationName = "ChildHealthCheck", type = "string"))), tags = list(locationNameList = "ChildHealthCheck", type = "list")), EnableSNI = structure(logical(0), tags = list(type = "boolean")), Regions = structure(list(structure(logical(0), tags = list(locationName = "Region", type = "string"))), tags = list(locationNameList = "Region", type = "list")), AlarmIdentifier = structure(list(Region = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), InsufficientDataHealthStatus = structure(logical(0), tags = list(type = "string")), RoutingControlArn = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure")), HealthCheckVersion = structure(logical(0), tags = list(type = "long")), CloudWatchAlarmConfiguration = structure(list(EvaluationPeriods = structure(logical(0), tags = list(type = "integer")), Threshold = structure(logical(0), tags = list(type = "double")), ComparisonOperator = structure(logical(0), tags = list(type = "string")), Period = structure(logical(0), tags = list(type = "integer")), MetricName = structure(logical(0), tags = list(type = "string")), Namespace = structure(logical(0), tags = list(type = "string")), Statistic = structure(logical(0), tags = list(type = "string")), Dimensions = structure(list(structure(list(Name = structure(logical(0), tags = list(type = "string")), Value = structure(logical(0), tags = list(type = "string"))), tags = list(locationName = "Dimension", type = "structure"))), tags = list(locationNameList = "Dimension", type = "list"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$update_hosted_zone_comment_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "UpdateHostedZoneCommentRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$update_hosted_zone_comment_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(HostedZone = structure(list(Id = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), CallerReference = structure(logical(0), tags = list(type = "string")), Config = structure(list(Comment = structure(logical(0), tags = list(type = "string")), PrivateZone = structure(logical(0), tags = list(type = "boolean"))), tags = list(type = "structure")), ResourceRecordSetCount = structure(logical(0), tags = list(type = "long")), LinkedService = structure(list(ServicePrincipal = structure(logical(0), tags = list(type = "string")), Description = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$update_traffic_policy_comment_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), Version = structure(logical(0), tags = list(location = "uri", locationName = "Version", type = "integer")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure", locationName = "UpdateTrafficPolicyCommentRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$update_traffic_policy_comment_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicy = structure(list(Id = structure(logical(0), tags = list(type = "string")), Version = structure(logical(0), tags = list(type = "integer")), Name = structure(logical(0), tags = list(type = "string")), Type = structure(logical(0), tags = list(type = "string")), Document = structure(logical(0), tags = list(type = "string")), Comment = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

.route53$update_traffic_policy_instance_input <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(Id = structure(logical(0), tags = list(location = "uri", locationName = "Id", type = "string")), TTL = structure(logical(0), tags = list(type = "long")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer"))), tags = list(type = "structure", locationName = "UpdateTrafficPolicyInstanceRequest", xmlNamespace = "https://route53.amazonaws.com/doc/2013-04-01/"))
  return(populate(args, shape))
}

.route53$update_traffic_policy_instance_output <- function(...) {
  args <- c(as.list(environment()), list(...))
  shape <- structure(list(TrafficPolicyInstance = structure(list(Id = structure(logical(0), tags = list(type = "string")), HostedZoneId = structure(logical(0), tags = list(type = "string")), Name = structure(logical(0), tags = list(type = "string")), TTL = structure(logical(0), tags = list(type = "long")), State = structure(logical(0), tags = list(type = "string")), Message = structure(logical(0), tags = list(type = "string")), TrafficPolicyId = structure(logical(0), tags = list(type = "string")), TrafficPolicyVersion = structure(logical(0), tags = list(type = "integer")), TrafficPolicyType = structure(logical(0), tags = list(type = "string"))), tags = list(type = "structure"))), tags = list(type = "structure"))
  return(populate(args, shape))
}

Try the paws.networking package in your browser

Any scripts or data that you put into this service are public.

paws.networking documentation built on Sept. 12, 2024, 7:32 a.m.