(define (outer-fun something)

  (define (inner-fun somepart)
    (+ somepart 1))

  (define (inner-notfun newpart)
    (* newpart 2))

  (list (map inner-fun
             (map inner-notfun something))))