Paper_book *paper_book = new Paper_book ();
Real scale = scm_to_double (paper->c_variable ("outputscale"));
Output_def *scaled_bookdef = scale_output_def (paper, scale);
Paper_book *paper_book = new Paper_book ();
Real scale = scm_to_double (paper->c_variable ("outputscale"));
Output_def *scaled_bookdef = scale_output_def (paper, scale);