sub create_table ($) {

  my($schema_in) = $_;