import "./lib/csv/src/csv"

import "./lib/csv/src/csv"

fun main() {
  let input = "name,age,city\nAlice,30,New York\nBob,25,London"
  let t = csv_parse(input)

  println(csv_pretty(t))
  // name  | age | city    
  // ------+-----+---------
  // Alice | 30  | New York
  // Bob   | 25  | London  

  match csv_get_by_name(t, 1, "city") {
    Some(v) => println(v),   // London
    None => println("not found")
  }
}

struct CsvOptions {
  delimiter: string,   // default ","
  has_header: bool,    // default true
  quote_char: string   // default "\""
}

struct CsvTable {
  headers: list<string>,
  rows: list<list<string>>
}

fun default_opts() : CsvOptions

// Default (comma, header row, double-quote)
let t = csv_parse(input)

// Tab-separated, no header
let opts = CsvOptions { delimiter: "\t", has_header: false, quote_char: "\"" }
let t = csv_parse_opts(input, opts)

import "./lib/csv/src/csv"

fun main() {
  let t = csv_parse("product,qty,price\nApple,10,3\nBanana,25,1\nCherry,5,8")

  // Filter rows where price > 2
  let expensive = csv_filter_rows(t, (row) =>
    match str_at(row, 2) { Some(v) => to_int(v) > 2, None => false }
  )
  println(csv_pretty(expensive))

  // Total quantity
  let total = fold(t.rows, 0, (acc, row) =>
    match str_at(row, 1) { Some(v) => acc + to_int(v), None => acc }
  )
  println("Total qty: {total}")
}

fun add_revenue(row: list<string>) : list<string> {
  let q = match str_at(row, 1) { Some(v) => to_int(v), None => 0 }
  let p = match str_at(row, 2) { Some(v) => to_int(v), None => 0 }
  row + [show(q * p)]
}

fun main() {
  let t = csv_parse("product,qty,price\nApple,10,3\nBanana,25,1")
  let with_rev = CsvTable {
    headers: t.headers + ["revenue"],
    rows: map(t.rows, add_revenue)
  }
  println(csv_pretty(with_rev))
}

import "./lib/csv/src/csv"

fun main() {
  match read_file("data.csv") {
    Ok(text) => println(csv_pretty(csv_parse(text))),
    Err(e)   => println("Error: {e}")
  }
}

import "./lib/csv/src/csv"

fun main() {
  let t    = csv_parse("name,city\nAlice,London")
  let opts = CsvOptions { delimiter: "\t", has_header: true, quote_char: "\"" }
  println(csv_to_csv_opts(t, opts))
}