_{MsgTitle}

#{title}

_{MsgSurname}

#{userSurname}

_{MsgFirstName}

#{userFirstName}

_{MsgMatrikelNr}

$maybe matnr <- userMatrikelnummer #{matnr} $nothing _{MsgNoMatrikelKnown} $maybe sex <- guardOn showSex =<< userSex

_{MsgSex}

_{sex}

_{MsgEMail}

#{mailtoHtml userEmail} $maybe date <- mRegAt

_{MsgRegisteredSince}

#{date} $if mayRegister

^{regButtonWidget} $maybe _ <- mRegistration

_{MsgCourseDeregisterLecturerTip}

_{MsgStudyTerms}

$if null studies _{MsgNoStudyTermsKnown} $else

_{MsgStudyTerm}	_{MsgStudyFeatureDegree}	_{MsgStudyFeatureType}	_{MsgStudyFeatureAge}	_{MsgStudyFeatureValid}	_{MsgStudyFeatureUpdate} $forall ((Entity _ StudyFeatures{studyFeaturesType, studyFeaturesSemester, studyFeaturesValid, studyFeaturesFirstObserved, studyFeaturesLastObserved}), (Entity _ degree), (Entity _ field)) <- studies
_{field}	_{degree}	_{studyFeaturesType}	#{studyFeaturesSemester}	#{hasTickmark studyFeaturesValid}	$maybe fObs <- studyFeaturesFirstObserved ^{formatTimeRangeW SelFormatDate fObs $ Just studyFeaturesLastObserved} $nothing ^{formatTimeW SelFormatDate studyFeaturesLastObserved}