@@ -464,7 +464,9 @@ function OBO2RDF($abbv)
464
464
$ tid = $ ns .": " .$ id ;
465
465
echo $ tid .PHP_EOL ;
466
466
} else if ($ a [0 ] == "name " ) {
467
- $ buf .= parent ::describeClass ($ tid ,addslashes (stripslashes ($ a [1 ])));
467
+ $ name = addslashes (stripslashes ($ a [1 ]));
468
+ $ buf .= parent ::describeClass ($ tid ,$ name );
469
+ $ buf .= parent ::triplifyString ($ tid ,"dc:title " ,$ name );
468
470
} else if ($ a [0 ] == "is_a " ) {
469
471
if (FALSE !== ($ pos = strpos ($ a [1 ],"! " ))) $ a [1 ] = substr ($ a [1 ],0 ,$ pos -1 );
470
472
$ buf .= parent ::triplify ($ tid ,"rdfs:subPropertyOf " ,"obo_vocabulary: " .strtolower ($ a [1 ]));
@@ -493,7 +495,7 @@ function OBO2RDF($abbv)
493
495
} else if ($ a [0 ] == "name " ) {
494
496
// $t = parent::triplifyString($tid,"rdfs:label",str_replace(array("\"", "'"), array("","\\\'"), stripslashes($a[1]))." [$tid]");
495
497
$ label = str_replace (array ("\"" , "' " ), array ("" ,"\\\' " ), stripslashes ($ a [1 ]));
496
- $ t = parent ::describeIndividual ($ tid ,$ label ,"owl:Class " );
498
+ $ t = parent ::describeIndividual ($ tid ,$ label ,"owl:Class " , $ label );
497
499
$ t .= parent ::triplify ($ tid ,"rdfs:isDefinedBy " ,$ ouri );
498
500
$ min .= $ t ;
499
501
$ buf .= $ t ;
0 commit comments