diff --git a/Web/Twitter/Types.hs b/Web/Twitter/Types.hs
--- a/Web/Twitter/Types.hs
+++ b/Web/Twitter/Types.hs
@@ -143,6 +143,7 @@
   , searchStatusText          :: Text
   , searchStatusSource        :: Text
   , searchStatusUser          :: User
+  , searchStatusCoordinates   :: Maybe Coordinates
   } deriving (Show, Eq)
 
 instance FromJSON SearchStatus where
@@ -152,6 +153,7 @@
                  <*> o .:  "text"
                  <*> o .:  "source"
                  <*> o .:  "user"
+                 <*> o .:? "coordinates"
   parseJSON _ = mzero
 
 data SearchMetadata =
@@ -190,6 +192,7 @@
   , rsEntities        :: Maybe Entities
   , rsUser            :: User
   , rsRetweetedStatus :: Status
+  , rsCoordinates     :: Maybe Coordinates
   } deriving (Show, Eq)
 
 instance FromJSON RetweetedStatus where
@@ -202,6 +205,7 @@
                     <*> o .:? "entities"
                     <*> o .:  "user"
                     <*> o .:  "retweeted_status"
+                    <*> o .:? "coordinates"
   parseJSON _ = mzero
 
 data DirectMessage =
@@ -215,6 +219,7 @@
   , dmRecipient          :: User
   , dmRecipientId        :: UserId
   , dmSenderId           :: UserId
+  , dmCoordinates        :: Maybe Coordinates
   } deriving (Show, Eq)
 
 instance FromJSON DirectMessage where
@@ -228,6 +233,7 @@
                   <*> o .:  "recipient"
                   <*> o .:  "recipient_id"
                   <*> o .:  "sender_id"
+                  <*> o .:? "coordinates"
   parseJSON _ = mzero
 
 data EventType = Favorite | Unfavorite
diff --git a/Web/Twitter/Types/Lens.hs b/Web/Twitter/Types/Lens.hs
--- a/Web/Twitter/Types/Lens.hs
+++ b/Web/Twitter/Types/Lens.hs
@@ -49,6 +49,7 @@
        , statusFavoriteCount
        , statusLang
        , statusPossiblySensitive
+       , statusCoordinates
 
        , searchResultStatuses
        , searchResultSearchMetadata
@@ -58,6 +59,7 @@
        , searchStatusText
        , searchStatusSource
        , searchStatusUser
+       , searchStatusCoordinates
 
        , searchMetadataMaxId
        , searchMetadataSinceId
@@ -77,6 +79,7 @@
        , rsEntities
        , rsUser
        , rsRetweetedStatus
+       , rsCoordinates
 
        , dmCreatedAt
        , dmSenderScreenName
@@ -87,6 +90,7 @@
        , dmRecipient
        , dmRecipientId
        , dmSenderId
+       , dmCoordinates
 
        , evCreatedAt
        , evTargetObject
@@ -236,6 +240,7 @@
 SIMPLE_LENS(statusFavoriteCount       , Status,  Integer                      )
 SIMPLE_LENS(statusLang                , Status,  Maybe Text                   )
 SIMPLE_LENS(statusPossiblySensitive   , Status,  Maybe Bool                   )
+SIMPLE_LENS(statusCoordinates         , Status,  Maybe Coordinates            )
 
 TYPECHANGE_LENS(searchResultStatuses  , SearchResult                          )
 SIMPLE_LENS(searchResultSearchMetadata, SearchResult body,  SearchMetadata    )
@@ -245,6 +250,7 @@
 SIMPLE_LENS(searchStatusText          , SearchStatus,  Text                   )
 SIMPLE_LENS(searchStatusSource        , SearchStatus,  Text                   )
 SIMPLE_LENS(searchStatusUser          , SearchStatus,  User                   )
+SIMPLE_LENS(searchStatusCoordinates   , SearchStatus,  Maybe Coordinates      )
 
 SIMPLE_LENS(searchMetadataMaxId       , SearchMetadata,  StatusId             )
 SIMPLE_LENS(searchMetadataSinceId     , SearchMetadata,  StatusId             )
@@ -264,6 +270,7 @@
 SIMPLE_LENS(rsEntities                , RetweetedStatus,  Maybe Entities      )
 SIMPLE_LENS(rsUser                    , RetweetedStatus,  User                )
 SIMPLE_LENS(rsRetweetedStatus         , RetweetedStatus,  Status              )
+SIMPLE_LENS(rsCoordinates             , RetweetedStatus,  Maybe Coordinates   )
 
 SIMPLE_LENS(dmCreatedAt               , DirectMessage,  DateString            )
 SIMPLE_LENS(dmSenderScreenName        , DirectMessage,  Text                  )
@@ -274,6 +281,7 @@
 SIMPLE_LENS(dmRecipient               , DirectMessage,  User                  )
 SIMPLE_LENS(dmRecipientId             , DirectMessage,  UserId                )
 SIMPLE_LENS(dmSenderId                , DirectMessage,  UserId                )
+SIMPLE_LENS(dmCoordinates             , DirectMessage,  Maybe Coordinates     )
 
 SIMPLE_LENS(evCreatedAt               , Event,  DateString                    )
 SIMPLE_LENS(evTargetObject            , Event,  Maybe EventTarget             )
@@ -356,30 +364,35 @@
     text :: SimpleLens s Text
     user :: SimpleLens s User
     created_at :: SimpleLens s DateString
+    geolocation :: SimpleLens s (Maybe Coordinates)
 
 instance AsStatus Status where
     status_id = statusId
     text = statusText
     user = statusUser
     created_at = statusCreatedAt
+    geolocation = statusCoordinates
 
 instance AsStatus SearchStatus where
     status_id = searchStatusId
     text = searchStatusText
     user = searchStatusUser
     created_at = searchStatusCreatedAt
+    geolocation = searchStatusCoordinates
 
 instance AsStatus RetweetedStatus where
     status_id = rsId
     text = rsText
     user = rsUser
     created_at = rsCreatedAt
+    geolocation = rsCoordinates
 
 instance AsStatus DirectMessage where
     status_id = dmId
     text = dmText
     user = dmSender
     created_at = dmCreatedAt
+    geolocation = dmCoordinates
 
 class AsUser u where
     user_id :: SimpleLens u UserId
diff --git a/twitter-types.cabal b/twitter-types.cabal
--- a/twitter-types.cabal
+++ b/twitter-types.cabal
@@ -1,5 +1,5 @@
 name:              twitter-types
-version:           0.3.20140620
+version:           0.3.20140801
 license:           BSD3
 license-file:      LICENSE
 author:            Takahiro HIMURA