Advertisement
Guest User

Untitled

a guest
Mar 4th, 2015
213
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.36 KB | None | 0 0
  1. (struct: day-stats
  2. ([user-id : Integer]
  3. ;; ... 10 more Integer fields
  4. ))
  5.  
  6. (day-stats 0 0 0 0 0 0 0 0 0 0 0)
  7.  
  8. (struct day-stats
  9. ([user-id #:auto]
  10. ;; ... 10 more Integer fields
  11. )
  12. #:auto-value 0)
  13.  
  14. #lang typed/racket
  15. (struct: day-stats ([x : Integer] [y : Integer]))
  16.  
  17. (define (mk-day-stats) (day-stats 0 0))
  18.  
  19. (mk-day-stats)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement