Add xsd:double
rdf/xsd.scm
| 93 | 93 | string->number | |
| 94 | 94 | number->string)) | |
| 95 | 95 | ||
| 96 | + | (define-public double | |
| 97 | + | (make-xsd-datatype | |
| 98 | + | "double" | |
| 99 | + | "The double datatype is patterned after the IEEE double-precision 64-bit | |
| 100 | + | floating point datatype. Each floating point datatype has a value space that | |
| 101 | + | is a subset of the rational numbers." | |
| 102 | + | string->number | |
| 103 | + | number? | |
| 104 | + | string->number | |
| 105 | + | number->string)) | |
| 106 | + | ||
| 96 | 107 | (define datatypes | |
| 97 | 108 | (list string boolean decimal integer int)) | |
| 98 | 109 |