<commit_before>-- Standard code to make a table of symbols.
module Drasil.TableOfAbbAndAcronyms
  ( table_of_abb_and_acronyms ) where

import Control.Lens ((^.))

import Language.Drasil
import Data.Drasil.Concepts.Documentation

table_of_abb_and_acronyms :: (NamedIdea s) => [s] -> Section
table_of_abb_and_acronyms ls = Section (S "Abbreviations and Acronyms") 
  [Con (table ls)]
  
--FIXME? Should it be called Symbol or something like Abbreviation/Acronym?
--FIXME? Should it be "Description" or "Term" or something else?
table :: (NamedIdea s) => [s] -> Contents
table ls = Table (map (^.term) [symbol_,description]) (mkTable
  [(\ch -> getAcc ch) , 
   (\ch -> ch ^. term)]
  ls)
  (S "Abbreviations and Acronyms") False<commit_msg>Use NP function (at_start) in TableOfAbbAndAcronyms<commit_after>-- Standard code to make a table of symbols.
module Drasil.TableOfAbbAndAcronyms
  ( table_of_abb_and_acronyms ) where

import Control.Lens ((^.))

import Language.Drasil
import Data.Drasil.Concepts.Documentation

table_of_abb_and_acronyms :: (NamedIdea s) => [s] -> Section
table_of_abb_and_acronyms ls = Section (S "Abbreviations and Acronyms") 
  [Con (table ls)]
  
--FIXME? Should it be called Symbol or something like Abbreviation/Acronym?
--FIXME? Should it be "Description" or "Term" or something else?
table :: (NamedIdea s) => [s] -> Contents
table ls = Table (map (at_start) [symbol_, description]) (mkTable
  [(\ch -> getAcc ch) , 
   (\ch -> ch ^. term)]
  ls)
  (S "Abbreviations and Acronyms") False
{'fraction_non_alphanumeric': 0.12261041529334213, 'fraction_numerical': 0.0, 'mean_word_length': 4.460431654676259, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 15, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '7477110', 'n_tokens_mistral': 573, 'n_tokens_neox': 532, 'n_words': 161}