#### several service function calls
#    around index generation and code publication
#
# Author: E.Korsching 2026
###############################################################################



## index functions in R folders


# /../eclipseR/0functions/fn_index/index.E2.R
#
# create a complete overview on all functions in a folder tree

index.E2(spath="/home/korschi/on3/eclipseR/0functions/fn_index/test", opath="/home/korschi/on3/eclipseR/0functions/fn_index/index/indexYY.txt")

a <- index.E2(spath="/home/korschi/on3/eclipseR/0functions/fn_index/test", opath=NULL)


a1 <- index.E2.search( search="perm", x=a, cm=c(1,3) )



##  further functions


# /../eclipseR/0functions/code2web/pubRsource.R
#
# create a '*.ttf' template file [a final html page for the CCSR site]
#   for functions in the /../0functions folder
#   see also 'all_web_code.pdf'

pubRsource(spath="/home/korschi/on3/eclipseR/0functions", output.name="../0functions/code2web/rcode.tt2")
a <- pubRsource(spath="/home/korschi/on3/eclipseR/0functions", output.name="../rcode.tt2")



# /../eclipseR/0functions/fn_index/source.folder.R
#
# 'source()' all functions

source.folder(fp=NULL, sub=F, reg.exp="^0functions$", start.search="/home")
source.folder(fp="/home/korschi/on3/eclipseR/0functions/tdifferential", sub=T)



# /../eclipseR/0functions/fn_index/count_code_rows.R
#
# count code rows

count.code.rows(main.path="/home/korschi/on3/eclipseR")