Show PDF Bookmars with Scala[z]

package com.logikujo.literoj.testBookTree

import com.logikujo.spdf.Implicits._
import com.logikujo.spdf.pdfoperator._
import PDFOperator._

import com.logikujo.utils.Treeable._

import scalaz._
import Scalaz._

object TestBookTree {
  def main(args:Array[String]) {
    val comp = for {
      doc <- pdfGetDocument
      tree <- pdfBookmarksTree(doc)
      _ <- pdfClose(doc)
    } yield tree.toOption >>= identity

    (comp ! PDF("testPDF.pdf")).
      some((t) => println(t.drawTree)).
      none(println("No hay bookmarks"))
  }
}