This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
      Learn more about bidirectional Unicode characters
    
  
  
    
  | main : IO () | |
| main = do | |
| putStrLn $ show res | |
| where x : Int | |
| x = 2 | |
| add : Int -> Int | |
| add x = x + x | |
| res : Int | |
| res = add 1 | 
  
    
      This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
      Learn more about bidirectional Unicode characters
    
  
  
    
  | public export | |
| record State where | |
| constructor MkState | |
| out : Int | |
| public export | |
| Show State where | |
| show (MkState o ) = "State: " ++ show o | |
| public export | 
  
    
      This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
      Learn more about bidirectional Unicode characters
    
  
  
    
  | %builtins output range_check | |
| from starkware.cairo.common.registers import get_fp_and_pc | |
| from starkware.cairo.common.serialize import serialize_word | |
| from starkware.cairo.common.math import assert_lt_felt | |
| const false = 0 | |
| const true = 1 | |
  
    
      This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
      Learn more about bidirectional Unicode characters
    
  
  
    
  | Stream.continually(Seq("|","/","-","\\").map("\b" + _).toStream).flatten.foreach { c => print(c); Thread.sleep(100)} |