@ -232,9 +232,9 @@ L110:
} else {
nb = 64 ;
}
} else if ( s_cmp ( c3 , " T QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 ,
} else if ( s_cmp ( c3 , " QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 ,
" RQF " , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " LQF " , ( ftnlen )
3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " T QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 )
3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 )
= = 0 ) {
if ( sname ) {
nb = 32 ;
@ -390,9 +390,9 @@ L200:
nbmin = 2 ;
if ( s_cmp ( c2 , " GE " , ( ftnlen ) 2 , ( ftnlen ) 2 ) = = 0 ) {
if ( s_cmp ( c3 , " T QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " RQF " , (
if ( s_cmp ( c3 , " QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " RQF " , (
ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " LQF " , ( ftnlen ) 3 , (
ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " T QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 )
ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 )
{
if ( sname ) {
nbmin = 2 ;
@ -482,9 +482,9 @@ L300:
nx = 0 ;
if ( s_cmp ( c2 , " GE " , ( ftnlen ) 2 , ( ftnlen ) 2 ) = = 0 ) {
if ( s_cmp ( c3 , " T QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " RQF " , (
if ( s_cmp ( c3 , " QRF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " RQF " , (
ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " LQF " , ( ftnlen ) 3 , (
ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " T QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 )
ftnlen ) 3 ) = = 0 | | s_cmp ( c3 , " QLF" , ( ftnlen ) 3 , ( ftnlen ) 3 ) = = 0 )
{
if ( sname ) {
nx = 128 ;