他人のHaskell日記 RSSフィード

Haskell初心者が、リハビリがてらに「ふつける」と「入門Haskell」片手に、試行錯誤するサイト。

2009-01-08

Programming in Haskell Exercise  Programming in Haskell Exercise - 他人のHaskell日記 を含むブックマーク

Chapter 8

  • The library files also defines a parser int::Parser Int for ann integer.Without looking at this definition,define int.Hint:an integer is eigher a minus symbol follow by a natural number or a natural number.
int::Parser int
int = negativeInt +++ positiveInt

negativeInt::Parser Int
negativeInt = do symbol "-"
                 n <- natural
                 return (- natural)

positiveInt::Parser Int
positiveInt = natural
  • Define a parser comment::Parser() for ordinary Haskell comments that begin with the symbol and extend to the end of the current line,.which is represented by the control character '\n'
comment::Parser()
comment = do symbol "--"
             many (sat /= '\n')
             char '\n'
             return ()
  • Using our second grammar for arithmetic expressions,draw the two possible parse trees for the expression 2+3+4
expr ->expr->expr ->term -> factor->nat-> 2
           -> +
           ->expr ->term -> factor->nat-> 3
     ->+
     ->expr ->term -> factor->nat-> 4

expr ->expr->term -> factor->nat-> 2
     -> +
     ->expr->expr ->term -> factor->nat-> 3
           ->+
           ->expr ->term -> factor->nat-> 4
  • Using our third grammer for arithmetic expression,draw the parse trees for the expressions 2+3,2*3*4,and(2+3)+4

2+3

expr->term->factor->nat->2
    ->+
    ->expr->term->factor->nat->3

2*3*4

expr->term->factor->nat->2
          ->*
          ->term->factor->nat->3
                ->*
                ->term->facotr->nat->4

(2+3)+4

expr->term->factor->(
                  ->expr->term->factor->nat->2
                        ->+
                        ->expr->term->factor->nat->3
                  ->)
    ->+
    ->expr->term->facotr-nat->4
  • Explain why the final simplicfication of the grammer for arithmetic expression has a dramactic effect on the efficiency of the resulting parser.Hint:bygin by condidering how an expression comprising a single number would be parsed if this step had not been made.

expr ::== term + expr | term

term ::== factor * term | factor

ではexprの|の右の項目がマッチするにはterm+exprが失敗した後に、termの文法にあっているか調べなければならない。しかし、すでに、|の左の項目であるterm+exprの文法を調べたときに既に行っていることであり無駄である。同じ事がtermにも言える。

  • Extend the parer for arithmetic expression to support subtraction and division,based upon the following extension to the grammer.
expr = do t <- term
          do symbol "+"
             e <- expr
             return (t+e)
          +++
          do symbol "-"
             e <- expr
             return (t-e)
          +++ return t

term = do f <- factor
          do symbol "*"
             t <- term
             return (f*t)
          +++
          do symbol "/"
             t <- term
             return (div f t)
          +++ return f
  • Further extend the grammer and paser for arithmetic expressions to support exponentiatio,which is assumed to associate to the right and have higher piriority than multiplication and division,but lower priority than parentheses and numbers.For example,2^3*4 means (2^3)*4.Hint:the new level or priority requires a new rule in the grammer.

新しい文法

expr   ::== term (+ expr|-expr|e)
term   ::== expo (* term|/term|e)
expo   ::== factor(^expo|e)
factor ::==(expr)|nat
nat    ::==0|1|2|..

コード

expr = do t <- term
          do symbol "+"
             e <- expr
             return (t+e)
          +++
          do symbol "-"
             e <- expr
             return (t-e)
          +++ return t

term = do e <- expo
          do symbol "*"
             t <- term
             return (e*t)
          +++
          do symbol "/"
             t <- term
             return (div e t)
          +++ return e

expo = do f <- factor
          do symbol "^"
             e <- expo
             return (f^e)
          +++ return f

factor = do symbol "("
            e <- expr
            symbol ")"
            return e
         +++ natural

  • Consider expressions built up from natural numbers using a subtraction operator that is assumed to associate tot the left.

  • Define a natural grammer for such expressions.

expr ::== expr - natural | natural

  • Translate this grammer into a parser expr::Parser Int.
expr = do e <- expr
          symbol "-"
          n <- natural
          return (e - n)
       +++ natural
  • What is the problem with this parser?

exprを評価しようとすると無限ループになる。

  • Show how it can be fiexd. Hint:rewrite the parser using the repetition primitive many and the library function foldl.
expr = do n  <- natural
          ns <- many do symbol "-"
                        natural
          return (n - foldl (+) 0 ns)

Chapter 9

サンプルコードが動かず。linux向けなのかな。ということで仕方無くパス。

Chapter 10

  • Using recursion and the function add,define a multiplication function mult:Nat->Nat->nat for natural numbers.
mult Zero     n = Zero
mult (Succ m) n = add n (mult m n)
  • Although not included in appedix A,the standard library defines

data Ordering = LT|EQ|GT

together with a function

compare::Ord a=>a->a->Ordering

that decides if one value in an ordered type is less than (LT)equal to(EQ),or greater than(GT) another such value.Using this function,redefine the function occurs::Int->Tree->Bool for search trees.Why is this new definition more efficient than the original version?

occurs m (Leaf n) = m == n
occurs m (Node l n r) = case compare m n of
                        EQ -> True
                        LT -> occurs m l
                        GT -> occurs m r

比較回数が最大で一回になるため効率的になる。

  • Consider the following type of binary trees:type Tree = Leaf Int|Node Tree Tree.Let us say that such a tree is balanced if the number of leaves in the left and right subtree of every node differs by at most one,wich leaves themselves being trivially balanced.Define a function balanced::Tree->Bool that decides if at tree is balanced or not.Hint:first define a function that returns the number of leaves in a tree.
numLeaves (Leaf _) = 1
numLeaves (Node left right) =numLeaves left + numLeaves right

balanced (Leaf _) = True
balanced (Node left right) = (abs(numLeaves left - numLeaves right) <= 1 ) && balanced left && balanced right
  • Define a function balance [Int]->Tree that converts a non-empty list of integers into a balanced tree,Hint:first define a function that splits a lsit into two halves whose length differs by a most one.

halves::[Int]->([Int],[Int])
halves xs = splitAt (div (length xs) 2) xs 

balance [x] = Leaf x
balance xs = let (left,right) = halves xs
             in  Node (balance left) (balance right)      
  • Extend tautology checker to suppoert the use of logical disjunction(V) and equivalance(<=>) in propositions.
data Prop =  Const Bool
            |Var   Char
            |Not   Prop
            |And   Prop Prop
            |Or    Prop Prop
            |Imply Prop Prop
            |Equiv Prop Prop

eval _ (Const b)= b
eval s (Var x)=find x s
eval s (Not p)= not(eval s p)
eval s (And p q)= eval s p && eval s q
eval s (Or p q) = eval s p || eval s q
eval s (Imply p q)=eval s p <= eval s q
eval s (Equiv p q)=eval s p == eval s q

vars (Const _)   = []
vars (Var x)     = [x]
vars (Not p)     = vars p
vars (And p q)   = vars p ++ vars q
vars (Or p q)    = vars p ++ vars q
vars (Imply p q) = vars p ++ vars q
vars (Equiv p q) = vars p ++ vars q
  • Using the function isTaut together with the parsing and interaction libraries from the previous two chapters,define an interactive tautology checker that allows propositions to be entereed from the keyboard in a user-friendly syntax. Hint:build a parser for propositioons by modifyin the parser for arithmetic expressions given in chapter 8.

interactionライブラリが動かないのでパス


  • Extend the abstract machine to support the use of multiplication

Abstract Machineをいまいち呑み込めてないのであれだけど、

コードを見る限り、次のように変更すれば掛算に対応すると思う。

> data Expr                     =  Val Int | Add Expr Expr | Mul Expr Expr
> 
> type Cont                     =  [Op]
>
> data Op                       =  AEVAL Expr | MEVAL Expr | ADD Int | MUL Int
> 
> eval                          :: Expr -> Cont -> Int
> eval (Val n)   c              =  exec c n
> eval (Add x y) c              =  eval x (AEVAL y : c)
> eval (Mul x y) c              =  eval x (MEVAL y : c)
> 
> exec                          :: Cont -> Int -> Int
> exec []             n         =  n
> exec (AEVAL y : c) n          =  eval y (ADD n : c)
> exec (MEVAL y : c) n          =  eval y (MUL n : c)
> exec (ADD n  : c) m           =  exec c (n+m)
> exec (MUL n  : c) m           =  exec c (n*m)
> 
> value                         :: Expr -> Int
> value e                       =  eval e []

  • Complete the following instnace declarations:
instance Monad Maybe where
 ...

instance Monad [] where
 ...

In this contexts,[] denotes the list type [a] without its parameter.Hint:first write down the types of rreturn and >>= for each insntace.

instance Monad Maybe where
 return:: a -> Maybe a
 return a = Just a
 (>>=):: Maybe a->(a->Maybe b)->Maybe b
  f >>= g = case f of
            Just a -> g a
            Nothing -> Nothing
instance Monad [] where
  return::a->[a]
  return a = [a]
  (>>=)::[a]->(a->[b])->[b]
  f >>= g = concat(map g f)

TikTik 2012/07/24 03:20 Good to see a talnet at work. I can't match that.

威哥王威哥王 2013/10/24 10:59 花痴:http://花痴.happykanpo.com
花痴:http://xn--dtyr5y.happykanpo.com
威哥王:http://www.hellokanpo.com/view/weigewang.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html
三便宝:http://www.hellokanpo.com/view/satibo-capsules.html
D10 媚薬:http://www.hellokanpo.com/view/D10-meiyao.html
淫インモラル:http://www.hellokanpo.com/view/immoral.html
インモラル:http://www.hellokanpo.com/view/immoral.html
妖姫:http://www.hellokanpo.com/view/yaoji.html
RU486:http://www.hellokanpo.com/view/beijing-ru486.html
花痴:http://www.hellokanpo.com/view/huachi.html
紅蜘蛛:http://www.hellokanpo.com/view/hongzhizhu1.html



淫インモラル:http://immoral.hellokanpo.com
インモラル:http://immoral.hellokanpo.com
媚薬 淫インモラル:http://immoral.hellokanpo.com
媚薬 インモラル:http://immoral.hellokanpo.com
妖姫:http://youhi.hellokanpo.com
媚薬 妖姫:http://youhi.hellokanpo.com
淫インモラル 販売:http://immoral.hellokanpo.com
インモラル 販売:http://immoral.hellokanpo.com
妖姫 効果:http://youhi.hellokanpo.com
妖姫 販売:http://youhi.hellokanpo.com
妖姫 通販:http://youhi.hellokanpo.com


威哥王:http://www.hellokanpo.com/view/weigewang.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html
三便宝:http://www.hellokanpo.com/view/satibo-capsules.html
花痴:http://www.hellokanpo.com/view/huachi.html
RU486:http://www.hellokanpo.com/view/beijing-ru486.html
D10媚薬:http://www.hellokanpo.com/view/D10-meiyao.html
紅蜘蛛:http://www.hellokanpo.com/view/hongzhizhu1.html
五便宝:http://www.hellokanpo.com/view/wodibo-capsules.html
催情剤:http://www.hellokanpo.com/view/D10-meiyao.html
狼1号:http://www.hellokanpo.com/view/langyihao.html
三體牛鞭:http://www.hellokanpo.com/view/santiniubian.html
韓国痩身1号:http://www.hellokanpo.com/view/hanguoshou-575.html
痩身一号:http://www.hellokanpo.com/view/hanguoshou-575.html


精力剤:http://www.hellokanpo.com/JingLiJi
媚薬:http://www.hellokanpo.com/meiyao
威哥王:http://www.hellokanpo.com/view/weigewang.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html
三便宝:http://www.hellokanpo.com/view/satibo-capsules.html
D10 媚薬:http://www.hellokanpo.com/view/D10-meiyao.html
RU486:http://www.hellokanpo.com/view/beijing-ru486.html
新一粒神:http://www.hellokanpo.com/view/xinyilishen.html
三鞭粒:http://www.hellokanpo.com/view/wei.html
男宝:http://www.hellokanpo.com/view/nanbao.html
蔵秘男宝:http://www.hellokanpo.com/view/zangmi.html
蟻力神:http://www.hellokanpo.com/view/yilishen.html
三体牛鞭:http://www.hellokanpo.com/view/santiniubian.html
狼一号:http://www.hellokanpo.com/view/langyihao.html
D10:http://www.hellokanpo.com/view/D10-meiyao.html
D10催情剤:http://www.hellokanpo.com/view/D10-meiyao.html
巨根カプセル:http://www.hellokanpo.com/view/jugen.html
魔根:http://www.hellokanpo.com/view/muogen.html
福源春カプセル:http://www.hellokanpo.com/view/fuyuanchun.html
福源春:http://www.hellokanpo.com/view/fuyuanchun.html
vigrx 効果:http://www.hellokanpo.com/view/vigrx.html
ビグレックス:http://www.hellokanpo.com/view/oil.html
魔鬼天使性欲粉:http://www.hellokanpo.com/view/mogui-tianshi.html
中華牛鞭:http://www.hellokanpo.com/view/zhonghua.html
九鞭粒:http://www.hellokanpo.com/view/jiubianli.html
Wenickman:http://www.hellokanpo.com/view/VVK-Wenickman.html
男露888:http://www.hellokanpo.com/view/nanlu888.html
蔵八宝:http://www.hellokanpo.com/view/zhangbabao.html
FLY D5:http://www.hellokanpo.com/view/fly-d5.html
D5原液:http://www.hellokanpo.com/view/FLYD5yuan.html
蒼蝿水:http://www.hellokanpo.com/view/FLY-D5.html
蒼蝿粉:http://www.hellokanpo.com/view/inverma.html


絶對高潮カプセル:http://www.hellokanpo.com/view/jueduigaochao.html
絶對高潮:http://www.hellokanpo.com/view/jueduigaochao.html
法国性奴:http://www.hellokanpo.com/view/faguo.html
西班牙蒼蝿水:http://www.hellokanpo.com/view/cangyingshui1.html
性霸2000:http://www.hellokanpo.com/view/xingba2000.html
花之欲:http://www.hellokanpo.com/view/huazhiyu.html
美人豹:http://www.hellokanpo.com/view/meirenbao.html
蟻王:http://www.hellokanpo.com/view/antking.html
アリ王:http://www.hellokanpo.com/view/antking.html
媚薬蟻王:http://www.hellokanpo.com/view/antking.html
西班牙昆虫粉:http://www.hellokanpo.com/view/kunchong-fen.html
VOV催情液:http://www.hellokanpo.com/view/VOVcuiqingye.html
小情人:http://www.hellokanpo.com/view/sex-drops5.html
中絶薬:http://www.hellokanpo.com/view/beijing-ru486.html
御秀堂:http://www.hellokanpo.com/view/yuxiutang.html
韓国痩身一号:http://www.hellokanpo.com/view/hanguoshou-575.html
痩身1号:http://www.hellokanpo.com/view/hanguoshou-575.html
催情:http://www.hellokanpo.com/view/D10-meiyao.html
催情水:http://www.hellokanpo.com/view/Foot.html
催情丹:http://www.hellokanpo.com/view/cuiqingdan.html
女性催情剤:http://www.hellokanpo.com/view/d10-meiyao.html
催情粉:http://www.hellokanpo.com/view/hongzhizhu1.html
催情薬:http://www.hellokanpo.com/view/xby.html
催淫カプセル:http://www.hellokanpo.com/view/jueduigaochao.html
妻之友:http://www.hellokanpo.com/view/qizhi.html
野生虫草王:http://www.hellokanpo.com/view/yesheng.html
東方神龍生精:http://www.hellokanpo.com/view/dongfuangshenlong.html
大印象ダイエット茶:http://www.hellokanpo.com/view/dayinxiang.html
立挺90度:http://www.hellokanpo.com/view/liting90.html
VOV催情粉:http://www.hellokanpo.com/view/vovcuiqing.html
力多精:http://www.hellokanpo.com/view/lid-jing.html

イカオウ:http://www.hellokanpo.com/view/wei.html
ウェイカワ:http://www.hellokanpo.com/view/weigewang.html
ハナチ:http://www.hellokanpo.com/view/huachi.html
キョジンバイゾウ:http://www.hellokanpo.com/view/jurenbeiceng.html
三便宝カプセル:http://www.hellokanpo.com/view/satibo-capsules.html
さんべんぼう:http://www.hellokanpo.com/view/satibo-capsules.html
イーリーシン:http://www.hellokanpo.com/view/yilishen.html
しんいちつぶしん:http://www.hellokanpo.com/view/xinyilishen.html
消渇丸:http://www.hellokanpo.com/view/xiaokewan.html
五便宝カプセル:http://www.hellokanpo.com/view/wodibo-capsules.html
ベニクモ:http://www.hellokanpo.com/view/hong-zhi-zhu.html
紅蜘蛛液体:http://www.hellokanpo.com/view/hong-zhi-zhu.html
紅蜘蛛 激安:http://www.hellokanpo.com/view/hong-zhi-zhu-meiyao.html
威哥王:http://www.hellokanpo.com/view/weigewang.html
威哥王:http://www.hellokanpo.com/view/weigewang.html
威哥王:http://www.hellokanpo.com/view/weigewang.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html
巨人倍増:http://www.hellokanpo.com/view/jurenbeiceng.html

igesawejodunigesawejodun 2017/07/17 18:36 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

oyijedunojoyijedunoj 2017/07/17 18:49 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

ozancodozancod 2017/07/17 18:49 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

iyapakreiyapakre 2017/07/17 19:03 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

citutedbcitutedb 2017/07/17 19:03 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

usloduziusloduzi 2017/07/17 19:15 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

uevojulofufinuevojulofufin 2017/07/17 19:30 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

okavobixigiokavobixigi 2017/07/17 19:42 http://100mg-viagracanada.com/ - 100mg-viagracanada.com.ankor <a href="http://sertralinezoloftonline.com/">sertralinezoloftonline.com.ankor</a> http://20mg-tadalafil-lowest-price.com/

iqujibinegiqujibineg 2017/08/08 07:19 http://20mg-cheapesttadalafil.com/ - 20mg-cheapesttadalafil.com.ankor <a href="http://20mg-cheapesttadalafil.com/">20mg-cheapesttadalafil.com.ankor</a> http://20mg-cheapesttadalafil.com/

duakiragifibduakiragifib 2017/08/08 07:38 http://20mg-cheapesttadalafil.com/ - 20mg-cheapesttadalafil.com.ankor <a href="http://20mg-cheapesttadalafil.com/">20mg-cheapesttadalafil.com.ankor</a> http://20mg-cheapesttadalafil.com/

xosowowxosowow 2017/08/08 13:23 http://20mg-cheapesttadalafil.com/ - 20mg-cheapesttadalafil.com.ankor <a href="http://20mg-cheapesttadalafil.com/">20mg-cheapesttadalafil.com.ankor</a> http://20mg-cheapesttadalafil.com/

utopepgehusmutopepgehusm 2017/08/08 13:36 http://20mg-cheapesttadalafil.com/ - 20mg-cheapesttadalafil.com.ankor <a href="http://20mg-cheapesttadalafil.com/">20mg-cheapesttadalafil.com.ankor</a> http://20mg-cheapesttadalafil.com/

SPANISCHE FLIEGE D6SPANISCHE FLIEGE D6 2017/10/19 16:49 SPANISCHE FLIEGE D6:http://www.shanghaikanpo.com/view/1185.html
SPANISCHE FLIEGE D6II:http://www.shanghaikanpo.com/view/1184.html

スペインD8水スペインD8水 2017/10/19 16:50 SPANISCHE FLIEGE D6:http://www.hellokanpo.com/view/SPANISCHEFLIEGE-D6.html
スペインD8水(Spanish sex drops D8):http://www.hellokanpo.com/view/SpanishFliegeD8.html

男根増長素男根増長素 2017/10/19 16:51 黒倍王:http://www.xn--4vq287fuv3a.com/
男根増長素:http://www.kanpoucom.com/product/467.html
壮根精華素:http://www.kanpoucom.com/product/396.html

AryMumpAryMump 2018/02/21 13:26 Propecia Merck Online Buy <a href=http://buyciali.com>buy cialis</a> Zithromax Pregnancy Paharmacymall

MonNeniMonNeni 2018/04/17 20:04 Pharmacie En Ligne Sans Ordonnance Macrobid Real France <a href=http://cialiorder.com>cialis 40 mg</a> Experiment With Amoxicillin Last Longer In Bed Medicine Alternativa Al Viagra

MichaelplemsMichaelplems 2018/05/09 12:06 kamagra oral jelly how to use
<a href="http://kamagradyn.com/">kamagra 100 mg</a>
kamagra kopen belgie
<a href="http://kamagradyn.com/">buy kamagra 100 mg</a>
kamagra store info erfahrungen
http://kamagradyn.com/
kamagra jelly side effects

KeithAbitoKeithAbito 2018/05/11 14:39 kamagra oral jelly review uk
<a href="http://kamagraonl.com/">buy kamagra online</a>
cost of kamagra
<a href="http://kamagraonl.com/">kamagra 100 mg</a>
kamagra4uk review
http://kamagraonl.com/
kamagra kopen amsterdam

RobertDeaksRobertDeaks 2018/05/11 17:34 viagra price at cvs pharmacy
<a href="http://amsboatyard.com/">buy viagra</a>
viagra feminino a venda no brasil
<a href="http://amsboatyard.com/">buy viagra</a>
viagra professional
http://amsboatyard.com/
buy viagra online uk paypal

AltoninoraAltoninora 2018/05/12 01:09 cialis dosage recommendations
<a href="http://airvietnamairline.com/">cialis</a>
generic brand for cialis 5mg
<a href="http://airvietnamairline.com/">cialis generic</a>
generic cialis cost
http://airvietnamairline.com/
effectiveness of cialis vs viagra vs levitra 2013

JeremyMycleJeremyMycle 2018/05/12 07:24 how to use kamagra oral jelly sildenafil
<a href="http://kamagraonl.com/">buy kamagra online</a>
kamagra oral jelly for sale in usa illegal
<a href="http://kamagraonl.com/">buy kamagra 100 mg oral jelly</a>
kamagra 100mg tablets indian
http://kamagraonl.com/
kamagra oral jelly beste wirkung

HowardsowHowardsow 2018/05/12 10:27 viagra dosage
<a href="http://amsboatyard.com/">buy generic viagra online</a>
viagra generic release date usa
<a href="http://amsboatyard.com/">buy generic viagra</a>
woman in viagra commercial 2014 brunette
http://amsboatyard.com/
cialis and viagra dosage

WilliamrutWilliamrut 2018/05/12 17:26 cost of viagra versus cost of cialis
<a href="http://airvietnamairline.com/">buy cialis online</a>
viagra and cialis dosage strength comparison
<a href="http://airvietnamairline.com/">cialis generic</a>
cialis generico colombia
http://airvietnamairline.com/
generic cialis india online pharmacy

BrandonSowBrandonSow 2018/05/12 23:25 kamagra oral jelly review
<a href="http://kamagraonl.com/">buy kamagra 100mg</a>
kamagra oral jelly in australia
<a href="http://kamagraonl.com/">buy kamagra</a>
kamagra 100mg chewables for sale
http://kamagraonl.com/
kamagra com

DustywewDustywew 2018/05/13 08:01 generic cialis soft tabs
<a href="http://airvietnamairline.com/">buy cialis</a>
cialis 5 mg. generico en mexico
<a href="http://airvietnamairline.com/">generic cialis online</a>
effectiveness of cialis vs viagra vs levitra forum
http://airvietnamairline.com/
cialis prices at cvs

CecilamapyCecilamapy 2018/05/13 13:02 sildenafil citrate 20 mg tablets coupon
<a href="http://sildenafilviagrap.com/">buy viagra</a>
sildenafil citrate tablets for dogs
<a href="http://sildenafilviagrap.com/">buy viagra online</a>
manly sildenafil citrate tablets 100mg
http://sildenafilviagrap.com/
sildenafil citrate tablets

WarrenEmuroWarrenEmuro 2018/05/13 13:09 kamagra oral jelly wirkung bei frauen
<a href="http://kamagraonl.com/">kamagra 100 mg</a>
kamagra 100mg tablets for sale in uses
<a href="http://kamagraonl.com/">buy kamagra online</a>
kamagra forum srbija
http://kamagraonl.com/
kamagra forum uk

WilliamInewsWilliamInews 2018/05/13 14:51 cost of levitra vs viagra
<a href="http://buylevitraonl.com/">levitra 10mg</a>
side effects of levitra 20 mg
<a href="http://buylevitraonl.com/">levitra</a>
levitra coupons 2016
http://buylevitraonl.com/
levitra 20 mg price walmart

RobertsoispRobertsoisp 2018/05/13 15:47 viagra over counter paypal
<a href="http://amsboatyard.com/">viagra generic</a>
viagra feminino em portugal
<a href="http://amsboatyard.com/">viagra generic</a>
viagra generic walmart
http://amsboatyard.com/
walmart generic viagra 100mg online

HarrySexHarrySex 2018/05/13 20:56 what is the generic pill for viagra
<a href="http://buyviagrapw.com/">viagra generic</a>
buy viagra online us pharmacies
<a href="http://buyviagrapw.com/">viagra generic</a>
generic viagra companies
http://buyviagrapw.com/
can i take 50 mg of viagra twice a day

ElmerNatElmerNat 2018/05/13 22:05 the cost of cialis or viagra in europe
<a href="http://airvietnamairline.com/">cialis</a>
cialis prices
<a href="http://airvietnamairline.com/">buy cialis online</a>
cialis generic name and classification
http://airvietnamairline.com/
brand cialis 10mg

VaughnWESVaughnWES 2018/05/14 03:22 kamagra uk next day
<a href="http://kamagraonl.com/">kamagra 100 mg oral jelly</a>
kamagra oral jelly 100mg reviews
<a href="http://kamagraonl.com/">kamagra 100 mg</a>
buy kamagra oral jelly usa
http://kamagraonl.com/
kamagra 100mg chewable lifesavers

JamesboirmJamesboirm 2018/05/14 06:00 asian female viagra commercial
<a href="http://amsboatyard.com/">buy viagra</a>
viagra commercial actors
<a href="http://amsboatyard.com/">buy generic viagra</a>
walmart generic viagra price
http://amsboatyard.com/
levitra vs cialis vs viagra drinking

LarrytamLarrytam 2018/05/14 06:52 what sildenafil citrate tablets used for
<a href="http://sildenafilcitratepw.com/">sildenafil citrate 50mg</a>
sildenafil citrate 20 mg dosage
<a href="http://sildenafilcitratepw.com/">sildenafil citrate</a>
nizagara sildenafil citrate tablets 100 mg
http://sildenafilcitratepw.com/
sildenafil citrate used for pah

RaymondnekRaymondnek 2018/05/14 08:04 levitra generic availability
<a href="http://levitraonlq.com/">levitra online</a>
generic levitra 20mg tablets price
<a href="http://levitraonlq.com/">buy levitra online</a>
coupons for levitra printable
http://levitraonlq.com/
levitra generic drug

JamesovedeJamesovede 2018/05/14 12:08 cialis super active ingredients
<a href="http://airvietnamairline.com/">buy generic cialis</a>
cialis 40 mg professional for sale
<a href="http://airvietnamairline.com/">generic cialis online</a>
eli lilly cialis manufacturer coupon
http://airvietnamairline.com/
cialis soft tabs review

DanielReottDanielReott 2018/05/14 20:05 viagra generic cost
<a href="http://amsboatyard.com/">buy generic viagra</a>
pfizer brand viagra 100mg wikipedia
<a href="http://amsboatyard.com/">generic viagra online</a>
viagra generic cost
http://amsboatyard.com/
what is generic viagra called in spanish

WilliamsigWilliamsig 2018/05/14 22:20 fildena 100
<a href="http://fildenaonl.com/">sildenafil citrate</a>
fildena 100 purple for sale
<a href="http://fildenaonl.com/">buy fildena online</a>
usa fildena 50mg
http://fildenaonl.com/
fildena 100 mg fast acting reviews

KelvinmittyKelvinmitty 2018/05/14 23:40 cialis coupons for walgreens pharmacy
<a href="http://cialisgenericmg.com/">cialis generic</a>
cialis vs levitra reviews
<a href="http://cialisgenericmg.com/">buy cialis online</a>
cialis 5mg tablets for sale
http://cialisgenericmg.com/
generic for cialis or viagra

RobertnitRobertnit 2018/05/15 05:10 cialis viagra generico
<a href="http://buycialisonl.com/">buy cialis online</a>
best prices for generic cialis
<a href="http://buycialisonl.com/">buy generic cialis online</a>
generic cialis tadalafil 20mg best prices
http://buycialisonl.com/
20mg cialis vs 100mg viagra effectiveness

WillieSalWillieSal 2018/05/15 07:34 kamagra gel forum hr
<a href="http://kamagraonl.com/">buy kamagra 100 mg</a>
kamagra oral jelly come si usa
<a href="http://kamagraonl.com/">kamagra 100 mg oral jelly</a>
kamagra 100mg oral jelly review
http://kamagraonl.com/
kamagra oral jelly 100mg suppliers australia

ThomascliexThomascliex 2018/05/15 10:03 viagra commercial actress 2016
<a href="http://amsboatyard.com/">buy generic viagra</a>
como se debe tomar el viagra para que haga efecto
<a href="http://amsboatyard.com/">generic viagra online</a>
brand viagra without a doctor prescription indianapolis
http://amsboatyard.com/
viagra generico preço ultrafarma

DominicvarDominicvar 2018/05/15 14:51 viagra vs cialis vs levitra cost comparison
<a href="http://levitraonlq.com/">levitra online</a>
levitra 20 mg coupons walgreens
<a href="http://levitraonlq.com/">levitra online</a>
generic name of levitra
http://levitraonlq.com/
generic name for levitra drug

GeorgePeacyGeorgePeacy 2018/05/15 16:20 cialis commercial actors names
<a href="http://airvietnamairline.com/">buy cialis online</a>
cialis dosage and timing
<a href="http://airvietnamairline.com/">buy cialis</a>
uses for cialis 10mg
http://airvietnamairline.com/
cialis prescription price australia

NicolasMokNicolasMok 2018/05/15 20:16 generic viagra professional
<a href="http://buyviagrapw.com/">buy generic viagra online</a>
viagra generic name mycoxafloppin
<a href="http://buyviagrapw.com/">viagra</a>
generic for viagra and cialis
http://buyviagrapw.com/
coupons for viagra 2018

NathansigNathansig 2018/05/15 21:26 kamagra gold jelly
<a href="http://kamagraonl.com/">kamagra 100 mg</a>
kamagra oral jelly review forum
<a href="http://kamagraonl.com/">buy kamagra 100 mg</a>
kamagra 50 mg oral jelly usa
http://kamagraonl.com/
kamagra 100mg oral jelly price

WalterjutWalterjut 2018/05/16 00:22 viagra
<a href="http://amsboatyard.com/">generic viagra online</a>
viagra precisa de receita 2013
<a href="http://amsboatyard.com/">buy viagra online</a>
levitra ou viagra forum
http://amsboatyard.com/
viagra and cialis generic

MichaelOricyMichaelOricy 2018/05/16 04:50 sildenafil citrate 100mg tablet vs viagra
<a href="http://sildenafilcitratepw.com/">generic viagra online</a>
lowest price sildenafil citrate
<a href="http://sildenafilcitratepw.com/">buy viagra</a>
sildenafil citrate generic viagra
http://sildenafilcitratepw.com/
sildenafil citrate 20 mg price

DonaldRibDonaldRib 2018/05/16 06:14 generic drug for levitra
<a href="http://levitraonlq.com/">buy levitra online</a>
generic levitra prices
<a href="http://levitraonlq.com/">levitra online</a>
levitra 20 mg cost walmart generic
http://levitraonlq.com/
levitra 20 mg cost walmart

JeffreyamemnJeffreyamemn 2018/05/16 06:31 directions for cialis 20mg
<a href="http://airvietnamairline.com/">generic cialis</a>
cost of cialis 20 mg at walmart
<a href="http://airvietnamairline.com/">generic cialis online</a>
cialis 20 mg 30 tablet orjinal mi
http://airvietnamairline.com/
buy cialis in usa online

RichardphotsRichardphots 2018/05/16 11:37 generic viagra 100mg sildenafil
<a href="http://genericviagrasu.com/">generic viagra online</a>
cost of generic viagra bangkok
<a href="http://genericviagrasu.com/">buy viagra</a>
female viagra mechanism of action
http://genericviagrasu.com/
generic viagra available in usa

CharlesadvalCharlesadval 2018/05/16 11:38 kamagra forum 2014
<a href="http://kamagraonl.com/">kamagra 100mg</a>
kamagra 100mg tablets for sale in uses
<a href="http://kamagraonl.com/">buy kamagra</a>
kamagra usa
http://kamagraonl.com/
kamagra rendeles

PhillipHarPhillipHar 2018/05/16 19:59 viagra side effects headache cures
<a href="http://amsboatyard.com/">buy generic viagra</a>
effectiveness of cialis vs viagra vs levitra
<a href="http://amsboatyard.com/">viagra generic</a>
viagra side effects webmd
http://amsboatyard.com/
viagra wikipedia drug

FrancisRonFrancisRon 2018/05/16 20:39 fildena citrate 50mg
<a href="http://fildenaonl.com/">buy fildena</a>
fildena 100 purple for sale
<a href="http://fildenaonl.com/">buy fildena</a>
fildena 50 mg tablets buy here in usa
http://fildenaonl.com/
fildena 100 mg direction

BarrymixBarrymix 2018/05/16 20:45 generic cialis viagra levitra online
<a href="http://airvietnamairline.com/">generic cialis</a>
cialis tadalafil 10mg adalah
<a href="http://airvietnamairline.com/">buy generic cialis online</a>
walmart pharmacy cialis 20mg price
http://airvietnamairline.com/
when is cialis going generic in the us

DexterFamDexterFam 2018/05/16 22:06 generic viagra cialis online
<a href="http://cialisgenericmg.com/">cialis generic</a>
cialis coupons printable walmart
<a href="http://cialisgenericmg.com/">cialis</a>
cialis coupons 2016
http://cialisgenericmg.com/
cialis 5mg daily use does it work

CharlesromCharlesrom 2018/05/17 01:58 the kamagra store hoax
<a href="http://kamagraonl.com/">kamagra 100mg</a>
kamagra reviews forum
<a href="http://kamagraonl.com/">buy kamagra 100 mg oral jelly</a>
the sleep store kamagra
http://kamagraonl.com/
kamagra oral jelly 100mg 1 week pack

RonnieCerRonnieCer 2018/05/17 04:00 cialis retail price at cvs
<a href="http://buycialisonl.com/">generic cialis online</a>
dosage for cialis 20mg
<a href="http://buycialisonl.com/">generic cialis online</a>
viagra and cialis dosage and costs
http://buycialisonl.com/
cialis 20 mg 8 tablet fiyatД±

ClydetokClydetok 2018/05/17 10:20 viagra without a doctor prescription india
<a href="http://amsboatyard.com/">viagra</a>
women in viagra commercial 2015 date night
<a href="http://amsboatyard.com/">buy generic viagra online</a>
viagra coupons meijer
http://amsboatyard.com/
dosage for viagra cialis levitra

MichaelapampMichaelapamp 2018/05/17 10:57 price comparison viagra and cialis
<a href="http://airvietnamairline.com/">cialis</a>
best price viagra cialis levitra
<a href="http://airvietnamairline.com/">buy generic cialis</a>
cialis 5mg vs 20mg
http://airvietnamairline.com/
cialis daily use 5mg dosage

LarryNawLarryNaw 2018/05/17 12:54 sildenafil citrate generic viagra 100mg
<a href="http://sildenafilcitratepw.com/">buy sildenafil citrate online</a>
what is sildenafil citrate 20 used for
<a href="http://sildenafilcitratepw.com/">buy viagra</a>
sildenafil citrate 100mg tablets for sale
http://sildenafilcitratepw.com/
sildenafil citrate tablets ip

RonaldEcomaRonaldEcoma 2018/05/17 14:11 average price of levitra 20 mg
<a href="http://levitraonlq.com/">levitra 20mg</a>
levitra dosage instructions
<a href="http://levitraonlq.com/">levitra</a>
levitra vs viagra ingredients
http://levitraonlq.com/
levitra generic drug

PeterChalePeterChale 2018/05/17 16:02 kamagra 100mg tablets side effects
<a href="http://kamagraonl.com/">buy kamagra online</a>
kamagra tablets 100mg reviews
<a href="http://kamagraonl.com/">buy kamagra 100 mg</a>
kamagra shop deutschland erfahrung 2015
http://kamagraonl.com/
kamagra 100mg tablets side effects

ThomasbuHThomasbuH 2018/05/17 19:49 viagra generic price canada
<a href="http://buyviagrapw.com/">generic viagra online</a>
viagra woman commercial asian
<a href="http://buyviagrapw.com/">buy generic viagra online</a>
buy cialis vs viagra
http://buyviagrapw.com/
cialis generico do viagra

KeithmitKeithmit 2018/05/18 00:41 viagra commercial models
<a href="http://amsboatyard.com/">generic viagra online</a>
viagra professional samples
<a href="http://amsboatyard.com/">generic viagra</a>
cialis vs viagra review
http://amsboatyard.com/
generic viagra soft tabs 50mg

GeorgequornGeorgequorn 2018/05/18 01:20 price of generic cialis
<a href="http://airvietnamairline.com/">buy generic cialis online</a>
cialis generic vs brand name
<a href="http://airvietnamairline.com/">generic cialis online</a>
generic viagra and cialis
http://airvietnamairline.com/
viagra cialis generic

DavidsaupeDavidsaupe 2018/05/18 05:50 sildenafil citrate tablets ip 100 mg india
<a href="http://sildenafilcitratepw.com/">sildenafil citrate 50mg</a>
what is sildenafil citrate 20 mg tablet
<a href="http://sildenafilcitratepw.com/">sildenafil citrate 50mg</a>
sildenafil citrate tablets for dogs
http://sildenafilcitratepw.com/
price of sildenafil citrate 100mg tablets

CesarVaxCesarVax 2018/05/18 07:09 kamagra kopen nederland
<a href="http://kamagraonl.com/">buy kamagra 100 mg oral jelly</a>
kamagra 100mg gold review
<a href="http://kamagraonl.com/">kamagra 100 mg</a>
kamagra oral jelly 100 mg wirkungsdauer
http://kamagraonl.com/
kamagra 100mg oral jelly sildenafil

WesleyHalWesleyHal 2018/05/18 07:23 levitra vs viagra reviews
<a href="http://levitraonlq.com/">buy levitra</a>
price of levitra at walmart pharmacy
<a href="http://levitraonlq.com/">levitra 20mg</a>
levitra generic price
http://levitraonlq.com/
levitra 20 mg cost cvs

FrankCoecyFrankCoecy 2018/05/18 13:10 walmart generic viagra 100mg best price
<a href="http://genericviagrasu.com/">viagra</a>
generic viagra 100mg exporters
<a href="http://genericviagrasu.com/">viagra</a>
viagra cialis pharmacy
http://genericviagrasu.com/
cialis vs viagra reviews

DonaldhopDonaldhop 2018/05/18 15:58 bula viagra 50 mg pfizer
<a href="http://amsboatyard.com/">generic viagra</a>
pfizer brand viagra 100mg sale
[url=http://amsboatyard.com/]viagra[/url]
pfizer brand viagra 100mg review
http://amsboatyard.com/
viagra and cialis dosage strength comparison

ThomasdepThomasdep 2018/05/18 16:40 cialis generic at costco
<a href="http://airvietnamairline.com/">cialis</a>
price for cialis at walmart
<a href="http://airvietnamairline.com/">buy cialis online</a>
cialis generic best price canada
http://airvietnamairline.com/
cialis soft tabs 20mg erfahrungen

MichaelnexMichaelnex 2018/05/18 22:06 fildena citrate 50mg
<a href="http://fildenaonl.com/">fildena</a>
fildena from india
<a href="http://fildenaonl.com/">buy fildena</a>
fildena 150mg dose from fortune healthcare
http://fildenaonl.com/
fildena 100 mg softgel

EdgarTefEdgarTef 2018/05/18 22:12 kamagra dosage
<a href="http://kamagraonl.com/">buy kamagra 100 mg oral jelly</a>
kamagra 100mg oral jelly kako se uzima
<a href="http://kamagraonl.com/">buy kamagra 100 mg</a>
kamagra 100mg generic viagra for sale
http://kamagraonl.com/
kamagra gold

RickeyfeameRickeyfeame 2018/05/18 23:37 buy cialis online canada pharmacy
<a href="http://cialisgenericmg.com/">buy generic cialis online</a>
levitra cialis viagra trial pack
<a href="http://cialisgenericmg.com/">cialis</a>
cialis dosage and timing
http://cialisgenericmg.com/
cialis side effects dangers or

KennethjaighKennethjaigh 2018/05/19 04:56 printable cialis coupon walgreens
<a href="http://buycialisonl.com/">buy generic cialis online</a>
cialis commercial bathtub meaning
<a href="http://buycialisonl.com/">cialis</a>
cialis 20mg price in india
http://buycialisonl.com/
cost of cialis 20 mg at cvs

DennisrhypeDennisrhype 2018/05/19 06:22 viagra without a doctor prescription by phone number
<a href="http://amsboatyard.com/">generic viagra online</a>
viagra natural casera para la mujer
<a href="http://amsboatyard.com/">generic viagra</a>
brand viagra without a doctor prescription online
http://amsboatyard.com/
actress in viagra 2016 commercial

CharlesviakSCharlesviakS 2018/05/19 13:07 sildenafil citrate dosage recommendations
<a href="http://sildenafilcitratepw.com/">sildenafil citrate 100mg</a>
sildenafil citrate suppliers
<a href="http://sildenafilcitratepw.com/">buy viagra</a>
sildenafil citrate 100mg tab directions
http://sildenafilcitratepw.com/
sildenafil citrate dosage

RonaldZerRonaldZer 2018/05/19 14:39 levitra 20 mg coupon
<a href="http://levitraonlq.com/">buy levitra</a>
levitra prices at walmart
<a href="http://levitraonlq.com/">levitra online</a>
levitra coupons 2017
http://levitraonlq.com/
side effects of levitra vs viagra

DouglasGedDouglasGed 2018/05/19 15:19 kamagra forum srpski
<a href="http://kamagraonl.com/">buy kamagra</a>
super kamagra kaufen
<a href="http://kamagraonl.com/">kamagra 100 mg oral jelly</a>
kamagra store in nyc
http://kamagraonl.com/
kamagra oral jelly viagra

DanielMUSDanielMUS 2018/06/19 04:26 kamagra 100 mg green tablets
<a href="http://kamagraonl.com/">buy kamagra oral jelly</a>
kamagra oral jelly reviews
<a href="http://kamagraonl.com/">buy kamagra</a>
kamagra 100mg

JaredExeseJaredExese 2018/06/20 01:54 levitra vs viagra vs cialis cost
<a href="http://amsboatyard.com/">buy generic viagra online</a>
what are the long term effects of viagra
<a href="http://amsboatyard.com/">buy viagra</a>
viagra soft pill

JuniordruckJuniordruck 2018/06/21 01:31 costco generic viagra cost
<a href="http://viagrapipls.com/">buy generic viagra online</a>
cost of viagra vs cialis vs levitra
<a href="http://viagrapipls.com/">buy viagra</a>
cost of stendra vs viagra cialis levitra

ゲスト



トラックバック - http://haskell.g.hatena.ne.jp/taninsw/20090108