Map range: Difference between revisions
m
→{{header|Amazing Hopper}}
Line 187:
</pre>
=={{header|Amazing Hopper}}==
La función "Seqspaced" es una macro-sustitución de "seqsp", y está construida, internamente, como una rutina en C que realiza el siguiente cálculo (en pseudocódigo):
<lang C>
double inc = (nHasta - nDesde) / ( nTotal - 1);
Line 195:
lista[n] = lista[n-1] + inc;
}
</lang>
Macro-sustitución de "Seqspaced":
<lang Amazing Hopper>
#defn Seqspaced(__X__,__Y__,__Z__,_V_) #ATOM#CMPLX;#ATOM#CMPLX;#ATOM#CMPLX;keep;lthan(1);\
do{{"Seqspaced: num elements < 1"}throw(2301)},seqsp(_V_)
</lang>
<lang Amazing Hopper>
| |||