+ if( seq1 == NULL )
+ {
+ if( orlgth1 )
+ {
+// fprintf( stderr, "## Freeing local arrays in A__align\n" );
+ orlgth1 = 0;
+ orlgth2 = 0;
+
+ imp_match_init_strict( NULL, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL, NULL, NULL, 0 );
+
+ free( mseq1 );
+ free( mseq2 );
+ FreeFloatVec( w1 );
+ FreeFloatVec( w2 );
+ FreeFloatVec( match );
+ FreeFloatVec( initverticalw );
+ FreeFloatVec( lastverticalw );
+
+ FreeFloatVec( m );
+ FreeIntVec( mp );
+
+ FreeCharMtx( mseq );
+
+ FreeFloatVec( ogcp1 );
+ FreeFloatVec( ogcp2 );
+ FreeFloatVec( fgcp1 );
+ FreeFloatVec( fgcp2 );
+
+
+ FreeFloatMtx( cpmx1 );
+ FreeFloatMtx( cpmx2 );
+
+ FreeFloatMtx( floatwork );
+ FreeIntMtx( intwork );
+
+ }
+ else
+ {
+// fprintf( stderr, "## Not allocated\n" );
+ }
+ return( 0.0 );
+ }
+
+ lgth1 = strlen( seq1[0] );
+ lgth2 = strlen( seq2[0] );
+#if 1
+ if( lgth1 == 0 || lgth2 == 0 )
+ {
+ fprintf( stderr, "WARNING (Aalignmm): lgth1=%d, lgth2=%d\n", lgth1, lgth2 );
+ }
+ if( lgth1 == 0 && lgth2 == 0 )
+ return( 0.0 );
+
+ if( lgth1 == 0 )
+ {
+ for( i=0; i<icyc; i++ )
+ {
+ j = lgth2;
+ seq1[i][j] = 0;
+ while( j ) seq1[i][--j] = '-';
+// fprintf( stderr, "seq1[i] = %s\n", seq1[i] );
+ }
+ return( 0.0 );
+ }
+
+ if( lgth2 == 0 )
+ {
+ for( i=0; i<jcyc; i++ )
+ {
+ j = lgth1;
+ seq2[i][j] = 0;
+ while( j ) seq2[i][--j] = '-';
+// fprintf( stderr, "seq2[i] = %s\n", seq2[i] );
+ }
+ return( 0.0 );
+ }
+#endif
+