Update sm.f