| 66820 |      1 | /*  Title:      Pure/Admin/afp.scala
 | 
|  |      2 |     Author:     Makarius
 | 
|  |      3 | 
 | 
|  |      4 | Administrative support for the Archive of Formal Proofs.
 | 
|  |      5 | */
 | 
|  |      6 | 
 | 
|  |      7 | package isabelle
 | 
|  |      8 | 
 | 
|  |      9 | 
 | 
| 75393 |     10 | object AFP {
 | 
| 70855 |     11 |   val chapter: String = "AFP"
 | 
| 69693 |     12 | 
 | 
| 75497 |     13 |   val BASE: Path = Path.explode("$AFP_BASE")
 | 
|  |     14 | 
 | 
| 78417 |     15 |   def main_dir(base_dir: Path = BASE): Path = base_dir + Path.explode("thys")
 | 
|  |     16 | 
 | 
| 80056 |     17 |   def main_dirs(afp_root: Option[Path]): List[Path] =
 | 
| 78420 |     18 |     afp_root match {
 | 
|  |     19 |       case None => Nil
 | 
|  |     20 |       case Some(base_dir) => List(main_dir(base_dir = base_dir))
 | 
|  |     21 |     }
 | 
| 66820 |     22 | }
 |