use proconio::{input, marker::Chars};

fn main() {
    input! {
        _n: usize,
        s: Chars,
    }

    let mut negative = 0_usize;
    let mut positive = 0_usize;
    for &c in &s {
        if c == '<' {
            (negative, positive) = (negative, positive.max(negative + 1));
        } else {
            (negative, positive) = (negative.max(positive + 1), positive);
        }
    }

    println!("{}", negative.max(positive));
}