RosettaCodeData/Task/Map-range/Amazing-Hopper/map-range-2.hopper

3 lines
194 B
Plaintext

#defn Seqspaced(__X__,__Y__,__Z__,_V_) #ATOM#CMPLX;#ATOM#CMPLX;#ATOM#CMPLX;keep;lthan(1);\
do{{"Seqspaced: num elements < 1"}throw(2301)},seqsp(_V_)