abuiles

import Network
import Network.HTTP
import Network.HTTP.Base
import Network.URI
import System.IO
import Text.Regex
import Data.Maybe
import System.Directory (doesFileExist)
import System.FilePath.Posix (takeExtensions)

abuiles

data Perro = Chan  {altura :: Int , muerde :: Bool}
           | Labrador {altura::Int , muerde ::  Bool}
    deriving (Show)

c  = Chan 4 True
l = Labrador 1 True

--Aseguro que lo que estoy recibiendo es un perro con el type signature 
test :: Perro -> String
test a = case a of

abuiles

* OBJECT -> {SETSV} | {EMPTY}
* SETSV  -> STRING:VALUE SETSV'
* SETSV'  -> ,SETSV | EMPTY
* STRING -> "MANYCHARS"
* VALUE  -> STRING | NUMBER | OBJECT | ARRAY | true | false | null
* ARRAY  -> [SETV] | [E]
* SETV   -> VALUE SETV'
* SETV'  -> ,SETV | EMPTY
* MANYCHARS -> CHAR MANYCHARS | EMPTY

abuiles

import Foreign.Storable
import Foreign.Marshal.Array
import Data.Word
import Graphics.Rendering.OpenGL
import Graphics.UI.GLUT
import Data.IORef
import qualified Data.ByteString.Lazy.Char8 as L8
import qualified Data.ByteString.Lazy as L
import Data.Char (isSpace)

abuiles

{-# LANGUAGE ImplicitParams #-}

bar :: (?test :: Int) -> (?test2 :: Int) -> Int
bar  = ?test - ?test2

foo = let ?test = 3
          ?test2 = 4
      in
        bar
        

abuiles

pReturn (λ b d → (1 + b) ‘max ‘ d )
    < * > pSym ’(’ < * > parens < *> pSym ’)’ <*> parens
<|> pReturn 0

abuiles

error in process sentinel: tramp-dissect-file-name: Not a tramp file name: /Atreyu
:Creature

error in process sentinel: Not a tramp file name: /Atreyu
:Creature

abuiles

 public class HelloJava3Dz extends Applet implements KeyPressedEventListener  {

    double yRotationIncrement_ =Math.PI/36d; 
    double yAngle_ = 0d;
    double distanceIncrement_ = 0.1d;
    double x_ = 0.0d;
    double z_ = 0.0d;
    double distance_ = 0.0d;

    double rotX_ =  Math.PI /5 ;

abuiles

  (n + 1) × (n + 1)! + (n + 1)! − 1
...
=   (n + 1)! × ((n + 1) + 1) − 1   ( Como llegan aqui ?... se sabe que (n+1)! = n! (n+1) )
.....
=
  (n + 2)! − 1

abuiles

def checkTree (tree:List[SceneObject]) = ((tree count (_.isInstanceOf[Camera])) == 1 ) && ((tree count (_.isInstanceOf[LightSource])) == 1 )