static S dm_moduleName(O module) {
  ret (S) callOpt(getOpt(dm_getStem(module), 'moduleName));
}