1 extern int v3p_netlib_sormr2_( 2 char *side, 3 char *trans, 4 v3p_netlib_integer *m, 5 v3p_netlib_integer *n, 6 v3p_netlib_integer *k, 7 v3p_netlib_real *a, 8 v3p_netlib_integer *lda, 9 v3p_netlib_real *tau, 10 v3p_netlib_real *c__, 11 v3p_netlib_integer *ldc, 12 v3p_netlib_real *work, 13 v3p_netlib_integer *info, 14 v3p_netlib_ftnlen side_len, 15 v3p_netlib_ftnlen trans_len 16 ); 17