#lang scheme/base (provide myadd1 myadd2) (define (myadd1 x) (apply + x)) (define (myadd2 x) (apply + (vector->list x)))