Differenze tra le versioni di "Floor ()"
Da Gambas-it.org - Wikipedia.
| Riga 4: | Riga 4: | ||
| − | Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria ''Math'': ''libm.so'', nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C " | + | Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con ''Extern'', nonché dichiarare la libreria ''Math'': ''libm.so'', nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "floor()" è omonima alla funzione di Gambas ''Floor'', bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec. |
Dunque avremo ad esempio: | Dunque avremo ad esempio: | ||
Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm:6</font>" <FONT color=#B22222>'''Exec "floor"'''</font> | Private <FONT color=#B22222>Extern floor_C</font>(xF As Float) As Float In "<FONT color=#B22222>libm:6</font>" <FONT color=#B22222>'''Exec "floor"'''</font> | ||
| − | |||
| − | |||
Semplice esempio di uso in Gambas: | Semplice esempio di uso in Gambas: | ||
| Riga 17: | Riga 15: | ||
| − | + | Public Sub Main() | |
Dim fl As Float | Dim fl As Float | ||
| − | + | fl = <FONT color=#B22222>floor_C</font>(3.456) | |
| − | + | Print fl | |
| − | + | End | |
Versione attuale delle 15:13, 14 giu 2024
La funzione della libreria di Math
double floor(double x)
ritorna x arrotondato all'intero più grande uguale o non maggiore di x.
Volendola utilizzare direttamente in Gambas, bisognerà dichiararla con Extern, nonché dichiarare la libreria Math: libm.so, nella quale la funzione è contenuta. Da sottolineare che, poiché questa funzione esterna di C "floor()" è omonima alla funzione di Gambas Floor, bisognerà assegnarle un nome a piacere, ma si dovrà anche richiamare il suo vero nome con il comando Exec.
Dunque avremo ad esempio:
Private Extern floor_C(xF As Float) As Float In "libm:6" Exec "floor"
Semplice esempio di uso in Gambas:
' double floor(double x) ' Largest integer not greater than X. Private Extern floor_C(xF As Float) As Float In "libm:6" Exec "floor" Public Sub Main() Dim fl As Float fl = floor_C(3.456) Print fl End
