#include "lmp_f2c.h" extern "C" { integer i_lmp_len(char *s, ftnlen n) { return (n); } }