$maybe cID <- mcid
  <section>
    $case sheetSubmissionMode
      $of SubmissionMode False Nothing
        <p>
          _{MsgSubmissionNoUploadExpected}
      $of _
        <h2>
          <a href=@{urlArchive cID}>Archiv
          (<a href=@{urlOriginal cID}>Original</a>)

        $maybe fileTable <- mFileTable
          <h3>_{MsgSubmissionFiles}
          ^{fileTable}

    $if maySubmit && not (null lastEdits)
      <h3>_{MsgLastEdits}
      <ul>
        $forall (mbName,time) <- lastEdits
          $maybe name <- mbName
            <li>_{MsgEditedBy name time}
          $nothing
            <li>#{time}

  $if maySubmit
    <section>
      <h2>_{MsgSubmissionReplace}
      ^{formWidget}
$nothing
  ^{formWidget}
