float sf_cell1_update1 (int dim, float s, float v, float *p, const float *g) /*< symplectic first-order: step 1 >*/ { ... }