titles - ; The first three lines of this file were inserted...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
;; The first three lines of this file were inserted by DrScheme. They record metadata ;; about the language level of this file in a form that our tools can easily process. #reader(lib "htdp-beginner-reader.ss" "lang")((modname titles) (read-case-sensitive #t) (teachpacks ()) (htdp-settings #(#t constructor repeating-decimal #f #t none #f ()))) ;; Ru Wang 20319247 CS135 Sec001 Tut 108 ;;Assignment 4 ;;Question 2 ;;********************************************************************************* ** * ;; extract-titles: symbol (listof mminfo) -> (listof string) ; ;; Purpose: to put titles in a list according to the symbol entered. ; ;;Template: ;;(define (extract-titles type lom) ;; (cond [(symbol=? type 'mp3s) ;; (cond [empty? . ..] ;; [mp3info? . ..] ;; [else . ..])] ;; [(symbol=? type 'movies) ;; (cond [empty? . ..] ;; [movieinfo? . ..] ;; [else . ..])] ;; [(symbol=? type 'all) ;; (cond [empty? . ..] ;; [mp3info? . ..] ;; [movieinfo? . ..])])) ; ;;Examples: ;;using a list that is made up of 2 mp3info and 2 movie info:
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Image of page 2
This is the end of the preview. Sign up to access the rest of the document.

Page1 / 2

titles - ; The first three lines of this file were inserted...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online