(i)),   ...
                           char(submth(i)),   ...
                           char(submth(i)),   ...
                           sslphs,      ...
                           sslsol,      ...
                           sslemi,      ...
                           sslvis,      ...
                           ssllit                                    );

            if ( i == 0 )

               fprintf( [ '        The solar incidence angle ' ...
                          'should be 0.\n'               