prelude sources to lib/src; present in StructuralEng; refactored checkGFCC

This commit is contained in:
aarne
2007-12-13 10:12:00 +00:00
parent e6c9cb2b52
commit 072b48065d
17 changed files with 85 additions and 44 deletions

12
lib/src/Latex.gf Normal file
View File

@@ -0,0 +1,12 @@
resource Latex = open Prelude in {
oper
command : Str -> Str = \c -> "\\" + c ;
fun1 : Str -> Str -> Str = \f,x -> "\\" + f + "{" ++ x ++ "}" ;
fun2 : Str -> Str -> Str -> Str =
\f,x,y -> "\\" + f + "{" ++ x ++ "}{" ++ y ++ "}" ;
begin : Str -> Str = \e -> "\\begin{" + e + "}" ;
end : Str -> Str = \e -> "\\end{" + e + "}" ;
inEnv : Str -> Str -> Str = \e,s -> begin e ++ s ++ end e ;
}