isomorphism

module Main where

import GHCJS.DOM
import GHCJS.DOM.Types
import GHCJS.DOM.Document
import GHCJS.DOM.EventM

main = do
    Just doc <- currentDocument
    connect "keydown" doc $ do

isomorphism

module Main where

import Data.Vector.Storable as V

main = do
    print $ V.fromList [1..9 :: Float]

-- output:
-- "fromList [5.831554e-39,5.831554e-39,1.0,1.0,1.0,1.0,1.0,1.0,1.0]"

isomorphism

{-# LANGUAGE NoMonomorphismRestriction #-}
{-# LANGUAGE Rank2Types #-}
{-# LANGUAGE PolyKinds #-}
module A where

import Control.Lens
import Data.Vinyl
import GHC.TypeLits

class A f where

isomorphism

----------------------------------------------------------------------
vertex group
0x00004394 - 0x000043c3
0x4394 flags: 1073741826
0x4398 (16 bytes skipped): 
0x43a8 vertex array bytes array, # entries: 135800
0x43ac vertex array bytes array offset: 0x47178
0x43b0 (8 bytes skipped): 
0x43b8 vertex array stride bytes: 40