section .bss
    res resq 1            ; 結果を保持する変数（64ビット）

section .data
    modulus dd 1000000007 ; モジュラス

section .text
    global _start

_start:
    ; 数値 n を標準入力から読み込む
    mov eax, 3            ; syscall for sys_read
    mov ebx, 0            ; stdin
    mov ecx, res          ; バッファのアドレス
    mov edx, 12           ; バッファのサイズ
    int 0x80              ; システムコール実行

    ; 文字列を整数に変換
    mov rdi, res          ; 数値の文字列のアドレス
    call atoi

    ; 階乗計算
    mov rcx, rax          ; カウンター rcx に n をセット
    mov rax, 1            ; rax に初期値 1 をセット（結果を保持）

calc_fact:
    mul rcx               ; rax *= rcx
    mov rdx, 0            ; rdx をクリア（mulでのオーバーフロー防止）
    dec rcx               ; rcx をデクリメント
    jnz calc_fact         ; rcx が 0 でないならループ

    ; モジュラス演算
    mov rcx, modulus      ; rcx に 1000000007 をロード
    div rcx               ; rdx:rax / rcx, 商は rax に、余りは rdx に
    mov rax, rdx          ; 結果は rdx にあるので、それを rax に移動

    ; 結果を表示
    mov eax, 4            ; syscall for sys_write
    mov ebx, 1            ; stdout
    mov ecx, res          ; バッファのアドレス
    mov edx, 12           ; 文字数
    int 0x80              ; システムコール実行

    ; 終了
    mov eax, 1            ; syscall for sys_exit
    xor ebx, ebx          ; ステータス 0
    int 0x80

atoi:
    ; 文字列を整数に変換する関数
    ; 省略（実際のatoi関数の実装が必要）
    ret